:
1. , .
2. , , , - .
3. :
) ;
1 ( 2) | ? |
2 ( 3) | ? |
)
;
) , 2 - 4 (.1 ) ;
|
|
, ( ) .
4.
|
) ;
)
5. ) :
1 (2 ) | 2 (3 ) |
) ( ).
5. :
) .
) , , Private Sub CommandButton1_Click() End Sub
:
n=0 If OptionButton1.Value = True Then n = n + 1 End If OptionButton1.Value = False OptionButton2.Value = False OptionButton3.Value = False OptionButton4.Value = False SlideShowWindows(1).View.Next | -1 - - , False, - |
4. ,
.
5. 4. ! n=0. .
6. .
7. :
If OptionButton1.Value = True Then
|
|
n = n + 1
End If
OptionButton1.Value = False
OptionButton2.Value = False
OptionButton3.Value = False
OptionButton4.Value = False