TIP: Přetáhni ikonu na hlavní panel pro připnutí webu
Dobrý den
Mám menší problém ohledně comboboxu.
Mám formulář s comboboxem, kam se v proceduře Form_Load načtou položky ze strukturovaného textového souboru, který vypadá např. takto:
Beta Tester;SAV001.txt
Alpha Tester;SAV002.txt
Celé procedura vypadá takto:
Private Sub Form_Load()
Dim var_loadN As Variant
Dim var_findN As Variant
Dim byt_sepP As Byte
Open App.Path & "\locals\SAVES.txt" For Input Lock Write As #1
Do Until EOF(1)
Line Input #1, var_loadN
byt_sepP = InStr(1, var_loadN, ";")
var_findN = Left(var_loadN, byt_sepP - 1)
cmb_loadg.AddItem var_findN, Index = Mid(var_loadN, byt_sepP + 1)
frm_control.txt_console.Text = frm_control.txt_console.Text & (Chr(13)) + (Chr(10)) & pli_save_str
Loop
Close #1
cmd_loadSG.Enabled = True
End Sub
Potřeboval bych tedy přesněji toto:
Ze souboru Saves.txt se načte, kterému nicku patří jaký soubor a do comboboxu se zobrazí jméno (to už se mi povedlo). Nicméně když poté kliknu na tlačítko, tak nevím, který soubor patří ke jménu, které jsem vybral v comboboxu (resp. informace následující za znakem ";"). Potřeboval bych nějaký způsob, aby se mi s vybraným jménm v comboboxu vrátila i hodnota, kterou čtu pomocí Mid (prstě např. "SAV001.txt").
Předem díky za odpověď ;)
