. =+1:y=+2.
VBA , :
- ( , );
- , ;
- , .
,
, .
1. If Then Else .
: If Then [ Else _else].
True, ( ) Then, False, ( ) Else. Else . :
If Then
[]
[ElseIf -n Then
[_elseif]
[Else
[_else]]
End If.
2. Select Case .
: Select Case
[Case __1
[-1]]
[Case __n
[-n]]
[Case Else
[_else]]
End Select.
-n ( ) , , __n.
_else ( ) , , Case.
1. For - Next ().
: For = To [Step ]
<>
[ Exit For ]
<>
Next [].
For - Next , . , 1. Exit For , .
2. For Each-Next , , .
: For Each In
<>
Exit For
<>
Next <>
Exit For.
3. Do Until-Loop .
: Do Until
<>
Exit Do
<>
Loop.
, . , . Exit Do.
|
|
4. Do - Loop While .
: Do
<>
Exit Do
<>
LoopWhile <>
, True. , , , . Exit Do.
5. Do While-Loop .
: Do While <>
<>
Exit Do
<>
Loop.
, True. , . Exit Do.
6. Do Loop Until .
: Do
<>
Exit Do
<>
Loop While <>
, True. , , , . Exit Do.
7. While-Wend .
: While <>
<>
Wend.
, True.
, . VBA- , (, , . .26) .
VBA Sub() Function (). , .. Sub () , , .. Function () .
, , . , (.. ) .
: [Private|Public][Static]Sub _
[()]
[]
[Exit Sub]
[]
End Sub.
:
Private , Sub , .
Public , Sub .
Static , Sub .
.
, , Sub . .
, Sub. Exit Sub Sub.
:
|
|
[Optional][ByVal|ByRef][ParamArroy][()]_
[As ][=].
Optional , , . , Optional, Variant.
ByVal , .
ByRef , . ByRef VBA .
ParamArroy , ByVal, ByRef Optional.
.
, ; Integer, Long, Currency, Single, Double, String ( ), Object, Variant, Date, Byte, Boolean.
, . Optional. Object, Nothing.
(Function) , Sub, , , . Function , Sub. Sub, , Function , , , Sin.
Function , . .