|
Création graphique et des formes dans Visual Basic (VB) commence avec les étapes de programmation nécessaires pour dessiner 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 complexes peuvent apparaître sur l'écran de votre ordinateur. Le processus nécessite l'écriture de code informatique laborieux en l'absence de logiciel de graphisme sophistiqué mais il est parfaitement possible en utilisant les blocs de construction décrites ici . Choses que vous devez
Visual Basic 6.0
Afficher plus Instructions
1 Ouvrez un nouveau projet Visual Basic en utilisant le modèle " standard EXE " , l'un des choix qui apparaissent lorsque vous choisissez un nouveau projet. Enregistrez le projet et le formulaire lorsque vous êtes invité comme MyGraphicsDemo . Réglez la hauteur " Form1 " dans la fenêtre Propriétés de 5400 et la largeur à 6800.
2 Double -cliquez sur l'icône « bouton de commande » dans la colonne de boîte à outils à gauche pour l'ajouter à la forme . C'est un petit rectangle normalement situé dans la colonne de droite, des outils et des tiers à partir du haut . L'étiquette s'affiche lorsque vous placez votre curseur dessus. Cliquez sur le bouton pour mettre l'accent sur ses "Propriétés" dans la fenêtre de droite et changer la propriété " Caption" pour lire " Montrez-moi Quelques points colorés ! " Sans entrer dans les guillemets . Changez la propriété Height à 500 et la propriété Width à 3000.
3 Ouvrez une fenêtre de code en cliquant sur "View" puis "Code" dans le niveau supérieur du menu Visual Basic. Définir les points de positionnement sur l'écran, la taille et la couleur d'abord avec le code illustratif . Alors varier les paramètres d'apprendre ce qui est possible en utilisant seulement les points uniques . Dans ce code, les lignes " PSet » créent des points de couleurs différentes , tandis que les lignes de code contenant "Rnd " dupliquer de nombreux points dans des couleurs et des emplacements aléatoires. Lorsque vous avez terminé , appuyez sur la touche "F5 " pour voir le résultat
Private Sub Command1_Click () BackColor = vbRedPSet ( 0, 0) PSet (15, 5) , vbCyanPSet (20, 10) , vbYellowCurrentX = 500 : . CurrentY = 500 pour i = 1 To 20PSet Step ( 0, 0) NextFor i = 1 To 500DrawWidth = Rnd * 5 + 1PSet (Rnd * ScaleWidth , Rnd * ScaleHeight ) , RGB (Rnd * 255 * 255 Rnd , Rnd * 255) NextDrawWidth = 1End Sous
4 créer un grand triangle en utilisant la "Ligne" commande Visual Basic , qui utilise des paramètres de localisation pour dessiner le triangle. Ajouter un rectangle de couleur avec la commande de ligne en utilisant différents points de localisation . Ajoutez deux boutons de commande à la forme comme dans l'étape 2. Modifiez les propriétés Caption de lire " dessiner un triangle » et « dessiner un rectangle ", respectivement. Vous devrez peut-être élargir les cases comme dans l'étape 2. Ensuite, entrez le code suivant en dessous des lignes de code précédentes . Lorsque vous avez terminé , appuyez sur la touche "F5 " pour voir
Private Sub Command2_Click () ligne ( 1500, 3000) - . Step (1000 , 0) , vbBlackLine - Step (0 , 1000) , vbBlackLine - (1500 , 3000 ) , vbBlackEnd SubPrivate Sous Command3_Click () ligne (1200, 1500) - Step (2100 , 1100) , vbGreen , plier sous
5 Dessinez un cercle avec les lignes de code suivantes . Dessin ellipses et arcs utilise le même processus , il vous suffit de modifier les dimensions et où les cercles début et de fin . En élargissant un aspect du cercle, vous le mettez dans une ellipse et en ne fermant pas le cercle , vous faites un arc. Pour configurer cela , ajoutez un bouton de commande plus , l'étiquetage celui-ci " tracer un cercle " .
Private Sub Command4_Click () DrawWidth = 5FillStyle = vbFSSolidFillColor = vbCyanCircle (2000 , 2000) , 1000, vbBlueEnd Sous
|
