Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题：这句代码不起作用?
1楼
布莱克朱 发表于：2011/11/11 20:53:00
 Dim frm As WinForm.Form = Forms.ActiveForm
        Select frm.Name
            Case "协同办公","客服管理","仓库管理","报备管理","销售管理","财务管理"
                If forms(frm.Name).Opened Then
                    forms(frm.Name).Close
                    forms(e.sender.Text).Open
                End If
        End Select

2楼
布莱克朱 发表于：2011/11/11 21:08:00
明白了
错了一句代码.
共2 条记录, 每页显示 10 条, 页签: [1]
Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .05273 s, 2 queries.