13518219792
把BC的情况写在一起,如下 Dim A As Integer = 0
成都创新互联公司坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站建设、网站建设、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的宜章网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
Dim B As String = "111"
Dim C As String = "222"
If A = 0 Then
MsgBox(B)
MsgBox(C)
End If
If语句的用法如下：
If 条件 Then
语句组
End If
当 条件的值为True，执行“语句组”，否则就不执行“语句组”。
if语句的一种格式如下：
例1：
x = 100
If x 5 Then '这里你要理解因为x=100，所以对于 x 5的判断结果为True
Print "Ok"
End If
这个代码结果，输出"Ok"。
以上代码就是：“如果x大于5，就输出OK”
例2：
x = 100
If Not x 5 Then '这里因为x=100，所以对于 x 5的判断结果为False,而Not False又为True
Print "Ok"
End If
这个代码结果，输出还是"Ok"。
以上代码就是：“如果不是x小于5，就输出OK”
比较两句“x大于5”与“不是x小于5”其实是一个意思。
扩展资料：
VB的一些基础函数：
Abs：返回数的绝对值。
And：执行两个表达式的逻辑连接。
Array：返回含一数组的变体 。
Asc：返回字符串首字母的 ANSI 字符代码。
Atn：返回数的反正切值。
CBool：返回已被转换为 Boolean 子类型的变体的表达式。
CByte：返回已被转换为字节子类型的变体的表达式。
CCur：返回已被转换为货币子类型的变体的表达式。
CDate：返回已被转换为日期子类型的变体的表达式。
CDbl：返回已被转换为双精度子类型的变体的表达式。
Chr：返回指定 ANSI 字符码的字符。
CInt：返回已被转换为整数子类型的变体的表达式。
Class：提供对已创建的类的事件的访问。
Clear：清除 Err 对象的所有属性设置。
CLng：返回已被转换为 Long 子类型的变体的表达式。
#If...Then...#Else 指令
根据条件编译选定的 Visual Basic 代码块,需要有#Const 配对，一般要先用#Const 定义条件编译器常量
'以下是例子
Module Module1
#Const i = 60
Sub Main()
#If i 30 Then
Console.WriteLine("???") '如果用#Const定义了i，该句语句才会执行，假如用的是private i as integer=60定义，该语句不会被执行
#End If
End Sub
End Module
