Télécharger cours VB.NET pdf, tutoriel & guide de travaux pratiques en pdf.

Conversion

On a vu qu’on peut afficher les chaînes de caractères, par ailleurs, on fait des calculs avec les variables numériques.
Est-il possible de convertir une variable d’un type à un autre?
Conversion numérique=>String
Quel intérêt de convertir?
On veut afficher un résultat numérique.
On ne peut afficher que des String (chaîne de caractères) dans un label ou un TextBox par exemple.
Aussi, il faut transformer cette valeur numérique en chaîne avant de l’afficher, on le fait avec la méthode.ToString:
Dim I As Integer=12  ‘On déclare une variable I qu’on initialise à 12 Label.text = I.ToString
La valeur de I est transformée en String puis affectée à la propriété text du label, ce qui affiche ’12’
Conversion String=>numérique
A l’inverse une chaîne de caractère peut être transformée en numérique :
Par exemple, l’utilisateur saisie un nombre dans une boite de saisie (InputBox), mais il tape des caractères au clavier et c’est cette chaîne de caractères qui est retournée, il faut la transformer en numérique.
Dim S as String
Dim i as Integer
S= InputBox (« Test », « Taper un nombre ») ‘Saisie dans une InputBox d’un nombre par l’utilisateur.
‘S contient maintenant une chaîne de caractères, « 45 » par exemple
I=Integer.Parse(S)  ‘on transforme la chaîne S en Integer
Bizarre cette syntaxe!! en fait c’est le type Integer qui a une méthode (Parse) qui transforme une chaîne en entier.
On peut aussi utiliser, et c’est plus simple, CType pour convertir n’importe quel type en n’importe quel type :
Il suffit de donner à cette fonction la variable à modifier et le type à obtenir.
I=Ctype(S,Integer)

Type pour toutes les conversions

Ctype peut aussi servir à convertir de la même manière un
single en double, un Short en Integer….
Il est donc possible de convertir un type de variable en un autre.
Il suffit de donner à cette fonction la variable à modifier et le type à obtenir.
I=Ctype(S,Integer) ‘conversion en entier
CType fait toutes les conversions, mais on peut aussi utiliser des fonctions qui sont spécifiques au type de la variable de retour: Le nom de ces fonctions contient le nom du type de la variable de retour.
CBool()
CByte()
CChar()
CDate()
CDbl()
CDec()
CInt()
CLng()
CObj()
CShort()
CSng()  Pour convertir en Single
CStr()

Exemple CDbl  retourne un ‘Double’.
Dim I As Integer=123
Dim D As Double
D=CDbl(I) ‘donnera D=123  D est un Double (réel double précision)
Ces fonctions sont plus rapides car elles sont spécifiques.

Remarque:
Les fonctions CInt et CLng arrondissent les parties décimales égales à 0,5 au nombre pair le plus proche. Par exemple, 0,5 s’arrondit à 0 et 1,5 s’arrondit à 2. Bizarre!!
Val et Str existe aussi:
Ouf pour les anciens!!
Ces fonctions permettent aussi la conversion String=>Numérique et Numérique=>String Val donne la valeur numérique d’une expression String.
Dim i As Integer
i=Val(« 5 »)  ‘ i=5
Val s’arrête au premier caractère non numérique.
Val(« 12er ») retourne 12
Val reconnaît le point (et pas la virgule)
Dim i As Double
i=Val(« 5.45 ») ‘ donnera i=5,45
i=Val(« 5,45 ») ‘ donnera i=5
Str transforme une valeur numérique en String:
Dim s As String
s=Str(1999)  ‘ s= » 1999″
Noter bien: Str ajoute un espace à gauche ou le signe’-‘ si le nombre est négatif.
Str ne reconnaît que le point comme séparateur décimal. (Pour utiliser les autres séparateurs internationaux, il faut utiliser la fonction CStr() ).

Autre:
La Classe System.Convert permet la conversion d’un type de base vers un autre:
.ToString en fait partie

Exemple
Pour convertir un Single en Byte (entier 8 bits non signé) .ToByte
Pour convertir un Byte en Single:
.ToSingle
singleVal = System.Convert.ToSingle(byteVal) en Decimal
.ToDecimal
On a des méthodes pour pratiquement convertir tous les types en tous les types. Chercher!!
On verra plus loin, la fonction Format utilisée pour convertir les valeurs numériques que vous voulez mettre aux formats dates, heures ou monnaie ou dans d’autres formats définis par l’utilisateur.
IsNumeric
On utilise la fonction IsNumeric pour déterminer si le contenu d’une variable peut être évalué comme un nombre.

Exemples:
Dim MyVar As Object
Dim R As Boolean
MyVar = « 45 »
R = IsNumeric(MyVar) ‘ R= True.
‘ …
MyVar = « 678.92 »
R = IsNumeric(MyVar) ‘ R= True.
MyVar = « 45 Kg »
R = IsNumeric(MyVar) ‘ R= False.
‘Attention le dernier exemple indique que « 45 Kg » n’est pas purement numérique, mais Val(« 45 Kg ») retourne 45 sans déclencher d’erreur car Val transforme les caractères numérique partir de la gauche, en s’arrêtant dès qu’il y a un caractère non numérique.