标题:VB怎样表达1~100的整数
只看楼主
thhabc
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2010-11-14
结帖率:100%
 问题点数:0 回复次数:12 
VB怎样表达1~100的整数
比如当text1=1~100的整数时,text2=a
搜索更多相关主题的帖子: 整数 表达 
2010-12-10 18:13
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
得分:0 
当text1<>1~100的整数时,text2=?

无知
2010-12-10 18:16
thhabc
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2010-11-14
得分:0 
回复 2楼 Artless
当text1<>1~100的整数时,text2=b
2010-12-10 21:27
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
得分:0 
if val(text1.text)>1 and val(text1.text)<100 then
text2.text=a
else
text2.text=b
end if

无知
2010-12-10 21:30
thhabc
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2010-11-14
得分:0 
回复 4楼 Artless
要整数不要小数
2010-12-10 22:04
爆炸之子
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2010-12-11
得分:0 
可以用int()函数啊
2010-12-11 00:40
haiyungood
Rank: 2
等 级:论坛游民
帖 子:83
专家分:98
注 册:2008-7-2
得分:0 
用数组,定义一个1到100的整数数组,然后把Text和数组进行比较,
2010-12-11 01:02
thhabc
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2010-11-14
得分:0 
具体该怎样?
2010-12-11 22:00
cccool
Rank: 7Rank: 7Rank: 7
等 级:黑侠
帖 子:268
专家分:555
注 册:2007-5-1
得分:0 
回复 8楼 thhabc
可以这样
先判断是否为整数:

if (Val(Text1.text)-Int(Val(Text1.text)))=0 then
    if Val(Text1.text)>=1 and Val(Text1.text)<=100 then
          Text2.text=a
   else
        Text2.text=b
   end if
end if



[ 本帖最后由 cccool 于 2010-12-11 23:26 编辑 ]

[fly]让心情飞一会[/fly]
">Email to Me     
2010-12-11 23:23
alexbem
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-12-12
得分:0 
不要把问题复杂化了。。用集合。。。
2010-12-12 13:56



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-328646-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023932 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved