MID FONKSİYONU ; Mid Fonksiyonu bir stringin en solundan belirtilen karakterden
belirtilen karakter kadarını alarak yeni bir string oluşturur.Örnek
kullanımı ;
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 1bulamazsa 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.
|
Hiç yorum yok:
Yorum Gönder