大哥门啊~~~救命啊~~~
来源:百度知道 编辑:UC知道 时间:2024/06/07 00:26:17
form1的程序:
Private Sub Command1_Click()
Form1.Hide
Form2.Show 继续按钮的程序
End Sub
Private Sub Command2_Click()
End 结束按钮的程序
End Sub
form2的程序:
Private Sub Command1_Click()
If Option1 Then
Form4.Show 单选的按钮程序
End If
If Option2 Then
Form5.Show
End If
If Option3 Then
Form6.Show
End If
End Sub
Private Sub Command2_Click()
Form2.Hide
Form1.Show 返回的按钮程序
End Sub
form3的程序:
Private Sub Command1_Click()
Form3.Hide
Select Case List.Index
Case 0
Form4.Show
Case 1
Form5.Show 建立的list1选择框的选择程序文件
Case 2
Form6.Show
End Select
End Sub
Private Sub Command2_Click()
Form2.Hide
Form1.Show 返回的按钮程序设计
End Sub
Pr
Private Sub Command1_Click()
Form1.Hide
Form2.Show 继续按钮的程序
End Sub
Private Sub Command2_Click()
End 结束按钮的程序
End Sub
form2的程序:
Private Sub Command1_Click()
If Option1 Then
Form4.Show 单选的按钮程序
End If
If Option2 Then
Form5.Show
End If
If Option3 Then
Form6.Show
End If
End Sub
Private Sub Command2_Click()
Form2.Hide
Form1.Show 返回的按钮程序
End Sub
form3的程序:
Private Sub Command1_Click()
Form3.Hide
Select Case List.Index
Case 0
Form4.Show
Case 1
Form5.Show 建立的list1选择框的选择程序文件
Case 2
Form6.Show
End Select
End Sub
Private Sub Command2_Click()
Form2.Hide
Form1.Show 返回的按钮程序设计
End Sub
Pr
汗。。。。
If Option1 Then
Option1是控件名字 后面小数点加对象名。。。。
比方说 TEXT=123456 是错的 就不能这么写 要写成:
TEXT.TX=123456
这样文本框的内容才变。。。。。