如何删除字符串中的非数字字符?

huzaixin · 发表于 2006-4-6 22:18:00

请教:在Access中如何从字符串中删除非数字的字符?例如:从asd1234中删除"abc",结果为"1234".当然可能非数字的字符出现的位置是不固定、没有任何规则的。这样的情况如何来做呢？

请各位高手指教！

andymark · 发表于 2006-11-22 06:58:00

去掉VBA这几个字会更简洁一些

唐小小 · 发表于 2006-11-22 06:36:00

Public Function GetNumFromString(X As String) As String
  Dim i    As Long
  For i = 0 To VBA.Len(X) - 1
      If VBA.Asc(VBA.Mid(X, i + 1, 1)) >= VBA.Asc("0") And VBA.Asc(VBA.Mid(X, i + 1, 1)) <= VBA.Asc("9") Then
            GetNumFromString = GetNumFromString & VBA.Mid(X, i + 1, 1)
      End If
  Next i
  End Function

调用：GetNumFromString([字段名])

这个好像简单些吧：）

huzaixin · 发表于 2006-4-7 20:31:00

怎么传不上来呢?

huzaixin · 发表于 2006-4-7 20:27:00

不好意思!第一次传错了.

[此贴子已经被作者于2006-4-7 12:29:24编辑过]

一点通 · 发表于 2006-4-7 19:22:00

将例子传上来看下

huzaixin · 发表于 2006-4-7 18:32:00

我在使用的时候系统提示没有MyGet()函数没有定义.该怎么做啊?

一点通 · 发表于 2006-4-7 18:26:00

在字段名中直接调用

huzaixin · 发表于 2006-4-7 18:02:00

不好意思啊!我是一个超级的大菜鸟,请再指教:请问我在查询中如何才能调用MyGet()呢?

LucasLynn · 发表于 2006-4-6 23:57:00

以下是引用fan0217在2006-4-6 15:26:00的发言：
模块才是简单的方法，你可以不需要了解模块的工作原理，但只要你会用就可以了。

[em07]

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] 如何删除字符串中的非数字字符?

[原创]

群介绍
主题无相 (随机显示版	同地区群块其他地区)