这么简单的函数也出错？气死我了，怎么解决呀？
这么简单的函数也出错？气死我了，怎么解决呀？
=====================================================
Private Sub Command2_Click()
Dim s As String
Dim fanhui As String
lb = " 类别='入库'"
s = "select 类别,说明,开单日期,开单时间,数量,金额 from 摘要表 where " & lb
cxhanshu s, "日期id", " and ", fanhui///开始调用函数cxhanshu
If fanhui = "exit" Then Exit Sub
每次调用cxhanshu就出错：未找到数据方法或者数据成员。明明把参数都设置对了吗？怎么还是出问题？
==================================================
Sub cxhanshu(s As String, s1 As String, s2 As String, fanhui As String)
Dim b4 As String
Dim y1 As String
Dim y2 As String
Dim l As String
Text2.Text = Trim(Text2.Text)
Text3.Text = Trim(Text3.Text)
lens = Len(s)
MsgBox "ok"
End Sub
=================================================
问题点数：0、回复次数：9Top
1 楼wjaco（学到老问到老）回复于 2003-11-02 12:55:06 得分 0
我觉得你在函数中设参数就有问题!
fanhui这个参数在函数中要本没参加运算
那你调用时当然找不到数据方法或者数据成员呀!!!Top
2 楼cryptonym（想裸睡）回复于 2003-11-02 12:55:14 得分 0
fanhui 没有伏初值可能为空
把fanhui初始化一下或者在fanhui as string 前面加上optionalTop
3 楼kmzs（.:RNPA:.山水岿濛）回复于 2003-11-02 13:49:21 得分 0
不会吧Top
4 楼palmkey（原水）回复于 2003-11-02 15:39:12 得分 0
Private Sub Command2_Click()
Dim s As String
Dim fanhui As String
lb = " 类别='入库'"
s = "select 类别,说明,开单日期,开单时间,数量,金额 from 摘要表 where " & lb
cxhanshu s, "日期id", " and ", fanhui '///开始调用函数cxhanshu
If fanhui = "exit" Then Exit Sub
'每次调用cxhanshu就出错：未找到数据方法或者数据成员。明明把参数都设置对了吗？怎么还是出问题？
'==================================================
End Sub
Sub cxhanshu(s As String, s1 As String, s2 As String, fanhui As String)
Dim b4 As String
Dim y1 As String
Dim y2 As String
Dim l As String
Text2.Text = Trim(Text2.Text)
Text3.Text = Trim(Text3.Text)
lens = Len(s)
MsgBox "ok"
End Sub
Top
5 楼lijunfeng（维生素）回复于 2003-11-02 16:40:29 得分 0
调用时要把加参数放在括号里吧？Top
6 楼lijunfeng（维生素）回复于 2003-11-02 16:45:06 得分 0
对不起，看错了，把我上面的话删除。Top
7 楼lijunfeng（维生素）回复于 2003-11-02 16:47:28 得分 0
应该不是调用时这个函数时出错，你用F8跟踪一下看看函数里哪一句出错了。Top
8 楼crystal_heart（笑看风云）回复于 2003-11-02 16:53:05 得分 0
一般来说，形参定义和实参调用使用同一个名字的话，就会出这样的错误，尤其是实参未经过初始化的情况下。Top
9 楼seabluesky（蓝色星空）回复于 2003-11-02 23:55:07 得分 0
实参fanhui 没有初始化。
而且你的代码是不是放上来之前有过删改呀？
好多变量都没有参与运算呢！
我建议你不要把形参和实参起一样的名字！
这样容易出错而且编出来的程序不好读！Top
