autodidacte3
Messages postés58Date d'inscriptionmardi 21 juillet 2009StatutMembreDernière intervention25 décembre 2014
-
23 mai 2013 à 11:47
autodidacte3
Messages postés58Date d'inscriptionmardi 21 juillet 2009StatutMembreDernière intervention25 décembre 2014
-
23 mai 2013 à 15:05
En VB.net, Es que c'est correct d'écrire un code ainsi ?
sachant qu'il n y a aucun bug "pour le moment" :)
txt_2Monnaie22.Text = Replace(txt_2Monnaie22.Text, ".", ",")
txt_2Monnaie22.Text = Format(CDbl(txt_2Monnaie22.Text), "#,###,###,##0.00")
If (Me.txt_2Monnaie22.Text.Length) > 18 Or Not IsNumeric(Me.txt_2Monnaie22.Text) Then
MsgBox("Corriger, montant 2 ?")
txt_2Monnaie22.Text = 0.0
Exit Sub
txt_2Monnaie22.Select()
Else
cmd.Parameters.AddWithValue("Val_MontantU.Trim()", String.Format("{0:n2}", txt_2Monnaie22.Text))
End If
NHenry
Messages postés15069Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention29 mai 2023158 23 mai 2013 à 14:22
Bonjour,
En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).
MsgBox -> MessageBox.Show
Replace -> MaChaine.Replace
IsNumeric -> Integer(ou single, double, ...).TryParse
Format -> MonDouble.ToString(...)
Ton code :
Exit Sub
txt_2Monnaie22.Select()
txt_2Monnaie22.Select() n'est donc jamais executé.
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site