FrnbacYescO (Normal User)
Pro
 
Messaggi: 102
Iscritto: 15/03/2008
|
Ragazzi sono ore che mi ci stò rimbambendo sopra alla ho questo codice:
Codice sorgente - presumibilmente VB.NET |
Dim i As Integer Dim Var(0 To 1000) As String Open "C:\Address.ini" For Input As #1 Do i = i + 1 Line Input #1, Var(i) Loop Until EOF(1) = True Close #1 Dim A() As String Dim B() As String A = Split(Var(1), ": ") B = Split(Var(2), ": ") Scopee = "&H" & A(1) FastAmmo = "&H" & B(1)
|
(le dichiarazione che mancano sono da parte)
se faccio "l'anteprima" premendo il play di vb mi da subito errore selezionandomi
Codice sorgente - presumibilmente Plain Text |
e dicendo
indice nn compreso nell'intervallo
come devo risolvere??
il file che va a leggere (address.ini) è così formato:
Codice sorgente - presumibilmente Plain Text |
scopee: B16234
fastammo: B16234
|
quindi diciamo che la prima e la seconda riga sono uguali, ma allora perchè alla seconda variabile (fastammo) mi da errore e alla prima (scopee) va bene ??
pls help!  |
|
|
antometal (Member)
Guru
Messaggi: 691
Iscritto: 12/09/2007
|
io ho provato cl tuo codice modifiato
Codice sorgente - presumibilmente VB.NET |
Private Sub Form_Load() Dim i As Integer Dim Var(0 To 1000) As String Var(1) = "scopee: B16234" Var(2) = "fastammo: B16234" Dim A() As String Dim B() As String A = Split(Var(1), ": ") B = Split(Var(2), ": ") scopee = "&H" & A(1) fastammo = "&H" & B(1) Print A(0) Print A(1) Print B(0) Print B(1) Print scopee Print fastammo End Sub
|
e gira benissimo, quindi l' errore deve essere nel file
controlla il file e fa visualizzare le variabili var() vedi se contengono tt il file
|
|
|
FrnbacYescO (Normal User)
Pro
Messaggi: 102
Iscritto: 15/03/2008
|
se faccio in quel modo anke e me il file si apre correttamente quindi penso ke l'errore sia nel leggere il file di testo, come se nn leggesse che var(2) è la seconda riga
solo che nn so come cavolo correggerlo 
|
|
|
antometal (Member)
Guru
Messaggi: 691
Iscritto: 12/09/2007
|
nn so proprio, il codice sembra a posto
prova così ma nn ci spero neanche
Codice sorgente - presumibilmente Visual Basic 6 |
dim riga sa string
i=0
open ...
while not(eof(1))
input #1, riga
var(i)=riga
loop
|
così xò evi usare var(0) e var(1)
nn ti assicuro niente
|
|
|
FrnbacYescO (Normal User)
Pro
Messaggi: 102
Iscritto: 15/03/2008
|
Niente nn ci sono riuscito
posto il progetto (ho eliminato tutte le altre parti di codice inutili, è tutto scritto nel form load
magari si riesce a fare qualkosa così
Ultima modifica effettuata da FrnbacYescO il 25/06/2008 alle 19:31 |
|
|
FrnbacYescO (Normal User)
Pro
Messaggi: 102
Iscritto: 15/03/2008
|
|
|
|
dedo (Normal User)
Rookie
Messaggi: 27
Iscritto: 25/06/2008
|
Francye mi dici cosa stai facendo ? vuoi fa in modo che con il file testo di modificano gli addy'?
|
|
|
FrnbacYescO (Normal User)
Pro
Messaggi: 102
Iscritto: 15/03/2008
|
Postato originariamente da dedo:
Francye mi dici cosa stai facendo ? vuoi fa in modo che con il file testo di modificano gli addy'? |
si... |
|
|
dedo (Normal User)
Rookie
Messaggi: 27
Iscritto: 25/06/2008
|
Grazie per avermi dato la source xD peccato che non ci sono codici ,vabbe scherzo ... comunque mo posto un topic che potrebbe essere utile per noi coder xD
|
|
|
| 
