vb中if语句开头的问题

来源：百度知道 编辑：UC知道 时间：2024/06/23 04:47:39
比如下面这个:

If g = 1 Or 2 Or 3 Or 4 Or 5 Or 6 Or 7 Or 8 Or 9 Or 10 Or 11 Or 12 Or 13 Or 14 Or 15 Then
......

总感觉这样太麻烦了,可不可以简洁点判断如果g=1到15那么......就是把这条表达式写得简洁点的方法?

首先，你写的那条IF 里面的条件不能做到G=1 到15里面的数
不相信自己运行下。
if G>=1 AND g<=15 and G=INT(g) THEN
其中G=INT(g)是用来判断是否为整数。因为在1-15之间可能存在小数也符合G>=1 AND g<=15 这个条件。

DIM G AS INTEGER
IF 1<=G<=15 THEN
这样试试

select case g
1 to 15:
end select

用循环语句
for i=1 to 15
if i=...或者...=i then
next i
End if

dim g as integer
if g>=1 and g<=15

哈哈哈，LZ这是我见过的最可爱的Basic程序语句了。