Основы офисного программирования и документы Word


Private Sub


Private Sub Man_Click() ManInBoat 'Call IntoBoat(Me.Man, StateOfMan)
End Sub
Private Sub Wolf_Click() WolfInBoat 'Call IntoBoat(Me.Wolf, StateOfWolf) End Sub
Private Sub Goat_Click() GoatInBoat 'Call IntoBoat(Me.Goat, StateOfGoat)
End Sub
Private Sub Cabbage_Click() CabbageInBoat 'Call IntoBoat(Me.Cabbage, StateOfCabbage)
End Sub
Листинг 6.4.
Закрыть окно
Содержание раздела