Visual Basic 6 Kurs

Otrzymamy "Tekst"
Gdy chcemy uciąć spacje tylko z lewej lub prawej strony używamy odpowiednio LTrim
lub RTrim
Replace
Kolejna ważna funkcja, użycie jej wygląda następująco : tekst =
Replace(tekst,szukane,naco), zamienia to wszystkie szukane słowa no słowo naco,
przykład :
tekst = "To jest testowy tekst"
tekst = Replace(tekst,"jest","miał być")
Teraz nasz tekst wygląda tak : "To miał być testowy tekst". Zamieniliśmy napis "jest" na
"miał być".
Len
Zwraca nam ilość znaków w tekście
tekst = "Visual"
ile = Len(tekst)
Zwróci nam liczbę 6 bo napis Visual ma 6 znaków
InStr
Dzięki temu możemy dowiedzieć się gdzie w danym tekście leży dana litera/ciąg znaków,
wygląda to tak : InStr(start,tekst,litera). Start to miejsce od której litery chcemy szukać.
Przykład :
tekst = "koc"
pozycja = InStr(1,tekst,"c")
Zwróci nam pozycje litery czyli 3. Gdy chcemy znaleść kolejne c to musieli byśmy napisać
InStr(4,tekst,"c"), tyle że w wyrazie nie ma drugiego c i funkcja zwróci nam 0.
Val
Val zamienia tekst na liczbę (tylko do rozmiaru Long)
Dim Tekst As String
Dim Liczba As Long
Tekst = "-2390938"
Liczba = Val(Tekst)
Like
Jest to dosyć trudne polecenie, sprawdza ono poprawność znaków, zacznijmy od 1 litery:
litera = "C"
pop = litera Like "C"
C to C więc wartość true
pop = litera Like "[A-Z]"
Sprawdza czy C jest w przedziale od A do Z, jest czyli też true
pop = litera Like "[0-9]"
Sprawdza czy C jest cyfrą, nie jest czyli pop przyjmie wartość false
pop = litera Like "#"
Sprawdza czy C jest znakiem, czyli True
Przedziały sprawdzania mogą być dowolne np. [d-k], [4-9]. Teraz zajmijmy się
wyrazami:
wyraz = "Test"
pop = wyraz Like "T*"
Da nam True, ponieważ pierwszy znak to T i występuje po nim dowolna ilość znaków (*)
21