[VB6] Split

[Petra]

Ragazzi, perchè non funziona ? ? ?

Private Sub Form_Load()
Dim prezzo As String
Dim i As Integer
Dim div(2) As Variant
prezzo = "896,58"
For i = 0 To 1
div(i) = Split(prezzo, ",")
MsgBox div(i)
Next i
End Sub

Mi dice "Tipo non corrispondente"