我的VB424错误，入门阶段

来源：百度知道 编辑：UC知道 时间：2024/05/29 20:17:32
Private Sub mnuAdduser_Click()
frmAdduser.Show
sbStatusBar.Panels(1).Text = "添加用户"

End Sub
就是想链接到另一个窗口去，不知道为什么会错啊
sbStatusBar.Panels(1).Text = "添加用户"
这句话是什么作用啊？

你把这句删掉 试试看，，链接到另个FORM 就是XX.SHOW就可以了，假如要把数据传过去的话 就这样，，在XX 窗体上建立一个文本框，，在
Private Sub mnuAdduser_Click()
xx.text1.text="添加用户"
xx.show
end sub

你上面的代码可以这样改：
第一种办法： 删掉 sbStatusBar.Panels(1).Text = "添加用户"
第二种办法： 新建个FORM 取名为sbStatusBar，然后在这个窗体上新建个文本框 取名为 Panels ,并且 文本框属性index 为1 就可以了
假如可以的话就可以给分了...
我的神，写到这里我才发现你没有分，郁闷ing...