accepter la virgule - Algorithme / Maths, Visual Basic, VB6, VB.NET, VB 2005, VB

Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2008 11 22 04:16:14

.NET 4.0 / SILVERLIGHT 2 : CHANGEMENTS BRISANTS SUR LES TYPES STRING ET CHAR par coq

UTILISER OPENCV SOUS DEVC++ (OPTIONS DE COMPILATION) par MadMatt

ZUNE : NOUVELLE VERSION DU SOFTWARE ET FIRMWARE - V 3.1 par ROMELARD Fabrice

[OPEN XML] LES LIENS DE LA SEMAINE 17/11/08 ET AUTRES INFOS EN VRAC par neodante

TCB : EPICURIEN VOUS DITES ? A PARIS par themit

RE : PROBLEME ARRET PROGRAMME | THREAD par wpjo1956

RE : CHANGER LE PARAMèTRE "NOM TABLE" D'UNE REQUêTE CREATE DANS UNE MACRO par PCPT

RE : HTML ET VB6.0 par Renfield

LISTBOX AVEC DATABINDINGS par monopole

RE : FAIRE APPARAITRE UNE MSG ERREUR ..... par PCPT

+ de logiciels à télécharger

1 293 242 membres
54 nouveaux aujourd'hui
14 526 membres club

Trouver une ressource

Trouvez une ressource parmi 39 008 codes, 1 203 647 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : accepter la virgule [ Algorithme / Maths ] (Sinsitrus)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Visual Basic 6 / Algorithme / Maths / accepter la virgule
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

lundi 7 janvier 2008 à 13:01:56 | accepter la virgule

Sinsitrus	Bonjour a tous et bonne année 2008 Private Sub Taux_Change() If IsNumeric(Taux.Text) Then Else Taux.Text = 0 End If End Sub Voilà mon code depuis un textbox. Il ne prends en considération que les chiffres de 0 à 9 et les signe , + - Je voudrais pouvoir permettre le point "." pour qu'il soit pris en considération, ou soit le changer en "," Pouvez vous m'aider svp ?
	Rép. MP 213 msg 225 msg CS

lundi 7 janvier 2008 à 13:45:36 | Re : accepter la virgule

Exploreur	Salut, Pour remplacer le point ou la virgule, utilise pour cela : Replace Après pour accepter la virgule regarde du côté du code Ascii : 44 (Alt+44) A+ Exploreur Linux a un noyau, Windows un pépin
	Rép. MP 4340 msg 4372 msg CS

lundi 7 janvier 2008 à 13:48:36 | Re : accepter la virgule

Exploreur	Réponse acceptée ! Re, Private Sub Text1_KeyPress(KeyAscii As Integer) '<E> Keyascii = 44 >> , ' Keyascii = 46 >> . If KeyAscii = 44 Then MsgBox "J'suis la virgule !!!" End Sub A+ Exploreur Linux a un noyau, Windows un pépin
	Rép. MP 4340 msg 4372 msg CS Réponse acceptée !

lundi 7 janvier 2008 à 13:58:44 | Re : accepter la virgule

PCPT	Réponse acceptée ! salut à tous autre possibilité dans la même idée que celle d'Explo Private Sub Taux_KeyPress(KeyAscii As Integer) If InStr(1, "0123456789.," & vbBack, Chr$(KeyAscii)) = 0 Then KeyAscii = 0 End Sub ++ Prenez un instant pour répondre à ce sondage svp
	Rép. MP 8814 msg 9243 msg CS Réponse acceptée !

lundi 7 janvier 2008 à 14:06:04 | Re : accepter la virgule

Sinsitrus	Merci a tous ! Ca m'a été vraiment très utile. Explorer, tu réponds plus sur msn ? ca fais vieux mon pote !
	Rép. MP 213 msg 225 msg CS

lundi 7 janvier 2008 à 14:13:32 | Re : accepter la virgule

Exploreur	bah...t'es jamais connecté !!!! A+ Exploreur Linux a un noyau, Windows un pépin
	Rép. MP 4340 msg 4372 msg CS

Cette discussion est classé dans : text, taux, virgule, accepter, considération

Répondre à ce message

Sujets en rapport avec ce message

Après la virgule [ par zelze ] J'ai un truc du genre :text4.text = text1.text * text2.text / text3.texttext4 affiche le calcul entre text1, text2 et text3 mais j'ai un ptobleme il n nombre après la virgule [ par zelze ] J'ai un truc du genre :text4.text = text1.text * text2.text / text3.texttext4 affiche le calcul entre text1, text2 et text3 mais j'ai un ptobleme il n virgule dans vb 2005 [ par windwaker07 ] Je débute avec visual basic et je dois faire une calculatrice. Je ne suis pas capable d'utiliser de nombre a virgule. Quand je clique sur la virgule e boite de text [ par Laulaut ] je voudrais que dans ma boite te text on peut que tape de chiffre et non des autres caractere et comme c'est pour des calcul il faut des virgule mais des petit bleme a la com je je arrive pas a resoudre [ par Laulaut ] je voudrais que dans ma boite te text on peut que tape de chiffre et non des autres caractere et comme c'est pour des calcul il faut des virgule mais un autre bleme a la con je bloque sur de truc tres con [ par Laulaut ] je voudrais que dans ma boite te text on peut que tape de chiffre et non des autres caractere et comme c'est pour des calcul il faut des virgule mais Probleme de construction de code ^^ vb.net [ par T4rik ] Salut tout le monde J'ai fait une calculatrice et je veux eviter la possibilité de repéter la virgule. pour cela j'ai mes le code suivant : Dim virg Additionner des textbox avec virgule ? pour presseb [ par néo ] Pour additionner des textbox on applique la formule suivante.TextBox3.Text = CInt(TextBox1.Text) + CInt(TextBox2.Text)cependant comment faire pour les Calcul de chiffres à virgule [ par WareG ] Je doit calculer des sommes à virgule, mais le probleme est le suivant, lorsque je fais la somme par le code suivant j'ai un nombre à virgule beaucoup calcul a virgule [ par WareG ] J'ai bien reç votre code pour le calcul de chiffre à virguleDim Var1, Var2 As SingleVar1 = Text1.TextVar2 = Text2.TextText2.Text = (Int((Var1 + Var2)