8. String Manipulasi (Tutorial Visual Basic 2010)

بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ

Manipulasi String adalah bagian penting dari pemrograman karena itu membantu untuk mengolah data yang datang dalam bentuk non-numerik jenis seperti nama, jenis kelamin alamat, kota, judul buku dan banyak lagi.

8.1 Manipulasi String Menggunakan + dan & tanda-tanda.


String dapat dimanipulasi dengan menggunakan tanda & dan tanda +, baik melakukan penggabungan string yang berarti menggabungkan dua atau lebih string ke string yang lebih kecil lebih besar. Sebagai contoh, kita dapat bergabung "Visual" dan "Basic" ke "Visual Basic" menggunakan "Visual" & "Basic" atau "Visual" "Basic" +, seperti terlihat pada contoh di bawah ini

Contoh 8.1

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1, text2, text3 As String
text1 = "Visual"
text2 = "Basic"
text3 = text1 + text2
Label1.Text = text3

End Sub
End Class

Garis text3 = text1 + text2 bisa diganti dengan text3 = text1 & text2 dan menghasilkan output yang sama. Namun, jika salah satu variabel dinyatakan sebagai tipe data numerik, Anda tidak dapat menggunakan tanda +, Anda hanya dapat menggunakan tanda &.

Contoh 8.2
Dim text1, text3 as string
Dim Text2 As Integer
text1 = "Visual"
text2=22
text3=text1+text2
Label1.Text = text3

Kode ini akan menghasilkan kesalahan karena data mismatch.However, menggunakan & bukan + akan baik-baik saja.
Dim text1, text3 as string
Dim Text2 As Integer
text1 = "Visual"
text2=22
text3=text1 & text2
Label1.Text = text3

Anda dapat menggabungkan lebih dari dua string untuk membentuk string yang lebih besar, seperti contoh berikut:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1, text2, text3, text4, text5, text6 As String

text1 = "Welcome"
text2 = " to"
text3 = " Visual"
text4 = " Basic"
text5 = " 2010"
text6 = text1 + text2 + text3+text4+text5
Label1.Text = text6

End Sub
End Class

Menjalankan program di atas akan menghasilkan screen shot berikut.


8.2 (b) Fungsi Kanan

Fungsi kanan ekstrak bagian kanan frase. Format untuk Visual Basic 6 adalah
Right ("Phrase", n)

Dimana n adalah posisi awal dari kanan dari fase di mana bagian kalimat yang akan diekstraksi. Sebagai contoh
Right("Visual Basic", 4) = asic

Namun, format ini tidak berlaku di VB2010. Di VB2010, kita perlu menggunakan format berikut
Microsoft.VisualBasic.Right("Phrase",n)

Contoh 8.3
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1 As String

text1 = TextBox1.Text
Label1.Text = Microsoft.VisualBasic.Right(text1, 4)

End Sub

Program di atas akan kembali empat karakter paling kanan dari frasa yang dimasukkan ke dalam textbox.

Output:



* Alasan menggunakan referensi lengkap karena banyak benda memiliki sifat kanan sehingga dengan kanan sendiri akan membuat ambigu untuk VB2010.

8.2 (c) Fungsi Kiri

Fungsi Kiri mengekstrak bagian kiri frase. Formatnya adalah
Microsoft.VisualBasic.Left ("Phrase", n)

Dimana n adalah posisi awal dari kiri dari fase di mana bagian kalimat yang akan diekstraksi. Sebagai contoh,
Microsoft.VisualBasic.Left ("Visual Basic", 4) = Visu

Saya Fungsi lain akan dibahas dalam pelajaran di masa depan.


8.2 String Manipulasi Menggunakan VB2010 Built-in Fungsi

Fungsi ini mirip dengan prosedur normal, tetapi tujuan utama berfungsi untuk menerima input tertentu dan mengembalikan nilai yang diteruskan ke program utama untuk menyelesaikan execution.There adalah fungsi manipulasi string yang banyak dibangun ke VB2010 tapi aku akan hanya membahas beberapa di sini dan akan menjelaskan sisa mereka dalam pelajaran nanti.

8.2 (a) Len Fungsi

Fungsi panjang mengembalikan sebuah nilai integer yang panjang frase atau kalimat, termasuk ruang-ruang kosong. Formatnya adalah
en (Visual Basic) = 12 and Len (welcome to VB tutorial) = 22

Example 8.3
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label1.Text = Len(TextBox1.Text)

End Sub
End Class

Output:

Sandi Permana
18113221
2KA39

Tulisan 9
Teori Organisasi Umum 1#
Budi Utami, S.E

0 comments :