VB中多个参数的函数怎么调用？请多帮忙

Question

我在VB中写了一个函数，结构如下：
Function gf_write_log(imei As String, module As String, err_type As String, err_desp As String)………………
………………
END FUNCTION我调用时这样写的：
gf_write_log(imei, module, err_type , err_desp)
imei, module, err_type , err_desp分别是我定义的字串，为什么不对呀？
在线等待，谢谢大家，帮帮忙吧

Answer 1

如果不用返回值的话，
用Call gf_write_log(imei, module, err_type , err_desp)
否则要
变量=gf_write_log(imei, module, err_type , err_desp)

Answer 2

Function gf_write_log(imei As String, module As String, err_type As String, err_desp As String)………………
………………
END FUNCTION参数前面应该写 Byval，默认是ByRef

Answer 3

private Function gf_write_log(imei As String, module As String, err_type As String, err_desp As String) as boolean

Answer 4

Call gf_write_log(imei, module, err_type , err_desp)

Answer 5

call gf_write_log(imei, module, err_type , err_desp)
或者
gf_write_log imei, module, err_type , err_desp

Answer 6

Private Sub Command1_Click()
Dim a%, b%, c%a = 1: b = 2
abc a, b, c
MsgBox a & "+" & b & "=" & c
End SubSub abc(aa%, bb%, cc%)
aa = 1
bb = 2
cc = aa + bb
End Sub

Answer 7

只返回一个参数时用 Function:
Private Sub Command1_Click()
Dim a%, b%MsgBox abc(1, 2)
End SubFunction abc(aa%, bb%) As Integer
abc = aa + bb
End Function

Answer 8

dim aa as integer
aa=gf_write_log(imei, module, err_type , err_desp)

Answer 9

谢谢大家的帮助，函数问题解决了，现在又有个问题，我要记一个时间写到数据库中，就是当时操作的时间，但是要记的不只有年月日还有时分秒，要定义一个什么样的变量才能写入SQL表中一个类型为DATETIME的字段呢？

Answer 10

字符串就可以了
dim strTime as string 
strTime=cstr(Now)
msgbox strtime