vba中冒号的作用

关于冒号的用法：

1:如果你在单独行写上

x:

那么就是一个行号标识用于goto时跳转寻找的位置

例:

Private Sub Command1_Click()

On Error GoTo Err_Handle

Dim a As Integer

Dim b As Integer

Dim c As Integer

a = 10

b = 0

c = a / b '除数为0会导致运行时错误

MsgBox c

End Sub

Err_Handle:

MsgBox Err.Description

End Sub

2

:= 给参数赋值

如

MsgBox Title: ='警告!', Prompt: ='打印吗?'

3

用于连接两句语句

语句1:语句2:语句3:语句

例:

a = 1: b = 1: c = 1

关于冒号的用法：

1:如果你在单独行写上

x:

那么就是一个行号标识用于goto时跳转寻找的位置

例:

Private Sub Command1_Click()

On Error GoTo Err_Handle

Dim a As Integer

Dim b As Integer

Dim c As Integer

a = 10

b = 0

c = a / b '除数为0会导致运行时错误

MsgBox c

End Sub

Err_Handle:

MsgBox Err.Description

End Sub

2

:= 给参数赋值

如

MsgBox Title: ='警告!', Prompt: ='打印吗?'

3

用于连接两句语句

语句1:语句2:语句3:语句

例:

a = 1: b = 1: c = 1