IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Test si une variable est un float


Sujet :

VB 6 et antérieur

  1. #1
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2007
    Messages
    487
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Octobre 2007
    Messages : 487
    Par défaut Test si une variable est un float
    Salut a tous
    y a-t-il une fonction en VB qui teste si une variable est une float ou non .
    Si non comment puis je créer cette fonction
      0  0

  2. #2
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    Citation Envoyé par MSDN
    VarType, fonction
    Renvoie une valeur de type Integer qui indique le sous-type d'une variable.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈
      0  0

  3. #3
    Membre Expert
    Avatar de Delbeke
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    2 675
    Détails du profil
    Informations personnelles :
    Âge : 71
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 2 675
    Par défaut
    Tu risque d'être déçu, il n'y a pas de type float en vb
      0  0

  4. #4
    Rédacteur
    Avatar de DarkVader
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    2 131
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 131
    Par défaut
    Float (représentation en simple précision d'un nombre avec virgule en C - codage sur 4 octets)
    correspond à Single en VB.

    => vartype=vbSingle (4)

    Pour les autres conversions :
    Short => Integer (2)
    Long => Long (3)
    Float => Single (4)
    Double => Double (5)
      0  0

  5. #5
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Par défaut
    Bonjour,


    je suggère à notre ami ce petit exemple :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Private Sub Command1_Click()
      toto = 1
      titi = 1.1
      tata = 1.32
      Dim tutu As Single
      tutu = 1.1
      MsgBox "toto = " & toto & " ====>> de type " & VarType(toto) & " ( soit " & TypeName(toto) & " Integer)" & vbCrLf & _
      "titi = " & titi & " ====>> de type " & VarType(titi) & " ( soit " & TypeName(titi) & " Double-precision floating-point number)" & vbCrLf & _
      "tata= " & tata & " ====>> de type " & VarType(tata) & " ( soit " & TypeName(tata) & " Double-precision floating-point number)" & vbCrLf & vbCrLf & _
      "mais tutu, défini par dim, = " & tutu & " ====>> de type " & VarType(tutu) & " ( soit " & TypeName(tutu) & " Single-precision floating-point number)"
    End Sub
      0  0

  6. #6
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2007
    Messages
    487
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Octobre 2007
    Messages : 487
    Par défaut
    Citation Envoyé par ucfoutu Voir le message
    Bonjour,


    je suggère à notre ami ce petit exemple :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Private Sub Command1_Click()
      toto = 1
      titi = 1.1
      tata = 1.32
      Dim tutu As Single
      tutu = 1.1
      MsgBox "toto = " & toto & " ====>> de type " & VarType(toto) & " ( soit " & TypeName(toto) & " Integer)" & vbCrLf & _
      "titi = " & titi & " ====>> de type " & VarType(titi) & " ( soit " & TypeName(titi) & " Double-precision floating-point number)" & vbCrLf & _
      "tata= " & tata & " ====>> de type " & VarType(tata) & " ( soit " & TypeName(tata) & " Double-precision floating-point number)" & vbCrLf & vbCrLf & _
      "mais tutu, défini par dim, = " & tutu & " ====>> de type " & VarType(tutu) & " ( soit " & TypeName(tutu) & " Single-precision floating-point number)"
    End Sub
    C'est quoi ce code???
      0  0

  7. #7
    Rédacteur
    Avatar de DarkVader
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    2 131
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 131
    Par défaut
    Une interférence parasite
      0  0

  8. #8
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Par défaut
    Exact
      0  0

  9. #9
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 132
    Par défaut
    Citation Envoyé par dot-_-net
    C'est quoi ce code???
    une demonstration de l'utilisation de la fonction VarType()

    Citation Envoyé par DarkVader
    Une interférence parasite
    pas vraiment, mais je te l'accorde, une façon personnelle de ucfoutu de l'illustrer
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈
      0  0

Discussions similaires

  1. [XSLT] Teste si une variable est nulle
    Par kkwet30 dans le forum XSL/XSLT/XPATH
    Réponses: 2
    Dernier message: 08/02/2008, 20h50
  2. Réponses: 1
    Dernier message: 21/12/2005, 19h08
  3. comment tester si une variable est de type indifined
    Par amelhog dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 10/08/2005, 09h32
  4. test si une Url est valide ?
    Par lulu1664 dans le forum Windows
    Réponses: 5
    Dernier message: 10/08/2005, 09h14
  5. Comment savoir si une variable est initialisée ?
    Par nabix dans le forum Général Python
    Réponses: 8
    Dernier message: 10/03/2005, 15h12

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo