Discussion :

[biquet]

Bonjour à tous,

je viens difficilement me mettre à VB.net (avant j'avais réalisé qq programme en VB6).
L'erreur suivante (Option Strict On disallows late binding pour tb) apparait avec ce type de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Dim cheminfichier As String
        Dim lg As String
        Dim tb As Array
        cheminfichier = "C:\test.dat"
        FileOpen(1, cheminfichier, OpenMode.Input, OpenAccess.Read, OpenShare.Shared)
        While Not EOF(1)
            lg = LineInput(1)
            If lg <> "" Then
                tb = Split(lg, ";")
                If tb(0) = TextBox1.Text Then
                    TextBox2.Text = tb(1)
                    TextBox3.Text = tb(2)
                    TextBox4.Text = tb(6)
                    TextBox5.Text = tb(5)
                    TextBox6.Text = tb(4)
                    TextBox7.Text = tb(3)
                End If
            End If
        End While
        FileClose(1)

une petite compréhension du problème afin que je puisse le résoudre?

merci par avance

[biquet]

merci pour ton formatage de code

le late binding apparait à chaque fois que tb apparait

que signifie late binding?

[biquet]

Bonjour,

en cherchant un peu, j'ai regardé et cela veut dire que je change un string (textbox1.text ou autre textbox) en un objet tb(0), ...

J'ai donc enlevé Dim tb as array et j'ai mis Dim tb(N) as string

et plus de problème qui s'affiche.

je dois encore tester

a+

[tomlev]

que signifie late binding?

En gros, c'est quand tu accèdes à un membre d'un objet (propriété, méthode, ou dans ton cas, indexeur) qui n'est pas connu au moment de la compilation. C'est seulement lors de l'exécution que l'on regarde si le membre existe.

Tu as déclaré tb comme étant de type Array, et ce type n'a pas d'indexeur (seuls les tableaux typés en ont un). Donc l'indexeur est résolu comme un appel en late binding, ce qui est interdit avec Option Strict On

J'ai donc enlevé Dim tb as array et j'ai mis Dim tb(N) as string

C'est bien ça qu'il faut faire, sauf que tu n'as pas besoin de préciser la taille vu que de toutes façons tu vas affecter à la variable le résultat de Split