编程代码vb

作者:365betapp投注   时间:2019-03-15 06:35
展开全部
PrivateSubCommand1_Click()我在第一个窗口。
隐藏表格2。
ShowEndSubPrivateSubForm_Load()给我。
Caption = PrivateSubCommand1_Click()在第一个EndSub窗口的第二个窗口中。
隐藏表格3。
ShowEndSubPrivateSubCommand2_Click()给我。
HideForm1。
ShowEndSubPrivateSubForm_Load()命令1。
有效= FalseMe
Caption =第二个窗口EndSubPrivateSubOption1_Click()IfOption1。
值= TrueThenCommand1
有效值= TrueEndIfEndSubPrivateSubOption2_Click()IfOption2。
值= TrueThenCommand1
Enabled = FalseEndIfEndSub PrivateSubCommand1_Click()UnloadForm1UnloadForm2UnloadForm3MsgBox的第三个窗口完成了EndSubPrivateSubCommand2_Click()我。
隐藏表格2。
ShowEndSubPrivateSubForm_Load()给我。
Caption =第三个EndSub窗口