在代码中拆分和合并语句
将单个语句拆分为多行
编写代码时,有时会创建一些很长的语句,使得您必须在代码编辑器中水平滚动。虽然这并不影响代码的运行方式,但是影响代码的阅读。
在这种情况下,应该考虑将单个长语句拆分为几行。
在您要将该行断开的位置处使用行继续符,它是一个下划线 (_),该下划线必须紧跟在空格后,并且在它后面紧跟行终止符(回车)。
例如:
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日上午,在四川抗震救灾的" & _
"危急时刻,中2共中央总书!记、国家主席、中央军委主席胡涛乘飞机赶往四川" & _
"省地震灾区,慰问灾区干部群众,看望奋战在抗震救灾第一线的部队官兵,公" & _
"安民警和医护人员,指导抗震救灾工作。"
注意:
行继续符必须是一行上最后的字符,在同一行上,行继续符后不能跟有任何其他内容。
单个参数名必须保持完整,不能在参数名中间使用行继续符
不能使用行继续符来拆分注释,注释开始后,编译器将不检查字符是否具有特殊含义。要将注释拆分为多行,请在每行的前面重复使用注释符号 (')。
将多个语句置于同一行
虽然我们的建议是让每条语句各占一行,但是Visual Basic同样允许在同一行上放置多条语句。
用冒号 (:) 将各语句分开,如下面的示例所示:
text1.Text = "Hello" : text1.BackColor = System.Drawing.Color.Red
上面的代码等效于:
text1.Text = "Hello"
text1.BackColor = System.Drawing.Color.Red