VB.Net Types principaux
- Types principaux
- Entiers
[ultimatetables 1 /]
- Réels
[ultimatetables 3 /]
- Autres…
[ultimatetables 4 /]
Déclaration de variables
Les variables sont nécessaires pour stocker (conserver) une valeur dynamique et réutilisable. C’est en fait une simple zone mémoire qui porte un nom choisi par le programmeur. Le nom de la variable est une adresse mémoire. Si l’on veut une programmation cohérente, il faut déclarer chaque variable en précisant le type de celle-ci. La déclaration se fait avec le mot réservé Dim.
Syntaxe : Dim NomVariable As Type
Pour la lisibilité du code, on peut ajouter un commentaire après une apostrophe ( ‘ )
Exemples :
Dim prenom as String = “Mohamed”
Dim quantiteStq as Integer = 36 Mod 25 ‘Soit 11
Constantes :
Syntaxe : Const nomConstante As nomType = expression
Exemple : Const CONSTANTE_PI As Single = 3.14
Conversion de types
Les conversions entre nombres et chaînes de caractères
Nombre -> chaîne : nombre.ToString ou CType(nombre,String)
Objet -> chaîne : objet.ToString
Chaine -> Integer : Integer.Parse(chaine)
Chaîne -> Long : Long.Parse(chaine)
Chaîne -> Double : Double.Parse(chaîne)
Chaîne -> Single : Single.Parse(chaîne)
De manière générale a -> b : CType(variableTypeA,TypeB)
| variableTypeA est la variable à modifier, TypeB est le type à obtenir. La conversion d’une chaîne vers un nombre peut échouer si la chaîne ne représente pas un nombrevalide. Il y a alors génération d’une erreur fatale appelée exception en VENET. |
Exemple
Télécharger Exécutable
Code Source Bouton Conversion_implicite
Conversion_implicite
Private Sub Button_Conversion_implicite_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles Button_Conversion_implicite.Click
Dim debut As Date = Now
Dim b As Byte
Dim s As Short
Dim fin As Date
Me.TextBox_Durée_conversion_implicite.Text= “”
For j As Integer = 1 To Me.TextBox_Nombre_itérations.Text
For l As Long = Byte.MinValue To Byte.MaxValue
b = l
Next
For l As Long = Int16.MinValue To Int16.MaxValue
s = l
Next
Next
fin = Now
Me.TextBox_Durée_conversion_implicite.Text
= fin.Subtract(debut).TotalMilliseconds()
End Sub
Code Source Bouton Conversion_explicite
Conversion_explicite
Private Sub Button_Conversion_explicite_Click(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
Button_Conversion_explicite.Click
Dim debut As Date = Now
Dim b As Byte
Dim s As Short
Dim fin As Date
Me.TextBox_Durée_conversion_explicite.Text= “”
For j As Integer = 1 To CInt(Me.TextBox_Nombre_itérations_explicite.Text)
For l As Long = Byte.MinValue To Byte.MaxValue
b = CByte(l)
Next
For l As Long = Short.MinValue
To Short.MaxValue
s = CShort(l)
Next
Next
fin = Now
Me.TextBox_Durée_conversion_explicite.Text
= fin.Subtract(debut).TotalMilliseconds.ToString()
End Sub
