Création graphique et des formes dans Visual Basic (VB) commence avec les étapes de programmation nécessaires pour tirer des éléments simples tels que des points, des lignes, des rectangles, des cercles, des ellipses et des arcs. En combinant ces éléments de différentes manières et des formes, des graphiques compliqués peuvent apparaître sur l`écran de votre ordinateur. Le processus nécessite l`écriture de code informatique laborieuse en l`absence de logiciels graphiques sophistiqués, mais est tout à fait possible en utilisant les blocs de construction décrites ici.
Choses que vous devez
- Visual Basic 6.0
Ouvrez un nouveau projet Visual Basic en utilisant le "EXE standard" modèle, l`un des choix qui apparaissent lorsque vous choisissez un nouveau projet. Enregistrez le projet et le formulaire lorsque vous êtes invité comme MyGraphicsDemo. Met le "Formulaire 1" Hauteur dans la fenêtre Propriétés de 5400 et la largeur à 6800.
Double-cliquez sur le "Bouton de commande" icône dans la gauche; la colonne de la boîte à outils à la main pour l`ajouter à la forme. Ceci est un petit rectangle normalement situé dans la droite, la colonne de gauche d`outils et le troisième à partir du haut. L`étiquette apparaît lorsque vous placez votre curseur dessus. Cliquez sur le bouton pour se concentrer sur son "Propriétés" dans la fenêtre de droite et changer la "Légende" propriété à lire "Montrez-moi quelques points de couleur!" sans entrer dans les guillemets. Modifiez la propriété Height à 500 et la propriété Width à 3000.
Ouvrez une fenêtre de code en cliquant sur "Vue" et alors "Code" dans le menu Visual Basic de haut niveau. Définissez les points d`emplacement sur l`écran, la taille et la couleur d`abord avec le code d`illustration. Ensuite, modifier les paramètres d`apprendre ce qui est possible en utilisant des points tout simples. Dans ce code, la "PSet" lignes créent des points de différentes couleurs, tandis que les lignes de code contenant "Rnd" dupliquer de nombreux points dans des couleurs aléatoires et les emplacements. Lorsque vous avez terminé, appuyez sur "F5" pour voir le résultat.
Private Sub Command1_Click ()
BackColor = vbRed
PSet (0, 0)
PSet (15, 5), vbCyan
PSet (20, 10), vbYellow
CurrentX = 500: CurrentY = 500
Pour i = 1 à 20
PSet étape (0, 0)
Prochain
Pour i = 1 à 500
DrawWidth = Rnd 5 + 1
PSet (Rnd ScaleWidth, Rnd ScaleHeight), RGB (Rnd 255, Rnd 255, Rnd 255)
Prochain
DrawWidth = 1
End SubCréer un grand triangle en utilisant la "Ligne" commande Visual Basic, qui utilise les paramètres d`emplacement pour dessiner le triangle. Ajouter un rectangle de couleur avec la commande de ligne en utilisant différents points de localisation. Ajouter deux CommandButtons à la forme comme dans l`étape 2. Modifiez les propriétés Caption pour lire "Dessinez un triangle" et "Dessinez un Rectangle" respectivement. Vous devrez peut-être élargir les boîtes comme à l`étape 2. Ensuite, entrez le code suivant ci-dessous les lignes précédentes du code. Lorsque vous avez terminé, appuyez sur "F5" regarder.
Private Sub Command2_Click ()
La ligne (1500, 3000) - Etape (1000, 0), vbBlack
Line - Etape (0, 1000), vbBlack
Line - (1500, 3000), vbBlack
End Sub
Private Sub Command3_Click ()
Ligne (1200, 1500) - Etape (2100, 1100), vbGreen, B
End SubTracez un cercle avec les lignes de code suivantes. Dessin des ellipses et des arcs utilise le même Process- que vous venez de modifier les dimensions et où les cercles commencent et se terminent. En élargissant un aspect du cercle, vous transformer en une ellipse et en ne fermant pas le cercle, vous faites un arc. Pour configurer cela, ajouter un bouton de commande, celui-étiquetage "Tracez un cercle".
Private Sub Command4_Click ()
DrawWidth = 5
FillStyle = vbFSSolid
FillColor = vbCyan
Cercle (2000, 2000), 1000, vbBlue
End Sub
