标题: 数字提取 [打印本页] 作者: 冷鹤501 时间: 2009-11-2 13:08 标题: 数字提取 我想从一个Access数据表中提取数字字段中字符，请问怎么弄好啊作者: kangking 时间: 2009-11-2 13:19
看了例子，还是一头雾水。能举例说明吗？作者: kangking 时间: 2009-11-2 13:34
我猜下面的过程就是你要的。
Public Sub GetFieldName()
Dim rs As DAO.Recordset
Dim fil As Field
Set rs = CurrentDb.OpenRecordset("表1")
For Each fil In rs.Fields
If fil.Type = 7 Then MsgBox "字段名为：" & fil.Name
Next
Set rs = Nothing