以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]该窗体名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78589)
--  作者：huhu
--  发布时间：2015/12/12 10:39:00
--  [求助]该窗体名称
Dim kcgljm As WinForm.Form = Forms("库存管理界面")
Dim kwxz As WinForm.ComboBox = e.Form.Controls("ComboBox1")
If Forms("库存管理界面").Opened = True Then
    If e.Sender.Text = "31" Then
        kcgljm.text = "成品库管理界面"
    End If
End If
--  作者：huhu
--  发布时间：2015/12/12 10:53:00
--  
改好了。本来就是对的。
看来又混了个积分。童狐了。