99问答网
所有问题
当前搜索:
vb窗体怎么显示当前鼠标的坐标
VB
获取
鼠标
在
当前窗体的坐标
答:
采用
窗体
的MouseMove事件来获取
鼠标坐标
是可以的。如下我在文本框中
显示当前鼠标的坐标
程序,鼠标移动,坐标自动更新,只需要一个文本框控件,代码如下:Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Text1.Text = "当前鼠标坐标为,X:" & X & "Y:...
VB
里的mousemove事件举例
答:
'
Shift参数表示是否同时按下了Shift、Ctrl或Alt键 ' X和Y参数表示鼠标指针在窗体上的位置
' 例如,可以在窗体上显示鼠标的当前位置 Caption = "Mouse Position: (" & X & ", " & Y & ")"End Sub 在这个例子中,当用户在窗体上移动鼠标时,MouseMove事件被触发,并且事件处理程序会更新窗体的...
如何
获得
vb中鼠标
在
窗口的坐标
答:
方法一: 直接用 MouseDown事件
举例:(这种方法获取的是点的位置在窗体中,却该对象有MouseDown事件才行,其坐标值为所在容器的相对坐标值)Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 Then Cls Print "X:"; X, "Y:"; Y En...
vb
获取
鼠标
在
窗口
内的屏幕
坐标
答:
一、获取
鼠标
在屏幕上
的坐标
'
坐标显示
在Text1,Text2.'建一个Timer1,Text1,Text2.'代码如下。'=== Private Type POINTAPI x As Long y As Long End Type Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long Dim p As POINTAPI Private Sub Form_Load(...
如何在vb
里制作鼠标移动时
显示鼠标
位置
答:
在窗体上放个标签label1程序运行的时候移动鼠标,在鼠标的位置上显示出鼠标的坐标来
。代码如下:Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1.Caption = "x=" & X & "y" & Y Label1.Left = X Label1.Top = Y End Sub ...
VB
获取
当前鼠标
指向的控件句柄和在控件上
的坐标
值!
答:
在VB
工程里新建一个Form1 在Form1上添加一个按纽Command1 和两个标签Label1和Label2 然后在Form1代码
窗口
里粘贴如下代码:Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Dim a As Single Dim b As Single Me.Label1 = X Me.Label2 = Y En...
怎样
用
vb
取得
鼠标
在
窗口
中
的坐标
?
答:
思路是:当在
窗体
中单击,且松开鼠标键后,在Text1,Text2中分别
显示鼠标
在窗体中的位置的X,Y的值 Dim strSF As Boolean Private Sub Form_Load()strSF = False End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)strSF = True End Sub Priv...
VB
获取
鼠标
在
窗体
上
的坐标
答:
Private Type POINTAPI x As Long y As Long End Type Private Sub Form_Load()Timer1.Interval = 10 '设置获取
鼠标坐标
间隔 End Sub Private Sub Timer1_Timer()Dim P As POINTAPI GetCursorPos P '获取鼠标在屏幕中的位置 ScreenToClient Me.hwnd, P '转换为本
窗体的坐标
Dim t As Boolean ...
VB
.net
如何
让
窗体
在
鼠标
点击出
显示
答:
如果你是想做一个像右键菜单效果的话,你可以在鼠标点击事件中获取鼠标位置,然后创建你要
显示窗体
的实例,把窗体的left 和 top 设成
鼠标的
x,和y 坐标就可以了,具体获取
鼠标坐标
的方法大至有2种,一种是.net 自带的,你找一找 Screen 这个对象中的属性,能找到获取鼠标坐标的方法,别一种就是用...
VB怎么样
让
鼠标的
x和y
坐标显示
在界面上我指定的一个位置?当我鼠标移动...
答:
方法2:如果出
窗体的
话 就用到api函数了 增加一个Timer控件 Dim p As POINTAPI Private Type POINTAPI x As Long y As Long End Type Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long 'lpPoint-
鼠标坐标
会储存到这个结构中 Private Sub Form_Load()Timer1...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
vb窗体显示
vb单击窗体显示文字
vba如何将鼠标限定在窗体
窗体跟随鼠标vba
鼠标在窗体移动触发什么事件
vb关闭窗体的代码
vb窗体设计窗口是用来设计
vb窗体标题在哪里设置
程序运行后在窗体上单击鼠标