作者zupi (zupi)
看板Visual_Basic
标题Re: [VB6 ] 在游标处Print
时间Wed Jul 6 23:19:07 2005
※ 引述《Harrychou (Patlabor)》之铭言:
: ※ 引述《zupi (zupi)》之铭言:
: : currentX=10:currentY=10
: : print "hi"
: : currentX=100:currentY=100
: : print "hi"
: : 这样你就知道了
: 刚刚试了一下,还是不能在滑鼠游标处print字串
: 怎麽试的结果都只能靠PSet抓座标来print
: Privte Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
: If Button=1 then
: PSet(X,Y)
: print "字串"
: End If
: End Sub
If Button = 1 Then
Cls
CurrentX = X: CurrentY = Y
Print "滑鼠左键"
End If
If Button = 2 Then
Cls
CurrentX = X: CurrentY = Y
Print "滑鼠右键"
End If
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.134.166.68
1F:推 Harrychou:谢谢 59.115.84.252 07/07