VB中怎样删除用PSET方法画出的某个点(只删除一个点，而不是清屏)
答案:1 悬赏:60
解决时间 2021-01-08 12:36
- 提问者网友：你独家记忆
- 2021-01-08 02:03
VB中怎样删除用PSET方法画出的某个点(只删除一个点，而不是清屏)
最佳答案
- 二级知识专家网友：独行浪子会拥风
- 2021-01-08 03:25
这样 ，清除点可以采用重绘点的方法（用背景色重绘）
Private Sub Form_Load()
Show
DrawWidth = 10
again:
For i = 0 To 2 * 3.14 Step 0.0001
PSet (1500 + 1000 * Cos(i), 1500 + 1000 * Sin(i))
Me.ForeColor = Me.BackColor
PSet (1500 + 1000 * Cos(i), 1500 + 1000 * Sin(i))
Me.ForeColor = vbBlack
Next
GoTo again
End Sub
Private Sub Form_Load()
Show
DrawWidth = 10
again:
For i = 0 To 2 * 3.14 Step 0.0001
PSet (1500 + 1000 * Cos(i), 1500 + 1000 * Sin(i))
Me.ForeColor = Me.BackColor
PSet (1500 + 1000 * Cos(i), 1500 + 1000 * Sin(i))
Me.ForeColor = vbBlack
Next
GoTo again
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯