|
Savoir comment faire un programme de peinture dans Microsoft Visual Basic.NET ( VB.NET ) peut vous aider à démarrer l'utilisation de graphiques dans la programmation. VB.NET est un langage de programmation orienté objet utilisé pour créer des applications de bureau, Web et mobile. VB.NET propose une classe graphique qui peut être utilisé pour dessiner des objets tels que des rectangles, des cercles et de lignes . Vous pouvez utiliser le contrôle ColorDialog pour afficher toutes les couleurs disponibles pour l'utilisateur et utiliser la couleur choisie pour dessiner vos objets. Choses que vous devez
Microsoft Visual Basic Express
Voir Plus Instructions
1 Démarrez Microsoft Visual Basic Express, cliquez sur "Nouveau projet ... " Dans le volet gauche de votre écran , puis sélectionnez « Application Windows Forms . " Cliquez sur « OK ».
2 Double-cliquez sur "Button" sur la " boîte à outils " pour ajouter un nouveau bouton . Double-cliquez sur "Check Box " pour ajouter une nouvelle zone de texte . Ajoutez deux autres cases à cocher dans le formulaire. Double -cliquez sur " ColorDialog " pour ajouter le contrôle au programme . Double -cliquez sur " Button1 " pour ouvrir le "Form1.vb" module
3 Copiez et collez le code suivant dans la procédure " Button1_Click " pour permettre à l'utilisateur de choisir une couleur : .
Me.ColorDialog1.ShowDialog ()
Si Me.ColorDialog1.ShowDialog = DialogResult.OK Puis
clr = ColorDialog1.Color
End If < br > Hôtels 4 Copiez et collez ce qui suit sous la rubrique « public Class Form1 " pour créer deux variables globales utilisées pour créer des graphiques et des couleurs :
privé GFX Comme Graphics
privé clr Comme Couleur
5 Cliquez sur la flèche déroulante de la zone de liste déroulante en haut à gauche et sélectionner " ( Form1 Events ) . " Sélectionnez l'option " Load" pour créer l'événement de formulaire et copier et coller le suivant dans l' événement :
GFX = Me.CreateGraphics ()
6 Cliquez sur l'événement " FormClosed " pour créer l'événement et copiez et collez le texte suivant se débarrasser de l' objet graphique :
gfx.Dispose ()
7 Cliquez sur l'événement " MouseMove " pour créer l'événement , et copier et coller le code ci-dessous pour dessiner des objets lorsque l'utilisateur déplace la souris:
Si e.Button <> Windows.Forms.MouseButtons.Left sortent alors Sub
Dim rect En Rectangle
myPen As Pen
myPen = New Pen ( clr , 2)
Si Me.CheckBox1.Checked Puis
rect
. X = eX - 1 x Y = ey - . . . 1
Largeur = 15
Hauteur = 15
End With
gfx.DrawRectangle ( myPen , rect )
End If
Si Me.CheckBox2.Checked Puis
rect
. Largeur = 15 < br . > End With
gfx.DrawLine ( myPen , Ex, Ey , EX - 1, ey - 1)
End If < br > Si Me.CheckBox3.Checked Puis
myPen = New Pen ( clr , 2)
rect
X = eX - 1.
< p> Y = ey - . 1.
Largeur = 15
Hauteur = 15
End With
gfx.DrawEllipse ( myPen , rect ) . Photos End If
8 Appuyez sur " F5 " pour exécuter votre programme, puis cliquez sur "Button1 " pour choisir une couleur pour vos objets. Cochez la première case pour dessiner une série de rectangles. Vérifiez la deuxième case de tracer des lignes ou vérifier la troisième case à cocher pour dessiner une série de cercles .
|
