tester un type de valeur

tester un type de valeur - VB/VBA/VBS - Programmation

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 :)

Reply

Marsh Posté le 05-05-2006 à 11:22:14   

Reply

Marsh Posté le 05-05-2006 à 12:30:40    

Deno est un String.


---------------
roger
Reply

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

Reply

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 ?

Reply

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)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed