Comment créer un code de pavé numérique dans vb 6 qui s'affiche lorsque vous appuyez sur 1 cercle ?

Sous-commande privé1_Click()

Pour i =1 à 8

Cercles.Ajouter une forme :=cdOval, Gauche :=30 * (i Mod 3), Haut :=30 * Int(i / 3), _

Largeur :=20, Hauteur :=20, BackColor :=clHighlight

Ensuite, je

Fin du sous-marin

```