如何获取字段中的数字

Question

从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 

Answer 1

先取24个字符，然后去两边的空格
trim(mid(编号,1,24))

Answer 2

msgbox val("       52001418  2008-11-27 12O7 ")

Answer 3

trim(Left(编号,24))'左取24去两边的空格

Answer 4

还可这样:
    Dim s As String * 24
    s = "              52001418   2008-11-27 12O7 "
    MsgBox Trim(s)

Answer 5

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