Cast de Variant en Integer

Question

Bonjour

Voici mon problème :

J'ai une fonction qui reçois des données venant de Winsock (c'est du detail)... Dans ce cas c'est un nombre qui est envoyé en tant que Variant. (Exemple : data = 2).

Public Sub ReceptionDonnees(ByVal data As Variant)
    If (CheckCartesEchangees.Value = 0) Then
        Dim idcarte As Integer
        idcarte = data         '  <-- Erreur 
        Dim i As Integer
        ...
        ...


Je n'arrive pas a le transférer dans un Integer. 
J'ai vraiment besoin d'aide, Merci d'avance !

cs_casy · Answer

SI tu utilise Variant, c'est que tu es en VB6! Pourquoi, alors poster dans la rubrique VB2005?

Utilise la fonction CINT pour convertir ton variant en integer

idcarte=CINT(data)



[i][b]---- Sevyc64  (alias Casy) ----
[hr]# LE PARTAGE EST NOTRE FORCE #/b/i

Rockanos · Answer

(Désolé de m'être trompé de rubrique)

J'ai tenté le coup avec un CInt Mais rien a faire.. ("Erreur : incompatible type")

Cast de Variant en Integer

2 réponses

Votre réponse

Discussions similaires