如何获取字段中的数字

leonnet 2008-12-11 01:35:27
从1到24字节是放的编号,但每行的数据会有些错位,如何得到单一编号,谢谢
52001332 2008-11-28 12O7
52001418 2008-11-27 12O7
52001419 2008-11-27 12O7
52001469 2008-12-09 12O7
52001471 2008-12-09 12O7
52001470 2008-12-09 12O7
52001460 2008-12-10 12O7



...全文
54 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
zuoxingyu 2008-12-11
  • 打赏
  • 举报
回复

Private Sub Form_Load()
Dim s As String
s = " 52001332 2008-11-28 12O7 "
Debug.Print Trim(Left(s, 24))
Debug.Print Len(Trim(Left(s, 24)))

End Sub


结果:
52001332
8
vbman2003 2008-12-11
  • 打赏
  • 举报
回复
还可这样:
Dim s As String * 24
s = " 52001418 2008-11-27 12O7 "
MsgBox Trim(s)
vbman2003 2008-12-11
  • 打赏
  • 举报
回复
上面的不对,试了val不行...
SYSSZ 2008-12-11
  • 打赏
  • 举报
回复
trim(Left(编号,24))'左取24去两边的空格
vbman2003 2008-12-11
  • 打赏
  • 举报
回复
msgbox val(" 52001418 2008-11-27 12O7 ")
aohan 2008-12-11
  • 打赏
  • 举报
回复
先取24个字符,然后去两边的空格
trim(mid(编号,1,24))

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧