关于vb中菜单中的问题 if isnull(user) then menu.enable=false 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在菜单的窗体LOAD中IF USER="" THEN MNU1.ENABLE=TRUE或者 MNU1.VISIBLE=TRUEELSE MNU1.ENABLE=FALSE或者 MNU1.VISIBLE=FALSEEND IF 我一般用个长长的字符来代替的 一个字节代表一种权限比如 :qx="00011100010011110"if mid(qx,2,1)="0" then mdiform1.menu_about.Enabled =False '假设A,B,C,...对应菜单上的各个相应要改变的菜单项If Trim(user) <> "" Then A.Enabled = True B.Enabled = True C.Enabled = True '......Else A.Enabled = False B.Enabled = False C.Enabled = False '......End If If IsNull(user) ThenMenuItem.Enabled=FalseElseMenuItem.Enabled=TrueEnd If 你们的方法我觉得到是可以了,可是这个代码应该放在哪里呢,我想不能放在form_load中吧,应该是针对这个变量的存在而随时变化,请问应该如何操作 怎样使用vbs脚本实现同一个文件夹下的文件的合并? 你们说 再来一个?WORD2007 组合对象如何设置排版格式为嵌入式 vb6 datagrid新增一行时,报错:无法将null值...... mscomm 求助,望高手帮助! vba中怎么判断WORD的当前窗口是不是处于“设计模式”? 悼念工程师! 怎样设置程序的优先级? 一个问题!请教各位! 再问?如何用VB在outlook 2000的新邮件编辑窗口中增加自己定义CommandBar和CommandButton,请教. 关于VB控制EXCEL的问题 请问大家一个sql查询问题
IF USER="" THEN
MNU1.ENABLE=TRUE或者
MNU1.VISIBLE=TRUE
ELSE
MNU1.ENABLE=FALSE或者
MNU1.VISIBLE=FALSE
END IF
我一般用个长长的字符来代替的 一个字节代表一种权限
比如 :
qx="00011100010011110"
if mid(qx,2,1)="0" then mdiform1.menu_about.Enabled =False
A.Enabled = True
B.Enabled = True
C.Enabled = True
'......
Else
A.Enabled = False
B.Enabled = False
C.Enabled = False
'......
End If
MenuItem.Enabled=False
Else
MenuItem.Enabled=True
End If