关于public定义的问题

yaoguai

有一个关键的地方不明白,就是人家都用public定义type pointapi,而我必须改成Private Type POINTAPI才能通过，
否则就会提示编译错误－－－－在私有对象中不能定义public用户定义类型,我是在通用窗口中声明的，如果我也想用public定义＼改咋样做呢＼我看别人用的是２个窗体用的是public定义＼可就是不会弄＼他的窗体用的是projet1我没有搞懂＼还请指点  
Option Explicit
Private Type POINTAPI
x As Long
y As Long
End Type

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long

Dim z As POINTAPI
Private Sub Timer1_Timer()

GetCursorPos z
Label1.Caption = z.x
Label2.Caption = z.y

End Sub [em7]

sandy_zc_1

肯定不行了。
私有类里面是不允许有公共自定义类型的。

你要声明公共自定义类型，在标准模块里面声明。

yaoguai

谢谢指点\

yaoguai

说点题外的问题\本来想用VB2005做的,但是资料太少了,也不知道用VB2005是不是还得借用API函数才能完成模拟鼠标的功能呢\请大家指教

sandy_zc_1

目前没有用VS.net，但是它应该也不会有多少更底层的的控制，还是用API吧。