[VB6 - VB.NET]Creation de bouton à indice

Question

Bonjour à tous,

J'ai comme projet de créer un démineur, et pour ce faire, je souhaite crée une grille de 9*9 bouton (qui représenteraient les cases).
J'ai donc utilisé le code suivant:


 Dim Bt(9, 9) As Button
 For i = 1 To 9
            For j = 1 To 9
                Bt(i, j) = New Label()
                Bt(i, j).Visible = True
                Bt(i, j).Height 40 : Bt(i, j).Width 40
                Bt(i, j).Text = " "
                Bt(i, j).Location = New Point(i * 40, j * 40)
                Me.Controls.Add(Bt(i, j))
            Next
 Next


J'obtient donc une grille de 9*9 bouton.

Ma question est la suivante, quel est le code pour que lorsqu'on clique sur le bouton Bt(5, 9) (par exemple) ledit bouton deviennent invisble.

(Ce serait pour éviter d'avoir à créer les 81 bouton, puis d'écrire une ligne de code par bouton pour que lorsqu'on clique dessus, il devienne invisible)

J&#8217;espère mettre exprimé clairement.
Bonne soiré.

acive · Answer

Bonjour,

Déjà...
Tu as déclaré les boutons:
"Dim Bt(9, 9) As Button"
Et en suite tu les appelles Label ??? 
"Bt(i, j) = New Label()"



Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

acive · Answer

Et d'ailleurs,
Ce n'est pas du vb6, (la présente section) en quel langage programmes-tu ???

Il faut le deviner?
Désolé ma boule de cristal est tombée par terre tout à l'heure...

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

Utilisateur anonyme · Answer

Bonjour,

Tu mets une seule procédure de bouton_click et après le handles tu mets la liste de 81 boutons_click

À l'exécution, tu testes sender.tostring ou sender.name pour savoir quel bouton à été cliqué.

[VB6 -> VB.NET]Creation de bouton à indice

3 réponses

Votre réponse

Discussions similaires