[填空题] 设窗体上有一个名称为Lable1的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Lable1标签中:单击鼠标右键则停止实时显示,并将标签中内容清除。下面的程序可实

10 查阅

[填空题] 设窗体上有一个名称为Lable1的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Lable1标签中:单击鼠标右键则停止实时显示,并将标签中内容清除。下面的程序可实现这一功能,请填空。Dim Down As BooleanPrivate Sub Form _MouseDown(Button As Integer,Shift As Integer,x As Single,Y As Single)Select Case ( 8 ) Case 1Down=TrueCase 2Down=FalseEnd SelectEnd SubPrivate Sub Form _MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)If ( 9 ) ( 10 ) =”X=”& X &” Y=”& YElseLabel1.Caption=””End ifSub

参考答案:

down

【解析】全局变量,用来判断点击过鼠标左键或者右键。点击过鼠标左键,down=true,点击过鼠标右键,down = false

计算机考试