为什么这个 IF-THEN 语句没有写 END IF 也能正常工作？

Question

3

我有一个关于 If 命令的问题。

For x = 2 To 8
If ComboBox1.ListCount < 7 Then ComboBox1.AddItem Cells(x, 13).Value
Next x'

为什么这段代码没有错误？它没有End if语句。我不知道这是否重要，但是这段代码在UserForm_Activate()过程中。

谢谢您的帮助。

- user3272905

2个回答

3

VBA（以及VB6和VB.Net）在代码行中跟随Then关键字的语句与该行末尾无需使用End If。

- mwolfe02

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- Jack · Accepted Answer

如果只有一条语句与If语句在同一行上，且被If语句包含，则不需要使用End If。