ajouter un bouton dans une fenêtre en mode console

Version imprimable

07/09/2014, 17h32
stracoma

ajouter un bouton dans une fenêtre en mode console
Bonjour tout le monde, j'ai besoin de votre aide. vous avez compris le problème à partir du titre:
Ajouter un bouton en mode console et pas en mode graphique (cliquer-glisser-déposer)
Code:

1 2 3 4 5 6 Public Class Form1 * ****Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load *******?????????????????? ****End Sub End Class

Bonjour,

Il faut le créer dynamiquement.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
    Private UnBouton As Button
    Private Sub form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        UnBouton = New Button                   ' création du bouton
        UnBouton.Name = "MonBouton"        ' définition des propriétés
        UnBouton.Location = New Point(20, 20)
        UnBouton.Size = New Size(100, 25)
        UnBouton.Font = New Font("Arial", 10, FontStyle.Bold)
        UnBouton.Text = "Bouton Dyn."
        AddHandler UnBouton.Click, AddressOf unButton_Click        ' gestion de l'évènement clic
        Me.Controls.Add(UnBouton)              ' ajout à la fenêtre
    End Sub
    Private Sub unButton_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        MessageBox.Show("clic sur le bouton " & UnBouton.Name)
    End Sub

En plus de l'import Imports System.Windows.Forms il faut Imports System.Drawing pour point, size et font.

07/09/2014, 21h17
stracoma

rv26t,merci infiniment, le code marche.
Franchement j'ai cherché dans d'autres forums sans succès
Merciiiiiiiiiiii