Office中国论坛/Access中国论坛

标题: 下面这些代码是什么意思？ [打印本页]

作者: silence810 时间: 2008-4-26 11:43
标题: 下面这些代码是什么意思？
Dim stDocName As String
stDocName = ChrW(31995) & ChrW(32479) & ChrW(26435) & ChrW(-27056) & ChrW(46) & ChrW(21002) & ChrW(29289) & ChrW(22522) & ChrW(26412) & ChrW(-29372) & ChrW(26009) & ChrW(31649) & ChrW(29702)
DoCmd.RunMacro stDocName

作者: Dragxixi 时间: 2008-4-26 11:57
........确实看不懂!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

作者: andymark 时间: 2008-4-26 12:02
系统权限.刊物基本资料管理

作者: andymark 时间: 2008-4-26 12:03
把上面代码直接用debug.print或msgbox 就知道啦
debug.print ChrW(31995) & ChrW(32479) & ChrW(26435) & ChrW(-27056) & ChrW(46) & ChrW(21002) & ChrW(29289) & ChrW(22522) & ChrW(26412) & ChrW(-29372) & ChrW(26009) & ChrW(31649) & ChrW(29702)

作者: silence810 时间: 2008-4-26 13:24
我这样写对吗？可提示说缺少表达式
Private Sub Form_Load()
me.Label1.Caption = Debug.Print ChrW(31995) & ChrW(32479) & ChrW(26435) & ChrW(-27056) & ChrW(46) & ChrW(21002) & ChrW(29289) & ChrW(22522) & ChrW(26412) & ChrW(-29372) & ChrW(26009) & ChrW(31649) & ChrW(29702)
End Sub

作者: andymark 时间: 2008-4-26 13:43
me.Label1.Caption = ChrW(31995) & ChrW(32479) & ChrW(26435) & ChrW(-27056) & ChrW(46) & ChrW(21002) & ChrW(29289) & ChrW(22522) & ChrW(26412) & ChrW(-29372) & ChrW(26009) & ChrW(31649) & ChrW(29702)

作者: silence810 时间: 2008-4-26 14:29
谢谢，可以显示出来了。可我还是不太明白，如果我只知道 “系统权限.刊物基本资料管理” 如何得到 ChrW(31995) & ChrW(32479) & ChrW(26435) & ChrW(-27056) & ChrW(46) & ChrW(21002) & ChrW(29289) & ChrW(22522) & ChrW(26412) & ChrW(-29372) & ChrW(26009) & ChrW(31649) & ChrW(29702) 这一大串的东西呢？

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)