我的代码如下:

对于i 2至模块编号- 1

范围(C i).Select:如果Is:模块_错误1: iublink单元格(，1):退出子

然后

所以，你要做的就是把代码拆分，转换成数值。

If条件语句的解释

VB中有很多种选择结构语句，选择结构是根据给定的条件选择执行一个分支的算法结构。

VB编程中经常用到选择结构，因此深刻理解并熟练掌握它是非常重要的。

If选择语句

第一种形式:

如果条件1，则

第二种形式:

如果条件1，则

其他

...

如果…就会结束

第三种形式:

如果条件1，则

测试语句块1

那么ElseIf条件2

测试语句块2

那么ElseIf条件3

测试语句块3

那么ElseIf条件4

测试语句块4

那么ElseIf条件5

测试语句块5

那么ElseIf条件6

测试语句块6

那么ElseIf条件7

测试语句块7

那么ElseIf条件8

测试语句块8

......

那么ElseIf条件

测试语句块n

其他

语句块

如果…就会结束

If语句也可以包含在 "If语句块和 "Else语句块 "If语句。比如:

…….

如果条件1，则

t…..

如果条件2

tt…..

特尔塞

tt…

倾向于

t…...

其他

t…..

如果条件3

tt…..

特尔塞

tt…

倾向于

t……

如果…就会结束

示例:下面的过程用于判断输入数据和区间的奇偶性。

私有子命令d1_Click()

将int1表示为整数，int2表示为整数

int1Cint(txt1。正文)

如果是int1lt0那么

Tttxt2。Text#34请输入正整数！#34

特尔塞

ttint2int1 Mod 2

那么ttIf int20

tttIf int1gt100然后

Tttttxt2。Text#34这是大于100的偶数！#34

tttElse

Tttttxt2。文本 "这是一个不大于100的偶数！#34

t趋势If

tElse

tttIf int1gt 100然后

Tttttxt2。Text#34这是大于100的奇数！#34

tttElse

Tttttxt2。Text#34这是小于100的奇数！#34

t趋势If

tEnd If

倾向于

末端接头

条件 代码 #34

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任。如有侵权/违法内容，本站将立刻删除。