[VB.NET] Funzione Len() e problemi nell'utilizzo

[andreaggg]

Ho un problema: ho creato una funzione che dandogli in un numero mi restituisce sembre un numero a tre cifre anche se il primo è a una o due antecedendogli degli 0.

Private Function adattamentoNumero(ByVal numero As Integer) As Integer
        Dim risultato As Integer = esito.negativo
        If Len(numero) = 1 Then
            risultato = CInt("00" & CStr(numero))
        ElseIf Len(numero) = 2 Then
            risultato = CInt("0" & CStr(numero))
        ElseIf Len(numero) = 3 Then
            risultato = numero
        Else
            risultato = esito.negativo
        End If
        Return risultato
    End Function 

Come numero gli do

Asc(Var) 

dove Var è una variabile di tipo Char

Il mio prioblema è che il Len mi restituisce 2 se la applico alla variabile Var, ma mi restituisce 4 nella funzione appicata alla varibile numero.

Perchè?

[alka]

Di quale versione di Visual Basic parliamo?

Hai letto il Regolamento.

[oregon]

Versione del linguaggio? (.NET immagino)

La Len si usa con le stringhe non con i valori numerici ... ma tu cosa vuoi fare?

[andreaggg]

Scusate, uso Visual Studio 2010 su Visual Basic

[oregon]

Originariamente inviato da andreaggg
Scusate, uso Visual Studio 2010 su Visual Basic

Sì, ma ti ho fatto altre domande ... cosa vuoi fare?

Quello che hai scritto non ha senso ...

[laricino]

Originariamente inviato da andreaggg
Ho un problema: ho creato una funzione che dandogli in un numero mi restituisce sembre un numero a tre cifre anche se il primo è a una o due antecedendogli degli 0.

Private Function adattamentoNumero(ByVal numero As Integer) As Integer
        Dim risultato As Integer = esito.negativo
        If Len(numero) = 1 Then
            risultato = CInt("00" & CStr(numero))
        ElseIf Len(numero) = 2 Then
            risultato = CInt("0" & CStr(numero))
        ElseIf Len(numero) = 3 Then
            risultato = numero
        Else
            risultato = esito.negativo
        End If
        Return risultato
    End Function 

Come numero gli do

Asc(Var) 

dove Var è una variabile di tipo Char

Il mio prioblema è che il Len mi restituisce 2 se la applico alla variabile Var, ma mi restituisce 4 nella funzione appicata alla varibile numero.

Perchè?

Hai provato la funzione Format?