vb6 显示函数类型不匹配

Posted 2023-02-16

【中文标题】vb6 显示函数类型不匹配

【英文标题】：vb6 showing type mismatch in function

【发布时间】：2014-07-03 06:38:01

【问题描述】：

这是我在 VB6 中锁定控件的代码

Private Function lockControls()
    For Each ctrl In Me.Controls
        If TypeOf ctrl Is TextBox _
        Or TypeOf ctrl Is ComboBox _
        Or TypeOf ctrl Is NumBox _
        Or TypeOf ctrl Is OptionButton _
        Or TypeOf ctrl Is DTPicker Then
            ctrl.Enabled = True
        End If
    Next
End Function

但是当我尝试运行程序时，它显示类型不匹配并且没有给出任何提示。 谁能说出这段代码有什么问题。

【参考方案1】：

VB6 有一个hidden property LockControls，用于控制窗体上的锁定控件。您的函数名称 lockControls 与之冲突。

重命名函数。

【参考方案2】：

如果您收到错误消息：

函数对象“FUNCTION1”中的错误数据类型不匹配

转到您的 mdb 文件并更改字段的数据类型。

【讨论】：

转到数据表然后选择数据类型并选择数字。