首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB怎么只读取字符串中的数字部分?

2012-10-07 
VB如何只读取字符串中的数字部分??逐个字符判断,是否为 +-0123456789. 中的一个,取出连续的数值部分问题

VB如何只读取字符串中的数字部分??
逐个字符判断,是否为 "+-0123456789." 中的一个,取出连续的数值部分问题不明确啊

比如:
dim s as string
dim v as long

s="123abc456efg"
如果你只要123,那么有现成的函数:
v=val(s)

如果你要123456,如老鸟所言,逐个字符判断,或者用正则


遍历~Private Sub Command1_Click()
  Dim i As Integer
  Dim a As Double
  For i = 1 To Len(Text1)
  Text2 = Val(Mid(Text1, i, Len(Text1) - i + 1))
  If Text2 <> 0 Then
  Exit For
  End If
  Next
End Sub

Private Sub Form_Load()
  Text1 = "abc1234.56bcd"
End Sub来晚了'引用 Microsoft VBScript Regular Expressions x.x
Dim re As RegExp

Set re = New RegExp
re.Pattern = "\D"
re.Global = True
Debug.Print re.Replace("123abc456efg", "")


如何限制软件的使用期限?  

VC编写的控件在VB下使用的问题

帮忙看看这句

msde的安装方法

请问在vba中如何加载当前路径dll

VB菜鸟求救:Stuff_MIS   查询错误:标准表达式中数据类型不匹配

API中的GetComputerName如何调用?

autocad的文件怎么样能导入vb中

怎么做字符串链表

高分求:将access数据库中某个表中指定字段导出成字段宽度、类型有限制的viual   foxpro表

关于考试试卷自动生成系统

如何限制软件的使用期限?  

如何限制软件的使用期限?

使用excel数据源,不能正确显示货币类型的小数……

LSet问题

急需VB或VC编程人员

vb中   数字后面有个#是什么意思

求助:文件读取问题

RowIsVisible   怎么样显示网格中被隐藏的行!我快干血了...

如何用CreatProgress函数成功启动command.com程序

乘法溢出的问题

初次做VB的DLL,请大家帮忙!

权限被拒绝

Excel导入Sql   server2000中openrowset的使用时奇怪问题!

什么品牌电脑好?

VB+ado+Access如何数据修改

VB怎样只读取字符串中的数字部分??

VC菜鸟关于生成exe文件无法运行的问题,在线等

老问题,如何将函数作为参数进行传递?

如何在WEB控件里点击某文字连接??

100分悬赏rc2加密算法

关于按狃问题

一个逻辑上的问题

如何引用ACCESS   中窗体的文本框的值?

CSDN   快速搜索

关于LDAP连接的问题

最近用尝试用VB做DLL,有问题请大家指教一下。

excel   后台打印报表的问题???

如何使用web控件执行网页操作??

inet.openurl的问题

关于   RasGetProjectionInfo   求   IP   地址的问题

DataGrid的用法:如何在datagrid中插入一列数据?

msflexgrid   用鼠标

连接一个dbf表   open   出错     

怎么把RS数据绑定Data   Report   的文本框控件上?

最好的视频教程网站

在台式机的800×600下编写的VB程序,放到笔记本上字体太难看粗糙,但在1024×768下显示时,字体虽然好看,但程序运行后的窗口只占液晶显示器的一部分,有没有适应屏幕分辨率的控件,自己编代码实现太麻烦,因界面上控件太多。

请问一个ADO的问题

新手请教几个简单问题

webbrowser自动填表进阶疑问:如何选完省再选市

急急急高分快速解决

VB中对表排序

急急急高分快速解决

高手请教一个正则表达式的问题

用VB的ADO访问DBF文件出问题

连接sqlserver服务器,如果服务器关机的话,等待时间太长的问题怎么解决?

怎么回事啊!!高手进来看看

疑难问题:   vb6.exe   中发生未处理的win32异常

AT   指令删除短信问题

关于记录集复制

sql   server   如何使用VB6   代码进行数据库文件(mdf,ldf)的   附加和分离?

难度10:压缩数据,然后解压数据包,不要文件格式,怎么做?

请问VB.NET里的这句话在VB6里怎么实现?

菜鸟急题!sendkeys向一个java程序发送中文出现乱码问题

--------取货表   到   库存货架表   中取货的问题----- < <高级版 > >----  

一条sql语句插入值的问题

求助,那位大哥能帮忙解决本人将给予一定报酬

求助

国庆归来散分

新手提问:关于如何使窗体自动适应图片大小的问题

开发状态下,怎么关闭所有的窗口,每次都要一个一个按

用vb生成word文档,页眉页脚怎么生成呢?

想做觸摸屏瀏覽器上的軟鍵盤,可是關於WebBrowser中文本框焦點問題怎麼獲取呀?

关于获取QQ游戏密码的问题。只是研究。不是破坏!

有没有办法独占方式访问一个分区

如何使用wmi获得系统信息如CPU内存大小硬盘大小主板型号等

如位有fpspr70.ocx控件,发下给我.谢谢啦

有没有去掉整数后小数点的函数   是小数点不是0

如何实现此文件操作?

ActiveReport整数怎样可以不打印出小数点(SQL中money类型怎样显示出小于0的数前的0)  

大家帮我以下,关于查询的问题  

最近用尝试用VB做DLL,有问题请大家指教一下。

最近自己尝试做Dll,有问题大家帮忙

求一款翻译软件,急

文件关联了以后,如何批量传送COMMAND

求一个内存读图片的工具。

局域网内IP地址为什么会变

vb   的winsock控件如何实现一对多的连接

请问如何对DTPicker付值?

excel报表打印问题

整数怎样可以不打印出小数点(SQL中money类型怎样显示出小于0的数前的0)

请问如何比较组织数中节点的属性?

ActiveReport控件怎样不打印小数点打印

整数怎样可以不打印出小数点(SQL中money类型怎样显示出小于0的数前的0)

请问如何对一个date形变量付置?

求助   Datagrid控件和Adodc控件使用问题

进度条控制问题??

vb中的控件不能使用

救小弟,把查询一列放在listview中,然后希望点击某个格可以直接把它的值赋给text.怎么办呀?

满分,跪求!!!access的form控件      窗体的“记录源“(Record   Source)属性

更多vb开发资料,请访问http://www.vbbaike.com/

热点排行