Screen.TwipsPerPixelX是什么意思

frank888886 2003-09-29 08:50:18
Private Const LEFT_BUTTON As Byte = 1
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim blnLeftDown As Boolean
blnLeftDown = (Button And LEFT_BUTTON) > 0
Text1.Text = CLng(blnLeftDown)
End Sub
上面代码小生对blnLeftDown = (Button And LEFT_BUTTON) > 0不理解,忘高手指点
...全文
128 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
rainstormmaster 2003-09-29
  • 打赏
  • 举报
回复
和Screen.TwipsPerPixelX有什么关系

(Button And LEFT_BUTTON) > 0

先进行 位与运算 (Button And LEFT_BUTTON),位与运算的结果再和0进行逻辑运算

MSSQL 2003-09-29
  • 打赏
  • 举报
回复
是否按下左键

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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