把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
售后响应及时
7×24小时客服热线数据备份
更安全、更高效、更稳定价格公道精准
项目经理精准报价不弄虚作假合作无风险
重合同讲信誉,无效全额退款