Question

我有一个名为ContactsForm的表单，底部有一个按钮。点击后，它会运行一个事件过程。

Public Function GET_MESGS(Message As String, Number As String) As String
    Dim Message As String
    Dim Number As String
....
End Function

Private Sub Command1_Click()
Call GET_MESGS
End Sub

但是一旦点击它就会给我一个错误。显然我没有正确调用该函数。我想用函数中的值来调用函数。

Answer 1

由于sub需要2个参数，你需要用2个参数调用GET_MESGS：

例如：

Sub Command1_Click()

  Call GET_MESGS("ABC","2345")

 End Sub

要使用表单中的值，请使用以下内容：

Call GET_MESGS(textbox1.Text, Label1.Text)

如何使用表单的变量调用函数

1 个答案: