Private Sub Carica_Click()

Dim oConn As ADODB.Connection
Set oConn = New ADODB.Connection
oConn.ConnectionString = "driver={SQL Server};server=192.168.2.202;uid=sa;pwd=;database= PROVA"
oConn.CursorLocation = adUseClient
oConn.Open

Set oAzienda = oConn.Execute("SELECT * FROM WCClients")
While Not oAzienda.EOF

ElencoClienti.AddItem oAzienda("COMP_NAME")
oAzienda.MoveNext
Wend
End Sub

Perche' mi da errore .. TIPO DEFINITO DALL'UTENTE NON DEFINITO sulla riga della Dim

mi aiutate? e' la mia prima volta ...