vb的问题
用右键单击一次Command1,Picture1打印出a,再右键单击,原有的a自动删除,打印出另一个a,再右键单击,又重复了一次。
怎么编??
参考答案:Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
'打印控制,true表示打印,false表示不打印
Static printFlag As Boolean
'Button=2表示单击的是右键
If Button = 2 And printFlag Then
Picture1.Print "a"
Else
Picture1.Cls
End If
printFlag = Not printFlag
End Sub
该程序在Windows 2003+Visual Basic 6.0 SP6环境下运行成功,完全符合你题目的要求,有问题来群:***********讨论.