vb 把access中每行数据输出时调用自定义函数?
假如数据库中,ee表中有多行如下
1、aa
2、bb
3、cc
……
如何实现把以上数据输出,并且输出时aa调用自定义函数aa,bb调用自定义函数bb,cc调用自定义函数cc ……
其中自定义函数放在VB模块内
[解决办法]
当然可以,你取出字符值后用CallByName就行了:
如这样对每个字段值调用CallFunction
Sub CallFunction(ByVal strFunction As String) CallByName Me, strFunction, VbMethodEnd SubPublic Function aa() As Boolean Debug.Print "aa called"End Function