以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  红袍老师，这段代码有问题，会不会产生冲突？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84912)
--  作者：scofields
--  发布时间：2016/5/12 21:41:00
--  红袍老师，这段代码有问题，会不会产生冲突？
ApplicationMenu.visible = False
basemainform.icon = Nothing
basemainform.showicon = False
If User.Group <> "发运地磅" Then
    Tables("JHS").visible =True
Tables("FAJHB").visible =True
Else
    Tables("JHS").visible =False
    Tables("FAJHB").visible =True
End If
If User.Group ="发运地磅" Then
Forms("发运地磅").open()
ElseIf User.Group="销售开票" 
forms("窗口2").open()
End If
CurrentTable.DataTable.LoadTop = "100 percent"
If User.Group = "销售开票"  Then
    DataTables("JHS").LoadFilter =""
    DataTables("FAJHB").LoadFilter =""
Else
    DataTables("JHS").LoadFilter = "客户名 = \'" & User.Name & "\'"
    DataTables("FAJHB").LoadFilter = "客户名 = \'" & User.Name & "\'"
End If
--  作者：大红袍
--  发布时间：2016/5/12 23:17:00
--  

 什么意思？什么冲突，什么问题？

 

 你逻辑是什么，要做什么功能？
--  作者：scofields
--  发布时间：2016/5/13 9:37:00
--  
主要是看代码有没有问题？
--  作者：大红袍
--  发布时间：2016/5/13 9:59:00
--  
代码不报错，就是没问题。只要能实现你的逻辑，代码也没问题。