下面是一段vba的代码:其中a&是何意?为何要有这个&符号?
Private Declare Function KillTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long) As Long
Private Declare Function SetTimer Lib "user32" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
Option Explicit
Public a&
Private Sub UserForm_Activate()
WebBrowser1.Navigate2 ThisWorkbook.Path & "\1111.html"
a = SetTimer(0, 0, 100, AddressOf CloseMessageTimerProc)
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
KillTimer 0, a
End Sub
- æå¼å§msg没æå
容ã
éåå°A1æ¶ï¼msg = msg & Chr(10) & nm.Parent.Address(0, 0)ï¼å³msgçäºï¼æ¢è¡ç¬¦+A1ï¼ã
éåå°C1æ¶ï¼msgçäºï¼æ¢è¡ç¬¦+A1+æ¢è¡ç¬¦+C1ï¼ã
æåè¾åºMsgBox "以ä¸åå æ ¼ææ¹æ³¨:" & msg ã
å°±æ¯ä¸å¾éçï¼ä»¥ä¸åå æ ¼ææ¹æ³¨:+æ¢è¡ç¬¦+A1+æ¢è¡ç¬¦+C1ï¼ã
表示变量a为长整型
VB6中其它类型如下:
类型 符号
Integer %
Long &
Single !
Double #
Currency @
String $本回答被提问者和网友采纳
表示变量a为长整型
2.VB6中其它类型符号如下:
类型 符号
Integer %
Long &
Single !
Double #
Currency @
String $
“&”符号通常用于文本和变量之间的连接,例如range("A1:A"&a),a=2就表示Range("A1:A2");a=10就表示Range("A1:A10")……通过变量a和连接符号就达到了动态调用单元格的作用。
excel文档中也可以类似的使用"&"符号,尤其是需要动态调用单元格时。例如B1单元格输入x时,我们需要调用A列第x行的单元格的值,那么使用"A"&B1就得到了"Ax",但这是文本格式的字符,还需要用indirect函数,=indirect("A"&B1)就达到了目的。(当然还可以用address函数就不用使用&符号了)。再举个例子,比如A列是姓,B列是名,我们可以通过=A1&B1得到姓名。