VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



This is simple freeform drawing in a form

by Dipin George (1 Submission)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 8th January 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

This is simple freeform drawing in a form

API Declarations


Dim PosY As Integer


Rate This is simple freeform drawing in a form



CurrentX = X
CurrentY = Y
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbLeftButton Then
    Line -(X, Y), vbRed
End If
End Sub


Download this snippet    Add to My Saved Code

This is simple freeform drawing in a form Comments

No comments have been posted about This is simple freeform drawing in a form. Why not be the first to post a comment about This is simple freeform drawing in a form.

Post your comment

Subject:
Message:
0/1000 characters