如何在VB6中使用自己的文件ocx解决“编译错误:类型不匹配”

问题描述

我有一个名为 GridEntry.ocx 的 ActiveX,我是从下载链接中找到的 GridEntry.ocx

我想用它来制作一个软件。 但我遇到了麻烦,并收到一条错误消息。 “编译错误:类型不匹配” 我的代码

Private Sub GridEntry1_KeyPress(KeyAscii As Integer,Row As Integer,Col As Byte)
If KeyAscii = 13 Then
Post = GridEntry1.CellFocus(0,1)
 With GridEntry1
  .Caption = "TEST"
  End With
End If
End Sub

解决方法

使用这个

Private Sub GridEntry1_KeyPress(KeyAscii As Integer,Row As Integer,Col As Byte)
If KeyAscii = 13 Then
Call  GridEntry1.CellFocus(0,1)
 With GridEntry1
  .Caption = "TEST"
  End With
End If
End Sub