关于函数调用的问题。

[maik]

偶定义了一个函数如下
Private Function InsertData(TableName As String, FieldID As String)
函数体
End Function

当我调用的时候InsertData("hello", "world")总是提示出错，错误信息如下
Complile error:
Expected:=

我要是函数只定义一个参数就没错，这是什么原因？？？？

[strongfisher]

Private sub InsertData(TableName As String, FieldID As String)
函数体
End sub

InsertData("hello", "world")

[of123]

Call InsertData("hello", "world")
or
InsertData "hello", "world"

[yijiansong]

of(123):你的信誉分为何是 105？

[didishu0807]

call 函数名(参数)
函数名 参数

[EverythingIdo]

用 function 关键字来定义函数，需要数据返回的
而用 sub 则不能返回数据
同时注意，在定义函数的时候参数变量是用byRef，还是byVal格式，两者没有弄清楚也会出现错误的。

[DESL]

先添加三个文本框.一个按钮
加入下列带码:
Dim c As String
Public Function wwa(fd As String, d As String)
c = fd + d
wwa = c

End Function

Private Sub Command1_Click()
Text3.Text = wwa(Text1.Text, Text2.Text)
End Sub

[xuanzi2002]

up

[易道禅]

你的函数定义缺少返回值，改为：
Private Function InsertData(TableName As String, FieldID As String) As 返回值
函数体
End Function

如果确实没有返回值，应该定义成过程，如下：
Private Sub InsertData(TableName As String, FieldID As String)
函数体
End Sub

[易道禅]

你的函数定义缺少返回值，改为：
Private Function InsertData(TableName As String, FieldID As String) As 返回类型
函数体
InsertData = 你的返回值 '必须有这句
End Function

如果确实没有返回值，应该定义成过程，如下：
Private Sub InsertData(TableName As String, FieldID As String)
函数体
End Sub