在代码中拆分和合并语句

在代码中拆分和合并语句

将单个语句拆分为多行

编写代码时，有时会创建一些很长的语句，使得您必须在代码编辑器中水平滚动。虽然这并不影响代码的运行，但会影响代码的阅读。
在这种情况下，应该考虑将单个长语句拆分为几行。
在要将该行断开的位置处使用行继续符，它是一个下划线 (_)，该下划线必须紧跟在空格后，并且在它后面紧跟行终止符（回车）。

例如：

If e.name = "成绩" Then
e.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
e.ProjectPath & "成绩数据.mdb;Persist Security Info=False"
End If

上面的代码完全等效于：

If e.name = "成绩" Then
e.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & e.ProjectPath & "成绩数据.mdb;Persist Security Info=False"
End if

再例如：

Dim s As String
s = "新华网绵阳5月16日电(记者孙承斌)16日上午,在四川抗震救灾的" & _
    "危急时刻,中共中央总书记、国家主席、中央军委主席胡锦涛乘飞机赶往四川" & _
    "省地震灾区,慰问灾区干部群众,看望奋战在抗震救灾第一线的部队官兵，公" & _
    "安民警和医护人员,指导抗震救灾工作。"

注意:

行继续符必须是一行上最后的字符，在同一行上，行继续符后不能跟有任何其他内容。
单个参数名必须保持完整，不能在参数名中间使用行继续符
不能使用行继续符来拆分注释，注释开始后，编译器将不检查字符是否具有特殊含义。要将注释拆分为多行，请在每行的前面重复使用注释符号 (')。

将多个语句置于同一行

虽然我们的建议是让每条语句各占一行，但是Visual Basic同样允许在同一行上放置多条语句。
用冒号 (:) 将各语句分开，如下面的示例所示：

text1.Text = "Hello" : text1.BackColor = System.Drawing.Color.Red

上面的代码等效于：

text1.Text = "Hello"
text1.BackColor = System.Drawing.Color.Red

本页地址：http://www.foxtable.com/webhelp/topics/2123.htm