VB.NET 使用GLUT的鼠标回调函数glutMouseFunc

qq_38162085 2017-05-12 09:43:42
用vb.net开发opengl,使用glut鼠标回调函数的时候遇到问题
第一步 窗体加载的时候
Tao.FreeGlut.Glut.glutMouseFunc(Tao.FreeGlut.Glut.MouseCallback.Combine)
第二步
Sub mymouse(ByVal button As Integer, ByVal state As Integer, ByVal x As Integer, ByVal y As Integer)

Debug.Write(button)

End Sub
第三步
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove

Tao.FreeGlut.Glut.glutMouseFunc(AddressOf mymouse)

end sub
请大神帮我看看错哪儿了!
...全文
286 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧