Πώς να κάνει ένα πρόγραμμα Paint

Γνωρίζοντας πώς να κάνει ένα πρόγραμμα ζωγραφικής στο Microsoft Visual Basic.NET ( VB.NET ) μπορεί να ξεκινήσετε με τη χρήση γραφικών στον προγραμματισμό . VB.NET είναι μια αντικειμενοστραφής γλώσσα προγραμματισμού που χρησιμοποιείται για τη δημιουργία desktop , Web και mobile εφαρμογών . VB.NET προσφέρει μια κατηγορία γραφικών που μπορούν να χρησιμοποιηθούν για αντικείμενα σχεδίασης όπως τετράγωνα , κύκλους και γραμμές . Μπορείτε να χρησιμοποιήσετε το στοιχείο ελέγχου ColorDialog να εμφανιστούν όλα τα διαθέσιμα χρώματα για το χρήστη και να χρησιμοποιήσετε το χρώμα που έχει επιλεγεί για να βγάλουμε τα αντικείμενα σας . Τα πράγματα που θα χρειαστείτε για Microsoft Visual Basic Express
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Ξεκινήστε το Microsoft Visual Basic Express , κάντε κλικ στο " New Project ... " στο αριστερό τμήμα της οθόνης σας , στη συνέχεια, επιλέξτε " Windows Forms Application ". Κάντε κλικ στο " OK". 2

διπλό κλικ στο " κουμπί" για την " Toolbox " για να προσθέσετε ένα νέο κουμπί . Κάντε διπλό κλικ στο " Πλαίσιο ελέγχου " για να προσθέσετε ένα νέο πλαίσιο κειμένου . Προσθέστε δύο πλαίσια ελέγχου στη φόρμα . Κάντε διπλό κλικ στο " ColorDialog " για να προσθέσετε το στοιχείο ελέγχου του προγράμματος . . Κάντε διπλό κλικ στο " Button1 " για να ανοίξει το μάθημα « Form1.vb "
εικόνων 3

αντιγραφή και επικόλληση τον παρακάτω κωδικό στο εσωτερικό της διαδικασίας " Button1_Click " να αφήσει το χρήστη να επιλέξει ένα χρώμα :

Me.ColorDialog1.ShowDialog ( )

Εάν Me.ColorDialog1.ShowDialog = DialogResult.OK τότε

clr = ColorDialog1.Color

End If
Φτηνές 4

αντιγραφή και επικόλληση του παρακάτω υπό τον τίτλο " Public Class Form1 " για να δημιουργήσετε δύο καθολικές μεταβλητές που χρησιμοποιούνται για τη δημιουργία γραφικών και το χρώμα :

Ιδιωτική gfx Όπως Graphics

Ιδιωτική CLR ως χρώμα
5

Κάντε κλικ στο βέλος πτώση από το πλαίσιο επάνω αριστερά combo και επιλέξτε " ( Form1 Events ) . " Επιλέξτε το "Load " για να δημιουργήσετε τη φόρμα εκδήλωσης και να αντιγράψετε και να επικολλήσετε τα ακόλουθα μέσα της εκδήλωσης :

gfx = Me.CreateGraphics ( )
Η

6 Κάντε κλικ στο " FormClosed " εκδήλωση για να δημιουργήσετε το γεγονός και να αντιγράψετε και να επικολλήσετε τα ακόλουθα για να διαθέσει τα γραφικά αντιρρήσεις :

gfx.Dispose ( )
Η

7 Κάντε κλικ στο " MouseMove " εκδήλωση για να δημιουργήσει το συμβάν , και να αντιγράψετε και να επικολλήσετε το παρακάτω κώδικα για να βγάλουμε τα αντικείμενα όταν ο χρήστης μετακινεί το ποντίκι :

Αν e.Button <> Windows.Forms.MouseButtons.Left συνέχεια Exit Sub

Dim rect Όπως ορθογώνιο

Dim myPen Όπως Pen

myPen = Νέα Pen ( clr , 2 )

Εάν Me.CheckBox1.Checked τότε

με ορθ

. X = eX - 1

Y = τΈ - . . 1.

Πλάτος = 15

Ύψος = 15

End With

gfx.DrawRectangle ( myPen , rect )

End If

Εάν Me.CheckBox2.Checked τότε

με ορθ

. Πλάτος = 15

Ύψος = 15

End With

gfx.DrawLine ( myPen , eX , τΈ , eX - 1 , τΈ - 1 )

End If

Αν Me.CheckBox3.Checked τότε

myPen = Νέα Pen ( clr , 2 )

με ορθ

X = eX - . 1
<. p> Y = τΈ - . 1.

Πλάτος = 15

Ύψος = 15

End With

gfx.DrawEllipse ( myPen , rect )

End If
8

Πατήστε το πλήκτρο " F5 " για να τρέξετε το πρόγραμμά σας , στη συνέχεια, κάντε κλικ στο κουμπί " Button1 " για να επιλέξετε ένα χρώμα για τα αντικείμενα σας . Ελέγξτε το πρώτο πλαίσιο ελέγχου για να σχεδιάσετε μια σειρά από ορθογώνια . Ελέγξτε το δεύτερο πλαίσιο για να σχεδιάσετε γραμμές ή ελέγξτε το πλαίσιο ελέγχου τρίτο για να σχεδιάσετε μια σειρά από κύκλους .
Η
εικόνων