Fungsi LEFT, RIGHT Dan MID Pada Visual Basic

Untuk Menggunakan Langkah-langkah Dibawah ini terlebih Dahulu anda harus membuat 2 buah Texbox dan 1 Buah Command Button Pada From seperti pada gambar dibawah ini.

Contoh Penerapan Fungsi LEFT

LEFT: mengambil n karakter di sebelah kiri suatu string
Contoh Mengambil 2 karakter dari kriteria 123456 mulai dari sebelah Kiri
Penulisan Rumusnya:
Clik Double Pada Tombol Proses Ketikan text1.text=Left(text2.text,2)
Contoh:
Private Sub Command1_Click()
Text2.Text = Left(Text1.Text, 2)
End Sub

Hasilnya =12
Jalankan / Run (tekan F5 Pada Keyboard) Kemudian Masukkan Kriteria 123456 setelah itu Clik Tombol Proses Dan Lihat Hasilnya.

Contoh Penerapan Fungsi RIGHT
RIGHT: mengambil n karakter di sebelah kanan suatu string
Contoh Mengambil 2 karakter dari kriteria 123456 mulai dari sebelah Kanan
Penulisan Rumusnya:
Clik Double Pada Tombol Proses Ketikan text1.text=Right(text2.text,2)
Contoh:
Private Sub Command1_Click()
Text2.Text = Right  (Text1.Text, 2)
End Sub
Hasilnya =56

Contoh Penerapan Fungsi MID
MID: mengambil n karakter yang berada ditengah-tengah kriteria
Contoh Mengambil 3 karakter dimulai dari karakter ke 3  dari kriteria 123456
Penulisan Rumusnya:
Clik Double Pada Tombol Proses Ketikan text1.text=MID(text2.text,3,3)

Contoh :
Private Sub Command1_Click()
Text2.Text = MID(Text1.Text, 3, 3)
End Sub
Hasilnya =345

Semoga Bermanfaat.