In VB 6.0, I am making an application that is similar to paint. I have made some code that makes a dot appear when you click and move. This appears below:
Private Sub picpaint_MouseDown(Button As Integer, Shift As Integer, X As Single, y As Single)
Well = True
picpaint.PSet (X, y)
End Sub
Private Sub picpaint_MouseMove(Button As Integer, Shift As Integer, X As Single, y As Single)
If Well = True Then
picpaint.PSet (X, y)
End If
End Sub
Private Sub picpaint_MouseUp(Button As Integer, Shift As Integer, X As Single, y As Single)
Well = False
End Sub
This, however, makes a circular dot. Is there any way that I can make this dot a square?
Page 1 of 1
Using Picture Boxes Please Help (I am a beginner)
#2
Posted 01 November 2008 - 10:39 AM
TH0RN, on Oct 26 2008, 12:37 AM, said:
Is there any way that I can make this dot a square?
I have a little painter app will allow you to draw circles, rectangles, rectangles with round edges, floodfill and lines with all the difference colours and thicknesses you want to use. But I can't upload it here for some reason.
If you are new to VB then I would suggest you join a VB only forum there are loads about, read my sig.
Keith
Martin2k
Windows ME (spare computer)
Windows XP 2002 Professional SP3 (desktop computer)
Windows Vista Home Premium SP2 (laptop computer)
Martin2k
Windows ME (spare computer)
Windows XP 2002 Professional SP3 (desktop computer)
Windows Vista Home Premium SP2 (laptop computer)
Share this topic:
Page 1 of 1

Help


Back to top








