查看: 392  |  回复: 0
  VB定义变量和函数的关系
楼主
发表于 2023年11月10日 23:02

新建From1(窗体),新建Command1(按钮CommandButton),代码:

Private Sub Command1_Click()
    Dim str1, str2 As String
    MsgBox f_test(str1)
End Sub

Private Function f_test(str1 As String) As String
    f_test = "码农库"
End Function

提示错误:ByRef参数类型不符。改成:

Private Sub Command1_Click()
    Dim str1 As String
    Dim str2 As String
    MsgBox f_test(str1)
End Sub

Private Function f_test(str1 As String) As String
    f_test = "码农库"
End Function

后正确。sub也同理。

Private Sub Command1_Click()
    Dim str1 As String
    Dim str2 As String
    Call s_test(str1)
End Sub

Private Sub s_test(str1 As String)
    MsgBox "码农库"
End Sub

才对,而Dim str1, str2 As String会错误。

您需要登录后才可以回帖 登录 | 立即注册
【本版规则】请勿发表违反国家法律的内容,否则会被冻结账号和删贴。
用户名: 立即注册
密码:
2020-2024 MaNongKu.com