编译错误：过程声明与同名事件或过程的描述不匹配

Question

我已将整个 vb6 代码从一台机器复制到另一台机器，现在当我在另一台机器上运行代码时，它显示如下错误：编译错误：过程声明与具有相同名称的事件或过程的描述不匹配， 这是代码：

Private Sub MKDataGrid1_KeyPress()
    If MKDataGrid1.Col = 0 Or MKDataGrid1.Col = 1 Or MKDataGrid1.Col = 2 Or MKDataGrid1.Col = 3 Then
        MKDataGrid1.AllowUpdate = False
        MsgBox "This field is not to edit. Thnks"
        MKDataGrid1.AllowUpdate = False
        cmdAdd.visible = True
        cmdAdd.SetFocus
        cmdAdd.visible = False
    Else
        MKDataGrid1.AllowUpdate = True
    End If
End Sub

Answer 1

看来您的活动声明搞砸了。一般来说，KeyPress事件采用参数

KeyAscii As Integer

。我建议暂时注释掉您的例程，然后从代码窗口的下拉列表中手动选择 KeyPress 事件。然后将之前的内容复制回 VB 插入的 KeyPress 中。

Answer 2

我必须为此在我的计算机上注册 vb6datagrid.ocx ，我已经在我的机器上注册了这个 .ocx ，实际上我再次从我的旧机器中复制了我的机器中的新代码，在运行它之前我已经打开了项目 >>组件>>设计师并从那里选择了所需的组件并删除了不需要的组件，然后我运行了该项目，所以我再次收到错误，但是当我再次查看那里的对象时，我发现对象丢失了，所以我放置了数据网格然后运行正常:)