下载文档原格式
vb中if语句块VB中的if语句用于根据条件来执行不同的代码块。
下面是十个关于VB中if语句的例子，每个例子都使用不同的条件和代码块来展示不同的情况。
1. 判断一个数是否大于10，如果是，则输出"这个数大于10"：```vbDim num As Integer = 15If num > 10 ThenConsole.WriteLine("这个数大于10")End If```2. 判断一个字符串是否为空，如果是，则输出"字符串为空"：```vbDim str As String = ""If String.IsNullOrEmpty(str) ThenConsole.WriteLine("字符串为空")End If```3. 判断一个数是否为偶数，如果是，则输出"这个数是偶数"，否则输出"这个数是奇数"：```vbIf num Mod 2 = 0 ThenConsole.WriteLine("这个数是偶数")ElseConsole.WriteLine("这个数是奇数")End If```4. 判断一个年份是否为闰年，如果是，则输出"这是一个闰年"，否则输出"这不是一个闰年"：```vbDim year As Integer = 2020If year Mod 4 = 0 And year Mod 100 <> 0 Or year Mod 400 = 0 ThenConsole.WriteLine("这是一个闰年")ElseConsole.WriteLine("这不是一个闰年")End If```5. 判断一个数是否为正数，如果是，则输出"这是一个正数"，否则输出"这不是一个正数"：```vbIf num > 0 ThenConsole.WriteLine("这是一个正数")ElseConsole.WriteLine("这不是一个正数")End If```6. 判断一个数是否为质数，如果是，则输出"这是一个质数"，否则输出"这不是一个质数"：```vbDim num As Integer = 7Dim isPrime As Boolean = TrueFor i As Integer = 2 To Math.Sqrt(num)If num Mod i = 0 ThenisPrime = FalseExit ForEnd IfNextIf isPrime ThenConsole.WriteLine("这是一个质数")ElseConsole.WriteLine("这不是一个质数")```7. 判断一个数是否在指定范围内，如果是，则输出"这个数在范围内"，否则输出"这个数不在范围内"：```vbDim num As Integer = 15If num >= 10 And num <= 20 ThenConsole.WriteLine("这个数在范围内")ElseConsole.WriteLine("这个数不在范围内")End If```8. 判断一个字符串是否包含指定的关键字，如果是，则输出"这个字符串包含关键字"，否则输出"这个字符串不包含关键字"：```vbDim str As String = "Hello, World!"Dim keyword As String = "World"If str.Contains(keyword) ThenConsole.WriteLine("这个字符串包含关键字")ElseConsole.WriteLine("这个字符串不包含关键字")```9. 判断一个数是否为零，如果是，则输出"这个数为零"，否则输出"这个数不为零"：```vbDim num As Integer = 0If num = 0 ThenConsole.WriteLine("这个数为零")ElseConsole.WriteLine("这个数不为零")End If```10. 判断一个数是否为正偶数，如果是，则输出"这是一个正偶数"，否则输出"这不是一个正偶数"：```vbDim num As Integer = 10If num > 0 And num Mod 2 = 0 ThenConsole.WriteLine("这是一个正偶数")ElseConsole.WriteLine("这不是一个正偶数")End If```以上是关于VB中if语句的十个例子，每个例子都展示了不同的条件和相应的代码块。
VB基本知识介绍条件语句1、单分支结构（1）单行语句If <表达式>Then <语句块>（2）多行语句If<表达式> Then<语句块>Endif2、双分支结构If <表达式 > Then<语句块1>Else<语句块2>Endif3、多分支结构If <表达式> Then<语句块1>Else if <表达式2> Then<语句块2>……..Else<语句块n>Endif选择语句Select case<变量>Case <值列表1><语句块1>Case <值列表2><语句块2>………Case <值列表n-1><语句块n-1>Case Else<语句块n>End select注意：case指定的<值列表>可以是下面的4种情形之一：1）具体的值或表达式，例如 case 12) 一组枚举表达式，例如 case 1,3,53) 表达式1 To 表达式2 ，例如 case 1 to 10 ‘变量的值为1~10，包括1和104) Is 关系运算符表达式，例如 case Is >0 …变量的值大于0循环语句1）For ……. Next 语句这种语句用于循环次数已经确定的循环结构For i=0 to 10Sum=sum+iNext i2）Do ……. Loop 语句a)Do While …….LoopDO While <表达式>循环体[Exit Do]Loopb)Do …… Loop whileDo循环体[Exit Do]Loop While <表达式>c)Do Until …… LoopDo Until <表达式>循环体[Exit Do]Loop程序运行时先判断执行条件<表达式>，当表达式为False时，执行该循环体，直到表达式为True 时，则终止循环d)Do….Loop UntilDo循环体[Exit Do]Loop Until <表达式>其它控制语句GoTo语句GoTo语句使程序无条件跳转到过程中指定的语句行执行。
Vb常用语句解析下面10条语句是最常用的语句，将指针移到上面按ctrl键单击可查看用法：包括功能、语法、参数、举例等。
1、Let（赋值语句即=）3、Dim语句7、If...Then...Else 语句21、Select case6、For...Next 语句19、While...Wend 语句15、Randomize 语句16、Rem 语句17、Static 语句18、Unload 语句1、Let（赋值语句即=）功能：将表达式的值赋给变量或属性。
语法[Let] varname=expressionLet语句的语法包含下面部分：2、call语句将控制权转移到一个Sub过程，Function过程，或动态连接库 (DLL)过程。
语法[Call] name [argumentlist]Call语句的语法具有以下几个部分：说明调用一个过程时，并不一定要使用Call关键字。
如果使用Call关键字来调用一个需要参数的过程，argumentlist 就必须要加上括号。
如果省略了Call关键字，那么也必须要省略argumentlis 外面的括号。
如果使用Call 语法来调用内建函数或用户定义函数，则函数的返回值将被丢弃。
若要将整个数组传给一个过程，使用数组名，然后在数组名后加上空括号。
3、Dim语句声明变量并分配存储空间。
语法Dim[WithEvents] varname[([subscripts])] [As[New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .Dim语句的语法包含下面部分：说明在模块级别中用Dim声明的变量，对该模块中的所有过程都是可用的。
在过程级别中声明的变量，只在过程内是可用的。
可以使用Dim语句在模块级或过程级中声明变量的数据类型。
例如，下面的语句声明了Integer 类型的变量。
Dim NumberOfEmployees As Integer也可以使用Dim语句来声明变量的对象类型。
VB语句集200句一.数据范例、变量、常量类Dim 模块级或进程级中声明变量Global 模块级中声明全局变量，private 成果与Dim雷同Static 进程级中声明静态变量Deftype 设置变量缺省范例Let或= 赋值Type …End Type 自定义范例Enum 定义罗列范例Lset、Rset 左或右对齐变量中的一字符串Const 声明用于代替笔墨量的常数二.步伐控制类End 结束步伐运行Stop 暂留步伐实行进入停止模式Goto 无条件转移If then else 根据条件选择实行某一分支语句块Select case 环境选择控制，选择实行某一语句块Do…loop 循环控制While wend 循环控制For…next 计数循环控制Exit forexit do 退出循环控件三.进程类Declare 语句用于在模块级中声明外部进程的引用Function 函数进程，文件名可带返回值Sub 进程Call 将控制权转移到一个Sub 进程，Exit function 退出Funtion进程Exit sub 退出Sub进程四.东西操纵类Load 把窗体或控件加载到内存中Unload 从内存中卸载窗体或控件Show/Hide 表现或隐蔽窗体With 在一个单一东西或一个用户定义范例上实行一系列的语句Redim 重新声辣大叔酱板鸭,常德酱板鸭明数组五.数组类Erase 重新初始化数据Option base 设置数组默认值为0或1Open 打于或创建文件六.文件操纵类Close 封闭(I/O) 文件Print # 、Write # 写次序文件Put# 写随机文件或二进制文件Input# Line Input# 次序文件中读出数据并将数据指定给变量Get# 将一个已打开的磁盘文件读入一个变量之中。
Reset 封闭全部用Open 语句打开的文件Seek 设置下一个读/写操纵的位置Chdrive 变化当前的驱动器Chdir 变化当前的目次或文件夹Mkdir 创建目次或文件夹Rmdir 删除目次或文件夹Kill 删除文件Lock、unlock 锁定或解锁文件记录Name 文件得定名On error 打开错误捕获七.错误捕获类Resume 在错误处理惩罚步伐结束后，恢复兴复兴有的运行Error 模仿错误的产生AppActivate 激活一应用步伐窗口八.别的类Shell 运行别的应用步伐Beep 通过谋略机喇叭发出一个声调Date 语句设置当前体系日期Time 设置体系时间Savepicture 将图形生存到文件中Randomize 初始化随机数天生器。
