作者Harrychou (Patlabor)
看板Visual_Basic
标题[VB6 ] 在游标处Print
时间Wed Jul 6 17:16:33 2005
Dim colorval As Long
Private Sub Form_Load()
colorval = RGB(255, 255, 255)
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single,
Y As Single)
If Button = 1 Then
Cls
PSet (X, Y), colorval
Print "滑鼠左键"
End If
If Button = 2 Then
Cls
PSet (X, Y), colorval
Print "滑鼠右键"
End If
End Sub
如果要在mousedown时在游标处print出字串,是非得加上PSet来指定位置?
又能否将这段步骤省去,只用print?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.115.84.252
1F：推 zupi:CurrentX=xxx, CurrentY=xxx 220.134.166.68 07/06
2F：推 Harrychou:不解,是另设2字串变数下去指定? 59.115.84.252 07/06