Πως να χρησιμοποιήσετε την ζωγραφική σε μια εφαρμογή σας Vb.

Εάν ήθελες να φτιάξεις μια δίκια σου εφαρμογή ζωγραφικής η να κάνεις την εφαρμογή σου πιο διασκεδαστική εδώ είναι η λύση. Η Εφαρμογή είναι απλή και κατανοητή ο κώδικας αρκετά εύκολος που μπορεί να το κάνει ο καθένας.

Αυτό που πρέπει να κανεις είναι πρώτα ειναι να βάλεις ένα αντικείμενο στην συγκεκριμένη περίπτωση εγώ έβαλα ένα PictureBox και μερικά button's.

Το επόμενο πράγμα που πρέπει να κάνεις είναι να φτιάξεις δυο αντικείμενα,
Το down και το mybrush.

Δηλαδή: dim down και dim mybrush

Το down το καθορίζουμε ως false και το mybrush ως brushes.black  κάτω απο την πρώτη σιρα.
Brushes.black : Πινέλα.μαύρο
down = false: κλικαρουμε όχι

Τώρα μπαίνουμε στο ενδιαφέρον κομμάτι.
Πρέπει να προσθέσουμε τρις εντολές του PictureBox. 
1. PictureBox1_MouseDown  (Όταν το click πατιέται). ΣΤΟ PICTUREBOX!! ΜΟΝΟ
2. PictureBox1_MouseMove  (Όταν το ποντίκι σύρεται). ΣΤΟ PICTUREBOX!! ΜΟΝΟ
3. PictureBox1_MouseUp  (Όταν αφήνουμε το click).  ΣΤΟ PICTUREBOX!! ΜΟΝΟ

Το επόμενο βήμα είναι να προσθέσουμε εντολές στα παρακάτω που προσθέσαμε.
Στο PictureBox1_MouseDown βάζουμε το εξής: down = True



Στο PictureBox1_MouseMove βάζουμε  το εξής..

Εαν Down ειναι true δηλαδή κρατάμε το click στο picturebox τοτε σχηματίζει κύκλο στα σημεία του ποντικιού σε μέγεθος 15 x 15 , else = ή αλλιώς τίποτα.

mybrush = το χρώμα του πινέλου (το δώσαμε πιο πάνω ως Black)
e.x , e.y = Σημεία.
15, 15 = Μέγεθος(integer)

Και στο PictureBox1_MouseUp βάζουμε... down = false.

Αυτό ήταν!
Εάν θέλουμε το brush να αλλάζει χρώματα απλά βάζουμε στα button's το εξής mybrush = Brushes.White ανάλογος του χρώματος που θέλουμε.

Πειραματιστείτε! υπάρχουν ακόμα πολλές δυνατότητες!

Κατέβασε το project click εδω.

 Κατέβασε την εφαρμογη.