Question

vb模块用户定义类型未定义

Answer 1

如果在代码中用到了一种数据类型，但它不是VB自带的数据类型（比如Integer, Long, String等），也没有用Type语句定义它，就会出现这个提示。

通常出现这个提示的原因有以下三种：
1. 错误拼写，比如Dim i as Interger(正确写法是Integer)或者Dim s as Strign（正确写法是String)。
2. API声明，比如声明了
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
这个函数的参数是POINTAPI类型，这时还需要在代码中添加它的定义，即：
Private Type POINTAPI
x As Long
y As Long
End Type
否则也会出现用户定义类型未定义的错误。
3. 只从别处复制了相关的代码，未引用相对应的库，比如在数据库访问代码中使用Dim adoConn As Connection，这时如果没有引用Microsoft ActiveX Data Object Library库，就会出现用户定义类型未定义的错误。

出错的同时，出错的代码会被VB高亮显示，请检查你的代码是否存在以上问题。