Berikut ini kita akan membahas beberapa fungsi yang berhubungan dengan nilai string.
1. Left
Fungsi ini untuk mengambil beberapa karakter dari sebelah kiri nilai string.
Sintaks :
Left(string, n)
String adalah karakter string, n adalah jumlah karakter yang akan dihasilkan.
Contoh:
Print Left("Visual", 3)
Output : Vis
2. Right
Fungsi ini untuk mengambil beberapa karakter dari sebelah kanan nilai string.
Sintaks :
Right(string, n)
String adalah karakter string, n adalah jumlah karakter yang akan dihasilkan.
Contoh:
Print Right("Visual", 3)
Output : ual
3. Mid
Gunakan fungsi ini untuk mendapatkan karakter ditengah-tengah sebuah string.
Sintaks :
Mid(string, m, n)
string adalah karakter string, karakter yang dihasilkan mulai dari karakter ke m, dan n adalah jumlah karakter yang dihasilkan.
Contoh :
Print Mid("Visual", 3, 2)
Output : su
4. Len
Fungsi Len untuk menghutung jumlah karakter string.
Contoh :
Private Sub cmdCount_Click()
Dim str As String
str = "Visual Basic"
Print Len(str)
End Sub
Output : 12
5. InStr
Fungsi InStr mengembalikan angka posisi dari sub-string yang terdapat pada sebuah string.
Sintaks:
Instr(str1, str2)
Contoh :
Dim str As String
str = "Visual Basic"
Print InStr(str, "Basic")
Output : 8
6. Chr & Asc
Fungsi Chr mengkonversi nilai ASCII ke karakter dan fungsi Asc mengkonversi karakter ke nilai ASCII.
Sintaks :
Chr(ASCII value)
Asc(chr)
Contoh :
Print Chr(65)
Output : A
Print Asc("A")
Output : 65
Chr(9) and chr(13) adalah karakter Tab dan Penambah baris baru (enter).
Print "Hello" & Chr(9) & "world"
Output : Hello world
Print "Hello" & Chr(13) & "world"
Output :
Hello
world
7. Str
Untuk menggunakan angka sebagai string gunakan fungsi Str.
Sintaks :
Str(n)
Contoh :
Print str(5) + str(7)
Output : 57
8. LCase & UCase
Fungsi LCase untuk mengubah karakter menjadi huruf kecil dan fungsi UCase untuk mengubah karakter menjadi huruf kapital.
Contoh:
Private Sub cmdChangeCase_Click()
Dim s As String
s = "HELLO"
Print LCase(s)
End Sub
Output : hello
Contoh :
Dim s As String
s = "hello"
Print UCase(s)
Output : HELLO
9. Trim
Fungsi Trim adalah untuk menghilangkan spasi pada karakter string.
Contoh :
Dim s As String
s = " HEL LO"
Print Trim(s)
Output : HELLO
10. LTrim & RTrim
Fungsi Ltrim untuk menghilangkan spasi di awal string dan RTrim untuk menghilangkan spasi di akhir string.
Contoh :
Dim s As String
s = " HELLO"
Print LTrim(s)
Output : HELLO
Dim s As String
s = "HELLO "
Print RTrim(s)
Output : HELLO
11. StrReverse
Fungsi StrReverse adalah untuk membalikkan posisi karakter dalam string.
Contoh :
Print StrReverse("Basic")
Output : cisaB
12. Space
Fungsi Space menambahkan sejumlah karakter spasi.
Contoh:
Print Space(10) + "Basic"
Output : Basic
10 spasi sebelum Basic
13. StrConv
Fungsi StrConv adalah untuk mengkonversi karakter dalam string ke beberapa kondisi hurup kapital, huruf kecil, atau hurup besar di awal.
Contoh:
Print StrConv("hello", vbUpperCase)
Output : HELLO
Print StrConv("hello", vbProperCase)
Output : Hello
14. StrComp
Fungsi StrComp adalah untuk membandingkan 2 string apakah sama/sesuai atau tidak. Jika sama akan mengembalikan nilai 0 dan jika tidak 1.
Contoh:
str = StrComp("vb", "vb", vbTextCompare) 'Hasil 0
str = StrComp("vb", "VB", vbTextCompare) 'Hasil 0
str = StrComp("vb", "VB", vbBinaryCompare) 'Hasil 1
Jika parameter optional bernilai vbTextCompare maka huruf kapital atau kecil tidak berpengaruh, sementara jika bernilai vbBinaryCompare maka berpengaruh.
15. Tab
Fungsi tab adalah untuk menambahkan karakter Tab sejumlah tertentu.
The Tab(n) function lets the string be displayed at nth position.
Contoh :
Print Tab(20) ; "Language"
Output : Language
16. Replace
Fungsi Replace adalah untuk mencari bagian dari string kemudian menggantikan nya dengan karakter lainnya yang ditentukan.
Contoh:
newvalue = Replace("months", "s", "1")
Output: month1
Click here if you like this article.
2 Comments
Dim s As String
s = "Hello World"
jadi "HelloWorld" tanpa spasi ditengah
pake Trim(s)
ga bisa