MID(String,1,3) burada en soldaki 1.karakterden sonraki 3 harfi alarak yeni bir string oluşturduk.Örnek kod yazalım ;
Private Sub Command1_Click()
Dim rapboy, yenistring
rapboy = "Vatanın Sanal Kalesi Cyber-warrior.org’dur "
yenistring = Mid(rapboy, 1, 21)
MsgBox yenistring
End Sub
Rapboy ve yenistring adında 2 yeni string tanımladım.Rapboy un ne olduğunu belirledim ve yeni stringin ise rapboyun solundaki ilk karakterden 21 karakter sonrasına kadar olan kısmını aldırdım ve msgbox ile gösterdim.Bakınız program calıştığında ;
Hesapladık ve sonuç:)
INSTR Komutu; .Kesin koşula bağlanmayan yapılarda kullanılır.Değişken ne olursa olsun o değişkende sizin belirlediğiniz stringi arar.Bulurs a 1 bulamazsa 0değerini döndürür.İstersek bizim belirlediğimiz bir yazıda döndürebilir.Örneğin ; Çok basit bir sohbet örneği yapalım.Form Gereçleri ; 1 Adet Label Name :Label1, 1adet Textbox Name : Text1, 1 adet Buton Name : Command1.
Kodlar ;
Private Sub Command1_Click()
If InStr(1, Text1.Text, "selam") Then
Label1.Caption = "Aleyküm Selam Kardeşim."
ElseIf InStr(1, Text1.Text, "rapboy") Then
Label1.Caption = "VB 6.0 Konusunda dersler veren Güzel Kardeşimiz:)"
ElseIf InStr(1, Text1.Text, "Cyber-warrior") Then
Label1.Caption = "Türkiyenin En Büyük Siber Savunma Gücünden mi Bahsediyorsun oo:)"
Else
Label1.Caption = "Tanımlanmamış Yazı"
End If
End Sub
Kodların Açıklamaları ; Text1 bizim değişkenimiz.text1 de yazılanın ilk (1.karakter) karakterinden itibaren tamamında ikinci olarak belirttiğim stringi ara.Bulursan Label1 e yazı yaz.Çalıştıralım.Sonucu görelim.Text1 e rapboy veya Cyber-warrior ile ne yazarsanız yazın o sadece belirlediğimiz stringlere göre işlem yapacak onları arayacaktır.
LEN Komutu ; Basit bir kod olup stringin kaç karakterden oluştuğunu hesaplayan koddur.Örneğin
Len("Cyber Warrior") ifadesinde kodun geri dönüşü 13 olacaktır çünkü ifade boşluk dahil 13 karakter içeriyordur.
LCASE ve UCASE Komutları ; LCASE stringin tamamını küçük UCASE ise stringin tamamını büyük harfe çevirir.Kullanım şekilleri aynıdır.
LCase("RAPBOY") Yazdığımızda programın bize dönüşü ; rapboy şeklinde olacak ve aynı şekilde
UCASE("rapboy") Yazdığımızda program bize RAPBOY şeklinde geri dönecektir.
LİKE Operatörü ; İşte Güzel bir Komut :) Bulanık arama methodu.Çok net olmayan aramalarda kullanılır.Genelde Database lerde arama yapmak içinde kullanılır.Database konularında mutlaka değineceğimiz bir koddur.
Sembolleri vardır ;
Örnek Kod yazalım ;
r=("#####"like "246810") şeklindeki bir atamanın sonucunda r Tru(Dogru) degerini alacaktır.
a=("[Rapboy]"like"67895") atamasının sonucunda a’nin degeri False(Yanlıs) olacaktır.Cünkü rapboy un içinde rakamları arayacaktır ve bulamayacaktır.
p=("[!abcde]"like "67895") atamasının sonucunda ise, p’nin değeri True(Dogru) olacaktır.çünkü listede bu karakterler yoktur.
TRIM FONKSİYONU Ve Kullanımı ; Çoğu zaman ve çoğu yerde arayacağımız bir kod olabilir.Çünkü Stringin Sağ ve Sol tarafındaki Tüm Boşlukları yok eder bu kod.Örneğin ;
Trim(" Rapboy ") Yazdığımızda Tüm Boşluklar silinir ve sadece rapboy kalır.Değişkene atayabiliriz.Text1.text gibi
LTRIM ve RTRIM komutları Stringin sadece sol ve sağ tarafındaki boşlukları yok eder.