Discussion :

[Luffy76380]

Bonjour,

j'aurais besoin d'un petit peu d'aide dans la réalisation d'un de mes projets, je suis sous Visual Basic express 2008 avec derrière une BD sql server même si là pour mes questions, on s'en tamponne l'artichaud . J'ai deux questions ditinctes :

1. Je voudrais pouvoir déclencher le même évènement qu'un bouton "Connecter" par l'appui de la touche "Entrer". J'ai cru comprendre qu'il fallait passer par un Keylistener mais je ne vois pas comment utiliser cet élément. En faite il me faudrait un traitement comme celui ci mais avec une syntaxe correcte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub FrmGestion_Keypress(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnConnecter.Keypress
 
        If keyCode = 13 then
            BtnConnecter_clik()
        End if       
End Sub

(j'avais prévenu pour la syntaxe )


2. J'aimerais savoir la commande permettant d'afecter a une variable une valeur correspondante a la date sélectionnée dans un MonthCalendar


Merci 'avance

Luffy76380

[matll]

1. Je voudrais pouvoir déclencher le même évènement qu'un bouton "Connecter" par l'appui de la touche "Entrer". J'ai cru comprendre qu'il fallait passer par un Keylistener mais je ne vois pas comment utiliser cet élément. En faite il me faudrait un traitement comme celui ci mais avec une syntaxe correcte :

Bonjour,
Pour l'utilisation de la touche Entrée, ta syntaxe me parait correct, mis à part que l’évènement Click de ton bouton prend en arguments 2 paramètres, (tu peux très bien passer ceux de ton KeyPress ou KeyUp). Je ne sais pas si l’évènement KeyPress est appelé plusieurs fois dans le cas du maintien d'une touche, donc (à titre personnel), je préfère utiliser le KeyUp (lorsqu'on lache la touche).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub TbNom_KeyUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles tbNom.KeyUp
        If (e.KeyCode = Keys.Enter) Then
            BtnConnecter_Click(sender, e)
        End If
    End Sub

2. J'aimerais savoir la commande permettant d'afecter a une variable une valeur correspondante a la date sélectionnée dans un MonthCalendar

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim d As Date = MonthCalendar1.SelectionRange.Start

Après un petit coup de recherche dans l'auto-complétion, SelectionRange.Start récupère la 1ère date sélectionnée. Tu as aussi End pour la dernière

@+