A Visual Basic nyelv GUI felületre szánt nyelv.
print "Helló Világ"
A változókat deklaráció nélkül egyszerűen leírom és értéket adok neki:
a = 35
s = "piros"
A változók deklarálhatók is típussal:
Dim a As Double a = 3.57
Print Abs(-9)
szog = 30
pi = 4 * Atn(1)
Print Sin(szog * pi / 180)
a = Rnd
Print a
Kockadobás:
kockaDobas = Int(Rnd * 6) + 1
Print kockaDobas
Aritmetikai operátorok | |
---|---|
operátor | művelet |
+ | összeadás |
- | kivonás |
* | szorzás |
/ | osztás |
\ | egész osztás |
^ | hatványozás |
mod | modulus (maradék) képzés |
a = InputBox("Szám")
a = 5 If a > 3 Then Print "Nagyobb" End If
a = 2 If a > 3 Then Print "Nagyobb" Else Print "Kisebb" End If
Több ágú szelekció:
a = 2 If a = 2 Then Print "kettő" ElseIf a = 3 Then Print "három" ElseIf a = 4 Then Print "négy" Else Print "ismeretlen" End If
For i = 1 To 10 Print "sárga" Next
i = 0 While i < 10 Print i i = i + 1 Wend
Dim tomb(4) tomb(0) = 35 tomb(1) = 47 tomb(2) = 28 tomb(3) = 23 tomb(4) = 72 Print tomb(4)
tomb = Array(35, 47, 28, 23, 72)
Print tomb(4)
s = "piros" meret = Len(s) Print meret
s = "peti:gabi:tomi:jani" tomb = Split(s, ":") Print tomb(0)