Timer tick besoin d'aide !!

vaucer 2 Messages postés samedi 13 septembre 2003Date d'inscription 6 août 2007 Dernière intervention - 6 août 2007 à 01:44 - Dernière réponse : cs_msarr 1 Messages postés lundi 23 août 2004Date d'inscription 14 juillet 2010 Dernière intervention
- 14 juil. 2010 à 11:37
Bonjour,

J'ai un problème au sujet d`un petit programme d`alarme qui se dèclenche grace à la fonction timer Tick

Je ne connais pas bien le visual Basic j'ai construit le programme correctement mais je n'arrive pas après beaucoup d'éfforts à modifier la valeur de la propriété "Interval" de mon Timer tick
J'ai crée un controle Textbox et je voudrais simplement pouvoir entrer une valeur en minutes convertie en millisecondes pour la propriété "Interval" de mon timer qui l'a modifie automatiquement.

Dsl pour mon immense inculture et merci à celui qui se donnera la mal de tenter de me répondre.

Ps: je joins une partie de mon code contenant la fonction timer à savoir que ses propriétés se mofidient dans  le code Region  généré par le Concepteur Windows Form, donc bien trop long et inutile à copier.

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

        If Interrupteur.Checked = "True" Then
            MsgBox("" & MsgCont.Text & "", , "")
        End If

    End Sub

    Private Sub Intervalles_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Intervalles.TextChanged

    End Sub

    Private Sub Interrupteur_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Interrupteur.CheckedChanged

    End Sub

    Private Sub MsgCont_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MsgCont.TextChanged

    End Sub

    Private Sub MsgCont_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MsgCont.MouseMove
        If MsgCont.Text = "//Texte//" Then
            MsgCont.Text = ""
        End If
    End Sub
Afficher la suite 

2 réponses

Répondre au sujet
lolokun 1241 Messages postés mardi 10 octobre 2006Date d'inscription 27 août 2013 Dernière intervention - 6 août 2007 à 15:03
0
Utile
Salut,

Dans la méthode change de ton textbox


 Private Sub MsgCont_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MsgCont.TextChanged
 timer1.interval=MsgCont_Text.text
  End Sub

Tu devrais pouvoir changer ta valeur d'intervalle..Je n'ai pas trop le temps de faire des tests mais tu dois trouver sur ce site des sources qui permettent de ne faire que la saisie de chiffre.
Et peut etre un souci si tu veux faire une saisie avec un nombre supérieur à 10.
J'essaierai de compléter un peu + tard le boulot m'appelle...
Commenter la réponse de lolokun
cs_msarr 1 Messages postés lundi 23 août 2004Date d'inscription 14 juillet 2010 Dernière intervention - 14 juil. 2010 à 11:37
0
Utile
mbs
Commenter la réponse de cs_msarr

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.