tester un type de valeur - VB/VBA/VBS - Programmation
Marsh Posté le 05-05-2006 à 12:32:39
j'aimerais juste savoir si il est possible de faire un test sur la compatibilité de ces 2 variables pour eviter les bugs
Marsh Posté le 05-05-2006 à 12:44:00
serai ce possible de faire un test du genre
si deno = deno +1 genere une erreure
als faire passer un message a l'utilisateur
remettre a vide la textbox
fin si
possible ?
Marsh Posté le 05-05-2006 à 13:47:06
Si deno est une variable alors tu dois l'avoir déclaré sous la forme
Dim deno As String |
ou un autre type de données que String
Si tu déclares deno de type String alors il ne peut contenir que du String et c'est à son initilisation que tu dois faire un contrôle dessus.
Pour cela tu peux utilsier plein de fonctions VB (CStr(), CLng(),, IsNumeric(), IsEmpty(), Is Nothing, Format$()) qui te permettent soit de tester, soit de convertir des valeurs pour les stocker dans deno avec le bon type.
Dans ton cas, pour le calcul tu pourrais déclarer deno de type Integer, Long, Single, Double, en fonction du type de ta variable tmp (qui doit être assez grande pour contenir le résultat)
Marsh Posté le 05-05-2006 à 11:22:14
g mon affectation :
tmp = .Range("S" & cpt).Value / 1000000 * Deno
Deno est une variable affecté des le debut de la fonction
j'aimerai savoir comment tester le type de Deno justement, Deno est la valeur d'un TextBox lu au debut de la fonction pour eviter si l'utilisateur entre sans faire expres une lettre et donc eviter l'affichage du caode et du bug
merci