Virgule et point
Résolu
Partouchefrancis
Messages postés
107
Date d'inscription
Statut
Membre
Dernière intervention
-
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention - 5 oct. 2020 à 16:49
yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention - 5 oct. 2020 à 16:49
A voir également:
- Virgule et point
- Point de suite word - Guide
- Point de restauration - Guide
- Point gps - Guide
- Comment inserer une video dans un power point - Guide
- I deux point - Forum Windows
5 réponses
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour, "cela ne marche pas": veux-tu dire que isnumeric retourne faux?
voilà le code
et voilà le message d'erreur qui apparait quand j'utilise le . du pavé ou le . du clavier

merci d'une réponse
je ne comprends pas pourquoi le . n'est pas interprété comme la virgule
cordialement
Public Class Form1
Dim Bon As Boolean
Private Sub BTN_QUITTER_Click(sender As Object, e As EventArgs) Handles BTN_QUITTER.Click
End
End Sub
Private Sub Consommation(sender As Object, e As EventArgs) Handles TXT_CONSOMMATION.TextChanged
If Not IsNumeric(TXT_CONSOMMATION.Text) Or TXT_CONSOMMATION.Text = "" Then
Bon = False
Else
Bon = True
End If
End Sub
Private Sub Longueur(sender As Object, e As EventArgs) Handles TXT_LONGUEUR.TextChanged
If Not IsNumeric(TXT_LONGUEUR.Text) Or TXT_LONGUEUR.Text = "" Then
Bon = False
Else
Bon = True
End If
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub
Private Sub Prix(sender As Object, e As EventArgs) Handles TXT_PRIX.TextChanged
If Not IsNumeric(TXT_PRIX.Text) Or TXT_PRIX.Text = "" Then
Bon = False
Else
Bon = True
End If
End Sub
Private Sub BTN_CALCULER_Click(sender As Object, e As EventArgs) Handles BTN_CALCULER.Click
Dim Cout As Double
Cout = CDbl(((TXT_LONGUEUR.Text / 100) * TXT_CONSOMMATION.Text * TXT_PRIX.Text))
If Bon = False Then
LBL_ATTENTION.Text = "Soyez gentils ne mettez pas n'importe quoi"
Else
LBL_COUTV.Text = "le coût du voyage est " & Cout & "euros"
End If
End Sub
End Class
et voilà le message d'erreur qui apparait quand j'utilise le . du pavé ou le . du clavier

merci d'une réponse
je ne comprends pas pourquoi le . n'est pas interprété comme la virgule
cordialement
tu vas dans parametres , heure s et langues ,régions
en haut à droite tu cliques sur Paramètres de date, heure et régionaux supplémentaires puis sur région , tu cliques sur , modifier les formats de date ,d'heure ou de nombre , tu vas dans l'onglet Formats et tu cliques sur Paramètres supplémentaires et tu remplaces la virgule par le point dans l'onglet décimal puis appliquer puis ok ....
voilà
en haut à droite tu cliques sur Paramètres de date, heure et régionaux supplémentaires puis sur région , tu cliques sur , modifier les formats de date ,d'heure ou de nombre , tu vas dans l'onglet Formats et tu cliques sur Paramètres supplémentaires et tu remplaces la virgule par le point dans l'onglet décimal puis appliquer puis ok ....
voilà
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonsoir
un peu de lecture pour la virgule
https://codes-sources.commentcamarche.net/faq/11316-conversion-de-string-en-nombre-en-net-c-et-vb-net
un là comment bien poster un code sur le site
https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
un peu de lecture pour la virgule
https://codes-sources.commentcamarche.net/faq/11316-conversion-de-string-en-nombre-en-net-c-et-vb-net
un là comment bien poster un code sur le site
https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
si je lis bien, tu as testé avec la virgule, avec le point du pavé numérique, mais pas avec le point du clavier normal.