[Visual Basic] Chaîne car en entier

Angy · 4 Oct 2006

Une bête question de débutant en la matière.

Quelqu'un saurait me dire comment je peux transformer ce qui se trouve dans mon TextBox en Integer? (en vue de les utiliser par la suite pour faire des opérations arithmétiques

)

Merci

Jereck · 4 Oct 2006

Code:

[color=royalblue]Public Function[/color] CheckValue (TextB [color=royalblue]As[/color] TextBox) [color=royalblue]As Boolean[/color]
	[color=royalblue]With[/color] TextB
		[color=royalblue]If[/color] (Not IsNumeric(.Text)) [color=royalblue]And[/color] (.Text <> vbNullString) [color=royalblue]Then[/color]
			.Text = Left(.Text, Len(.Text) - 1)
			.SelStart = Len(.Text)
			CheckValue = [color=royalblue]False[/color]
		[color=royalblue]Else[/color]
			CheckValue = [color=royalblue]True
		End If
	End With
End Function
 
Private Sub [/color]Text1_Change()[color=royalblue]
	If [/color](CheckValue(Text1))[color=royalblue] Then [/color]
[color=royalblue][color=#e0e0e0]		MsgBox (Text1.Text * 2) [/color][/color][color=lime]'Text1.Text est bien reconnu comme un entier[/color]
[color=royalblue][color=#e0e0e0]	[/color]End If[/color]
[color=royalblue]End Sub[/color]
[color=royalblue][/color] 
[color=royalblue] 
[/color]

zoheir · 4 Oct 2006

y'a pas qqch du genre "Integer.ParseInt" ? :-D

Angy · 4 Oct 2006

Merci jereck, je vais regarder ce que ça donne

cvm の術 a dit:
y'a pas qqch du genre "Integer.ParseInt" ? :-D

C'est plutot en java ça :-D

zoheir · 4 Oct 2006

aussi en C# il me semble ;-D

Angy · 5 Oct 2006

Dis Jereck,

Il n'y aurait pas un moyen plus simple de récupérer ce qu'il y a dans le textbox pour pouvoir faire des opérations avec?

Ghost Glider · 5 Oct 2006

Tu as la fonction Int() qui convertie en integer mais il faut verifier avant que ton string est isnumeric

la syntaxe du int est la suivante (par exemple) :

MyInteger = Int(TextBox1.Text)

Angy · 5 Oct 2006

Ghost Glider a dit:
Tu as la fonction Int() qui convertie en integer mais il faut verifier avant que ton string est isnumeric

la syntaxe du int est la suivante (par exemple) :

MyInteger = Int(TextBox1.Text)

C'est bien ça! Merci :-D

ps: Autre chose, besoin d'une petite précision. Quand on déclare une variable en Option Explicit, elle est censée être globale, donc disponible sur 2 feuilles differentes. Comment ça se fait qu'il ne trouve pas ma variable globale sur l'autre feuille que celle où elle a été déclarée globale :[]

Jereck · 5 Oct 2006

Option Explicit n'a rien à voir avec la porté de la variable, ça te force juste à les déclarer avant leur première utilisation

C'est le mot-clé Global je crois pour ça.

Ghost Glider · 5 Oct 2006

Non, l'Option Explicit ne veut pas dire que tes variables sont globales
L'Option Explicit veut dire que tu es obligé de déclarer tes variables avant de les utiliser sinon tu auras une erreur.

La solution la plus simple pour utiliser une même variable dans plusieurs forms est de la déclarer de façon global dans un Module (en utilisant le mot clé "public").

Ghost Glider · 5 Oct 2006

oops; Jereck a été plus rapide

Angy · 5 Oct 2006

Niark, j'avais mal compris alors. J'ai bien fais de demandé.

Encore merci :-D

La Poubelle · 5 Oct 2006

vérifie aussi la taille de la chaîne.

Jereck a correctement vérifié que la chaîne n'était pas nul. Cependant, si la valeur a été utilisé puis effacer, ça foire. fonction len()

Jereck · 5 Oct 2006

En fait, mon code est appelé à chaque nouveau caractère entré dans le champ de texte ; si ce caractère n'est pas numérique, je le supprime, tout simplement.

[Visual Basic] Chaîne car en entier

Angy

Elite

Jereck

Α & Ω

zoheir

cvm.mangaleet()

Angy

Elite

zoheir

cvm.mangaleet()

Angy

Elite

Ghost Glider

Elite

Angy

Elite

Jereck

Α & Ω

Ghost Glider

Elite

Ghost Glider

Elite

Angy

Elite

La Poubelle

Pou'r allé Danché

Jereck

Α & Ω

Autres sujets récents