[VB6] Variabile intera non accetta stringa

[Luciano79]

Originariamente inviato da oregon
In effetti, nella discussione precedente, ho tentato di capire quanti elementi restituiva la Split ... ma Magicolotto ha fatto di tutto per non farmi riuscire in questa impresa ...

[OT]
Magicolotto, se continui così sarà inevitabile trovare commenti simili, se leggi le varie discussioni non capita quasi mai, con te quasi sempre, non credi ci sia qualcosa che non va?
Come prima cosa dovresti rileggere il regolamento e applicarlo alla lettera.
Poi quando qualcuno ti risponde perde del tempo, ma lo fa per aiutarti, quindi dovresti dedicargli il massimo dell'attenzione, della disponibilità e soprattutto fare quello che dice, semplicemente perchè si arriva subito alla soluzione, altrimenti contunui a fare impazzire tutti e a far perdere tempo inutilmente.
Mi raccomando...
[/OT]

[Magicolotto]

PS: Dai tuoi lunghi 'silienzi' dopo aver ricevuto delle risposte
più 'morali' che 'tecniche' capisco che probabilmente te la prendi
un po' per il tono perentorio che abbiamo, io in primis, ovviamente.
Non prendertela. Considera che anche noi ci sentiamo un po' presi
in giro da te (non sempre, ma diverse volte ne ho percepito la
senzazione).

ciao chiedo scusa a tutti , ma i miei silenzi sono dovuto al fatto che rispondo solo da casa

mentre quandop sto in ufficio non posso salva eccezione di questa

non me la prendo

non prenderei mai in giro nessuno , porto rispetto a tutti
sensazione sbagliata

per tutto il resto rispondero appena possibile( da casa)

grazie a tutti di cuore

[Magicolotto]

ho provato a mettere val...
pero' nulla
nr2 ho inserito 3 è l'errore è passato a nr3

[oregon]

Originariamente inviato da Magicolotto
ho provato a mettere val...
pero' nulla
nr2 ho inserito 3 è l'errore è passato a nr3

Cosa?

[Magicolotto]

nr1 nr2, restituiscono 0

nr3, nr4 non vengono letti

[oregon]

Il problema e' capire (e solo tu puoi dirlo) cosa c'e' carattere per carattere nelle varie linee identificate da

List3.List(es)

[Boolean]

Ciao Magicolotto,

pre farci rendere conto degli effettivi caratteri della stringa della ListBox, subito dopo il codice che la compila, inserisci queste righe:

For QQ = 1 to len(List3.List(0))
    Debug.Print Asc(Mid$(List3.List(0),QQ,1))
Next QQ

dopo di che, copia quello che risulta nella finestra di debug (Finestra Immediata) e postalo qui.

mi raccomando fallo! solo in questo modo si può capire che caratteri compongono la tua stringa

Boolean

[Magicolotto]

fatto alla lettera, ecco cosa esce :

 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48 
 98 
 97 
 114 
 105 
 32 
 48 
 32 
 32 
 48

[Boolean]

beh, immmagino che sarebbe stato sufficiente lanciare il programma una sola volta, per rilevare questi dati, piuttosto che 23!

comunque... il problema è sul fatto che tra un numero ed un altro non c'è un solo spazio, ma 2... così:

bari_0__0 <--- dove _ rappresenta uno spazio

è ovvio quindi che la Split non ti dia il risultato che ti serve.

in pratica facendo la Split sulla tua riga della listbox ottieni un array con 4 elementi anzichè i 3 che ti servono. l'elemento 2 risulta uguale a niente ("")

la soluzione può essere quella di concatenare meglio (leggi: con un solo spazio) i numeri di seguito alla ruota.

a tal proposito forse è meglio usare la funzione Trim sui numeri da concatenare, che elimina gli spazi che vengono inseriti durante la conversione implicita da valore numerico a valore stringa.

Boolean

[Magicolotto]

a tal proposito forse è meglio usare la funzione Trim sui numeri da concatenare, che elimina gli spazi che vengono inseriti
durante la conversione implicita da valore numerico a valore stringa.

ci provo, anche se è difficile( x me)

ciao e grazie