新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
就是访问子窗体内的控件吧,如果你的窗体真的是子窗体,你智能感知.forms下看有没有它,否则只是个控件,用.controls集合去访问到它,它里面的控件也是如此访问和操作,就是me.controls(xxx).controls(yyy).visible=true之类的方法。 奉劝你最好使用主窗体为MDI。
成都创新互联公司为您提适合企业的网站设计 让您的网站在搜索引擎具有高度排名,让您的网站具备超强的网络竞争力!结合企业自身,进行网站设计及把握,最后结合企业文化和具体宗旨等,才能创作出一份性化解决方案。从网站策划到成都网站建设、做网站, 我们的网页设计师为您提供的解决方案。
Dim bt As New ArrayList
bt.Add(Me.Button5)
bt.Add(Me.Button6)
bt.Add(Me.Button7)
上面这段代码本人表示不懂,故没有使用。下面的代码在VS2015中运行通过:
Private Sub btClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click, Button6.Click, Button7.Click
Select Case CType(sender, Button).Name
Case "Button5"
MessageBox.Show("你点击了 Button5 按钮")
Case "Button6"
MessageBox.Show("你点击了 Button6 按钮")
Case "Button7"
MessageBox.Show("你点击了 Button7 按钮")
End Select
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
m = m + 1
n = m.tostring
TextBox1.Text = n
End Sub
m=m+1
n = m.tostring
textbox1.text = n
把这几句原来在button2 click事件里面的代码,直接写在 timer事件里面,把timer的Enabled属性设置为True, Interval属性设置为1000,就可以了。
有两种方法:
1、
Dim a As New System.EventArgs()
Dim b As New System.Object()
Button1_Click(a, b)
2、
Button1.Pr……Click(中间那一段忘记了,是在“全部”里面的方法,请补充下)