vb6 显示函数类型不匹配答案

【问题标题】：vb6 showing type mismatch in functionvb6 显示函数类型不匹配
【发布时间】：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

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

【问题讨论】：

标签： vb6

【解决方案1】：

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

重命名函数。

【讨论】：

【解决方案2】：

如果您收到错误消息：

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

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

【讨论】：

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