Passage de type Variant à String ou Integer

Question

Bonjour,
Je sais que les variant ne sont pas &#224; utiliser mais je ne peut pas faire autrement, alors voila mon probl&#232;me :
Je souhaite passer une variable de type variant en type string ou integer.

Merci aux &#226;mes g&#233;n&#233;reuses qui me r&#233;pondront.

cs_CanisLupus · Answer

Salut,
dim v as variant
v="" 'devient string
v=1 'devient integer

ou alors j'ai mal compris ta question ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

Gobillot · Answer

comment ?

&#224; partie du moment o&#249; tu met une cha&#238;ne dedans elle passe en String

l'avantage c'est qu'on peut changer de type en cours de route



Dim var As Variant

var = "1234"

MsgBox VarType(var) --> String

var = 1234

MsgBox VarType(var) --> Integer


Daniel

cs_CanisLupus · Answer

D'autre part, pourquoi ne peux tu pas faire autrement , explique.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

cs_Sweet_7694 · Answer

Alors:

Je r&#233;cup&#232;re cette variable d'une base donc ce n'est pas moi qui rentre le type.
Je viens d'essayer : MsgBox VarType(var) et ca m'a renvoy&#233; : 8200.

Gobillot · Answer

&#231;a c'est un Variant qui contient un tableau de String

Daniel

cs_Sweet_7694 · Answer

ok merci
je crois que ca va &#234;tre bon l&#224;.

Merci bien pour l'aide.

cs_CanisLupus · Answer

Au passage, si tu n'as pas l'aide de vb, voici le tableau de correspondances :


Constante
,
Valeur
,
Description
,
----

vbEmpty
,
   0
,
Non initialis&#233; (par d&#233;faut)
,
----

vbNull
,
   1
,
Ne contient pas de donn&#233;es valides
,
----

vbInteger
,
   2
,
Sous-type Integer
,
----

vbLong
,
   3
,
Sous-type Long
,
----

vbSingle
,
   4
,
Sous-type Single
,
----

vbDouble
,
   5
,
Sous-type Double
,
----

vbCurrency
,
   6
,
Sous-type Currency
,
----

vbDate
,
   7
,
Sous-type Date
,
----

vbString
,
   8
,
Sous-type String
,
----

vbObject
,
   9
,
Objet
,
----

vbError
,
  10
,
Sous-type Error
,
----

vbBoolean
,
  11
,
Sous-type Boolean
,
----

vbVariant
,
  12
,
Variant (utilis&#233; uniquement pour les tableaux de donn&#233;es de type Variant)
,
----

vbDataObject
,
  13
,
Objet d'acc&#232;s aux donn&#233;es
,
----

vbDecimal
,
  14
,
Sous-type Decimal
,
----

vbByte
,
  17
,
Sous-type Byte
,
----

vbArray
,
8192
,
Tableau.

Donc, si vartype te retourne 8200, Daniel a raison et &#231;a se voit comme &#231;a :

8200 = 8192 + 8 donc tableau (8192) de string (8).

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

Gobillot · Answer

et &#224; partir de 8192 tu retrouves les m&#234;mes types pour les Tableaux



tableau d'Integer = 8192 + 2  -- > 8194

tableau de Bytes = 8192 + 17 --> 8209

Daniel

Passage de type Variant à String ou Integer

8 réponses

Discussions similaires