赋值语句问题

小陈　发表于：2013-03-17 10:55:20 　

在本站看到的代码：

Dim ctl As Control
Dim varTemp As Variant

Set ctl = Forms!Contacts!HelpButton
If (Left(ctl.OnClick, 1) = "=") Then
varTemp = Eval(Mid(ctl.OnClick,2))
Else
DoCmd.RunMacro ctl.OnClick
End If

请问，代码中“= "="”表示什么意思？在什么情况下应用？

殷小宝发表于：2013-03-17 14:49:27

它就是等于号“=”，上面的意思是如果onclick中的左边第一个字符为“=”，那么从第二个字符截取。

小陈发表于：2013-03-17 15:09:25

明白，谢谢！

总记录：2篇页次：1/1 9 1 :

Access交流中心