现一窗口form1里有11个按钮分别为cmd1,cmd2……cmd10,
若在form2中有一个文本框和一个botton1,若在文本框里输入5,按botton1后,则comd5……cmd10按钮无效或者不可见
代码如何写啊
小弟第一天注册,麻烦各位强人百忙中看看,万分感激啊。
若在form2中有一个文本框和一个botton1,若在文本框里输入5,按botton1后,则comd5……cmd10按钮无效或者不可见
代码如何写啊
小弟第一天注册,麻烦各位强人百忙中看看,万分感激啊。
private sub button1_click()
if text1.text="5" then
form1!cmd5.visible=false
form1!cmd6.visible=false
form1!cmd7.visible=false
form1!cmd8.visible=false
form1!cmd9.visible=false
form1!cmd10.visible=false
end if
end sub
For i = 0 To n - 1
form1.Command1(i).Visible = True
Next i
For j = n To 200
form1.Command1(j).Visible = False
Next j
Unload Me
End If