bouton avec clicRésolu

Question

bonjour,

je parviens pas à mettre en place le clique sur un bouton que je crée dans une form depuis un module voici mon code:
  Private Sub frmAuthentificationOledb()

        If My.Settings.sUserOledb "" And My.Settings.sPassOledb "" Then

            Dim frmOledb As New Form
            Dim txtUser As New TextBox
            Dim txtPass As New TextBox
            Dim lbUser As New Label
            Dim lbPass As New Label


            frmOledb.Select()
            frmOledb.FormBorderStyle = FormBorderStyle.Fixed3D
            frmOledb.Text = "Paramètre de connexion à la base"
            frmOledb.Size = New Size(400, 200)
            frmOledb.StartPosition = FormStartPosition.CenterScreen

            txtUser.Location = New Point(200, 50)
            txtPass.Location = New Point(200, 80)
            lbUser.Location = New Point(110, 50)
            lbPass.Location = New Point(120, 80)
            btnEnregistre.Location = New Point(200, 110)

            btnEnregistre.Text = "Enregistrer"

            txtUser.Parent = frmOledb
            txtPass.Parent = frmOledb
            lbUser.Parent = frmOledb
            lbPass.Parent = frmOledb
            btnEnregistre.Parent = frmOledb

            lbUser.Text = "Nom d'utilisateur : "
            lbPass.Text = "Mot de passe : "

            frmOledb.ShowDialog()


        Else


        End If




    End Sub

donc je créer 2 textbox,2 label et 1 bouton,comme pour faire en mode Design je souhaite mettre en place le clique sur le btnEnregistre.

Par avance merci.

Renfield · Accepted Answer

voir 
AddHandler


Renfield - Admin CodeS-SourceS - MVP Visual Basic	& Spécialiste des RegExp

cs_ShayW · Answer

Salut

où est la déclaration de 
btnEnregistre 
et aussi les controls crées dynamiquement il
faut les ajouter à ta form (au control container
qui les contient)
frmOledb.Controls.Add(txtUser)etc...
declarer un évenement à un control crée dynamiquement
 AddHandler toncontrol.MouseClick, AddressOf  toncontrolclick

Bouton avec clic

2 réponses

Votre réponse

Discussions similaires