Rechercher : dans
Par :

Probleme visual basic if

Dernière réponse le 9 jui 2009 à 22:51:11 napster94700, le 9 jui 2009 à 19:17:38 
 Signaler ce message aux modérateurs

Bonjour,

J'ai un petit probleme sur
Je voudrais mettre
time activé (sa c'est ok)
aller chercher la valeur interval dans "cmdvaleur".text (sa c'est ok)

time.Enabled = True
time.Interval = cmdvaleur.Text

La est la partie ou je bloque
Je voudrais mettre
Si il n'y a rien dans "cmdvaleur".text alors mettre automatiquement l'interval 100

If time.Interval <> cmdvaleur.Text Then
Val(100)

Si vous pouvez m'aider merci

Configuration: Windows XP
Firefox 3.5

Meilleures réponses pour « Probleme visual basic if » dans :
Introduction à Visual Basic Voir Présentation de Visual Basic Visual Basic est un outil développé par Microsoft pour développer facilement des applications fonctionnant sous Microsoft Windows ©. Visual Basic est, comme son nom l'indique, un outil visuel permettant de créer...
Télécharger Visual Basic 6 Runtime (VB6 DLL) Voir Le Runtime Visual Basic 6 contient l'ensemble des librairies (DLL) nécessaires pour exécuter des programmes écrits en langage Visual Basic 6.0. Il contient notamment les DLL suivantes :...
Erreur système : Microsoft Visual Basic VoirEn ouvrant Excel, vous rencontrez un message d'erreur. Une fenêtre au nom de "Microsoft Visual Basic" s'ouvre avec le contenu suivant : Erreur système &H80004005 (-2147467259). Erreur non spécifiée Pour corriger le problème, suivez les...
Introduction à VBScript VoirPrésentation de VB Script VBScript (aussi appelé Visual Basic Scripting Edition) est un sous-ensemble du langage Visual Basic for Applications (VBA), un langage propriétaire de Microsoft prévu pour être intégré aux produits Microsoft Office©,...
Généralités sur Visual Basic VoirConcept de Visual Basic l'Environnement de Développement intégré

1

ghuysmans99, le 9 jui 2009 à 19:26:31

1) Time est une fonction du langage, qui renvoie l'heure. Nomme donc ton objet tmr, par exemple.
2) Faudrait que tu comprennes ce que tu codes ! Ce que tu nous présentes n'a aucun sens.
3) T'a convention de nommage (et tes noms) n'a aucun sens : cmd c'est pour les boutons, txt pour les textbox, ...

'Dans un module mod_Textbox
Option Explicit
Private Const ES_NUMBER = &H2000&
Private Const GWL_STYLE As Long = -16

Private Declare Function GetWindowLong Lib "user32.dll" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Public Sub RestrictTextboxToNumbers(txt As TextBox)
SetWindowLong txt.hwnd, GWL_STYLE, GetWindowLong(txt.hwnd, GWL_STYLE) Or ES_NUMBER
End Sub

'Dans Form_Load
RestrictTextboxToNumbers txtInterval

'Bouton ou tout ce que tu veux
tmr.Enabled = True
If Me.txtInterval.Text = "" Then tmr.Interval = 100 Else tmr.Interval = CInt(Me.txtInterval.Text)
VB.NET is good ... VB6 is better !

Répondre à ghuysmans99

2

napster94700, le 9 jui 2009 à 19:37:20

Dsl je débute vraiment merci beacoup

"'Dans Form_Load
RestrictTextboxToNumbers txtInterval "
Cela veut dire que la seule et unique chose dans la textbox poura etre de l'alpha c'est sa ?

'Dans un module mod_Textbox"
j'ai rien compris aux commandes, c'est une commande de base défini a la base ou c'est toi qui doit la rajouter ?



"'Bouton ou tout ce que tu veux
tmr.Enabled = True
If Me.txtInterval.Text = "" Then tmr.Interval = 100 Else tmr.Interval = CInt(Me.txtInterval.Text)"

Cela veut dire que le timer est activé et que
si interval.text n'a rien dedans, alors l'interval du temps = 100
Else tmr.Interval = CInt(Me.txtInterval.Text) sa je ne comprend pas

Dsl sa doit etre un peu pénible et simple pour toi mais la je débute et je me pose plein de question alors quand je ne trouve pas tout seul ou dans des cours je poste :/

Répondre à napster94700

4

ghuysmans99, le 9 jui 2009 à 22:48:39

Quand je dis dans un module mod_Textbox, je veux dire que tu dois :
- Créer un nouveau module
- Changer son nom : mettre mod_Textbox

Le timer est toujours activé.
Si le textbox = "" => l'interval est mis à 100.
Sinon l'interval c'est la valeur du textbox (string) convertie en entier (Convert into Integer) VB.NET is good ... VB6 is better !

Répondre à ghuysmans99

3

napster94700, le 9 jui 2009 à 19:54:45

J'ai réussi merci beacoup

Tu peux me donner des conseils au niveau de l'appellation
Par exemple toi tu les appelle comment le bouton 1, le 2, le 3 ... ?

Répondre à napster94700

5

 ghuysmans99, le 9 jui 2009 à 22:51:11

On ne nomme pas les boutons en fonction d'un numéro, on les nommes en fonctions de leur action.
Par exemple, si tu as un formulaire de logon, tu as 2 labels (lblUser,lblPass), 2 champs (txtUser,txtPass) et un bouton que tu nommeras naturellement cmdLogon. VB.NET is good ... VB6 is better !

Répondre à ghuysmans99