| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2915 人关注过本帖, 1 人收藏
标题:VB怎样表达1~100的整数
只看楼主 加入收藏
thhabc
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2010-11-14
结帖率:100%
收藏(1)
 问题点数: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
快速回复:VB怎样表达1~100的整数
数据加载中...
 
   



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

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