CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
不看会后悔的Windows XP之经验谈 简单快捷DIY实用家庭影院
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  VB >  基础类

求问:VB中如何对输入内容,判断是否是integer或者double?

楼主nbyteshk(eezoo)2004-05-03 18:15:12 在 VB / 基础类 提问

一个textbox,输入的是23,可以直接用Int(textbox.Text)换成integer值,如果输入的是2f,怎么判断它不是integer?  
  同样,如何判断输入是否是double? 问题点数:20、回复次数:17Top

1 楼shortppsy(小河)回复于 2004-05-03 18:16:19 得分 0

len(textbox.text)  
  Top

2 楼daisy8675(莫依 沉迷)回复于 2004-05-03 18:22:02 得分 0

Integer   變數係以範圍為   -32,768   到   32,767   之   16   位元   (2   個位元組)   數字的形式儲存  
   
  請注意2f是否再-32,768--->32,767之間?Top

3 楼nbyteshk(eezoo)回复于 2004-05-03 22:58:15 得分 0

不是这个意思拉:  
  我的意思是:  
  如果我输入的字符串是adsfasdf,我想把它int()化,肯定会出错,  
  那么如何捕捉这个错误?  
   
  还有,一个2.234234的输入,如何把它化成double型?如何检查它的输入合法性?Top

4 楼jinesc(我不喜欢问为什么!!!!!)回复于 2004-05-03 23:07:18 得分 0

isnum。。。。()   忘记怎么写了Top

5 楼BitBlt(Raster Operater)回复于 2004-05-03 23:16:11 得分 15

?IsNumeric("123.333333333333333333333333333")  
  True  
  isnumeric判断是不是数字,错不了的。  
   
  至于是不是integer,一是看有没有小数点,可以用instr,二是看范围,可以抛出错误“溢出”(err.number=6)来判断  
  Top

6 楼easydone(无坚不摧)回复于 2004-05-03 23:17:13 得分 1

使用函数:IsNumeric()Top

7 楼hemeijun81(@_@ 河马 @_@)回复于 2004-05-04 00:06:18 得分 1

对  
  就是哪个函数Top

8 楼Jockey()回复于 2004-05-04 00:27:50 得分 1

if   isnumeric(txtnum)   then    
        msgbox   "是数字!"  
        if   instr(txtnum,".")   then  
                msgbox   "是浮点!"  
        else  
                  msgbox   "是整型!"  
        endif  
  endifTop

9 楼russule(雨田)回复于 2004-05-04 08:59:00 得分 1

IsNumeric()  
  Top

10 楼smallgyy(被煮的螃蟹)回复于 2004-07-12 11:49:52 得分 1

If   IsNumeric(Text.Text)   Then  
   
      If   InStr(Text.Text,   ".")   Then  
                MsgBox   "是浮点!,请输入整形变量   范围在-32768和+32767之间"  
                Text.SetFocus  
        Else  
                  On   Error   GoTo   errorinfo  
                  myobject1.n   =   CInt(Text.Text)  
                  Exit   Sub  
        End   If  
   
   
   
  Else  
      MsgBox   "您输入的不是数字,请输入整形变量   范围在-32768和+32767之间",   vbOKOnly,   "提醒"  
      Text.SetFocus  
  End   If  
   
  errorinfo:  
                  If   Err.Number   =   6   Then  
                  MsgBox   "超出integer类型范围限制!,请输入整形变量   范围在-32768和+32767之间"  
                  Text.SetFocus  
                  End   If  
  Top

11 楼kmzs(.:RNPA:.山水岿濛)回复于 2004-07-12 12:25:38 得分 0

//Integer   變數係以範圍為   -32,768   到   32,767   之   16   位元   (2   個位元組)   數字的形式儲存  
   
  偶受不了了,张小飞嫁给台湾人了?Top

12 楼flc(▄︻┻┳═一)回复于 2004-07-12 12:47:28 得分 0

不知道怎么搞得   每次看帖子的时候,只要有daisy8675(莫依)   的回复,字总是断断续续的,可能是我的机器的问题。……:《Top

13 楼jiemupig(伦涯飘)回复于 2004-07-12 12:56:38 得分 0

函数:IsNumeric()  
  Top

14 楼viena(维也纳N02)回复于 2004-07-12 13:04:18 得分 0

发表时间:     2004-05-03   18:15:12ZTop

15 楼fxy_2002(阿勇)回复于 2004-07-12 13:20:49 得分 0

字符变double   用   cdbl("123.456")Top

16 楼ryuginka(一米八五的猪)回复于 2004-07-12 13:35:26 得分 0

最好控制只能输入数字,在这里搜索一下,很多的.Top

17 楼nbyteshk(eezoo)回复于 2004-09-28 09:36:23 得分 0

谢谢,结Top

相关问题

  • 请问如何在VB输入框中限定输入格式?
  • VB main()中的输入参数
  • 如何在vb的textbox中输入tab?
  • 在VB中如何接收非标准输入设备的输入?
  • 如何在VB文本输入框中实现InputMask功能?
  • VB中汉字输入的位数问题
  • 如何用VB改变当前输入法
  • 有没有可输入的msflexgrid,我要vb原代码
  • 请教各位大虾:vb中条码输入的问题。
  • vb 中 有没有 ip 地址的输入控件??

关键词

  • 数字
  • 输入
  • 判断
  • msgbox
  • isnumeric
  • 范围
  • 是否
  • integer
  • double
  • instr

得分解答快速导航

  • 帖主:nbyteshk
  • BitBlt
  • easydone
  • hemeijun81
  • Jockey
  • russule
  • smallgyy

相关链接

  • Visual Basic类图书
  • Visual Basic类源码下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo