si se continua programul cu instructiunile care urmeaza dupa EndIf.
Daca este falsa se executa secventa de instructiuni si se continua programul cu instructiunile care urmeaza dupa EndIf.
-
Select Case expresie
Case valoare1
Instrucţiune1
Case valoare2
Instrucţiune 2
...
Case Else
Instrucţiune
End Select
Structuri repetitive
For ... Next
Cea mai ultilizată structură de acest tip este realizată cu instrucţiunea For ... Next care realizează repetarea unei secvenţe de instrucţiuni, numărul de repetări fiind determinat de valorile pe care le poate lua o variabil ă contor pe un domeniu dat de valori :
For contor = valinit To valfin [Step pas ]
[blocinstr ]
[Exit For]
[blocinstr ]
Next [contor ]
Do ... Loop
Do [f While | Until g exprcond ]
[blocinstr ]
[Exit Do]
[blocinstr ]
Loop
sau:
Do
[blocinstr ]
[Exit Do]
[blocinstr ]
Loop [f While | Until g exprcond ]
Aici exprcond este o expresie relaţional ă sau logic ă. Ciclul construit cu While se va relua atâta timp cât exprcond are valoarea True, iar ciclul construit cu Until va fi reluat pân ă când exprcond primeşte valoarea True .
Proceduri functii
O procedura functie (sau simplu o functie) este o secventa de instructiuni care efectueaza o anumita operatie într-un program si returneaza o valoare. O functie începe cu instructiunea Function si se termina cu instructiunea End Function.
În Visual Basic exista o serie de functii predefinite printre care:
Funcţii matematice
-
Abs(expr ) valoarea absolut ă
-
Int(expr ) trunchiere la intregul imediat inferior
-
Fix(expr ) trunchiere la partea întreaga
-
Sgn(expr ) funcţia semn : returneaz ă §1 sau 0
-
Sqr(expr ) radical
-
Log(expr ) logaritmul natural
-
Exp(expr ) exponenţiala
-
Sin(unghi ) sinusul unghiului
-
Cos(unghi ) cosinusul unghiului
-
Tan(unghi ) tangenta unghiului
Funcţii folosite pentru date şi timp
Date()
|
Data de astăzi
|
Time()
|
Timpul actual
|
Now()
|
Data şi timpul actual
|
Weekday(data)
|
Ziua din săptămână
|
Year(data)
|
anul
|
Month(data)
|
luna
|
Day(data)
|
ziua
|
Hour(data)
|
ora
|
Minute(data)
|
minutele
|
WeekdayName(nr)
|
Scrie ziua
|
DateSerial(an,luna,zi)
|
Modifică în dată
|
DateValue(data)
|
Numărul zilelor din data de 1899.12.30
|