设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2786|回复: 5
打印 上一主题 下一主题

[其它] 请教vb中如何将字符串转换成数字的问题??

[复制链接]
跳转到指定楼层
1#
发表于 2010-5-10 10:00:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问下各位朋友
如何将文本型的字符串转换成数字啊在VB中怎么实现?
比如"23 6 18"转换成这三个数字23,6,18赋给变量数组??
当然,字符串中的数字不一定是三个,有可能是N个!
请教啊??
请给位帮助下小弟!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2010-5-10 10:04:47 | 只看该作者
CDate(DDate.Value) & "'," & _
            "'" & CStr(Vendor.Value) & "'," & _
            "'" & CStr(PO_NO.Value) & "'," & _
            "'" & CStr(LN_No.Value) & "'," & _
            "'" & CStr(ITEM.Value) & "'," & _
            "'" & CStr(ITEM_Desc.Value) & "'," & _
            "'" & CStr(Warehouse.Value) & "'," & _
            "" & CLng(PO_Qty.Value) & "," & _
            "'" & TxtShipNo.Value & "'," & _
            "" & CLng(SHIP_Qty.Value) & "," & _
            "" & CLng(RE_Qty.Value) & "," & _
            "" & CLng(VAR.Value) & "," & _  这个就是将字符串转换成数字
            "'" & TxtRemark.Value & "'," & _
            "'" & CStr(BUYER.Value) & "'," & _
            "''," & _
3#
 楼主| 发表于 2010-5-10 11:25:15 | 只看该作者
2# yanwei82123300

厉害
我研究下
4#
发表于 2010-5-10 12:07:09 | 只看该作者
字符转数字型:Val()
5#
发表于 2010-5-10 12:12:55 | 只看该作者
把字符串23618转换成23,6,18:
Val(Trim(Left(23618,2)&","&Mid(23618,3,1)&","&Right(23618,2)))
6#
发表于 2010-5-10 13:27:05 | 只看该作者
转为数组引用:split("23 6 18")(1)=6
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-15 10:59 , Processed in 0.142699 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表