Keskustelu: Ohjelmointikysymykset: VB6: Tämmönen ruttiini...

Elikkäs pitäs saada semmonen.. että kun vaikka klikkaa nappia niin:

Ohjelma kattoo kaikki .dat tiedostot samasta kansiosta ku ite ohjelma (tämän sain tehtyä)

ja sitte sen pitäs ne pistää johonki tekstiobjektiin.. (onko se combo vai mikä se nyt on nimeltäsä) niin siihen ne kaikki ALLEKKAIN yksi yhdelle riville.

Siitä niitä sitte vois käyttäjä aktivoida haluamansa..

Vaikka olin saanut ton ekan tehtyä niin ehkä olisi selkeämpi jos joku voisi tehdä koko sen koodin niin olisi yhtenäisempää koodia sitte.. KIITOS.

Varmaan parasta on laittaa ne listaan:

Private Sub Command1_Click()
    tied$ = Dir("*.dat")
    Do While tied$ <> ""
        List1.AddItem tied$
        tied$ = Dir
    Loop
End Sub

Private Sub List1_Click()
    MsgBox "Valitsit " & List1.List(List1.ListIndex)
End Sub

Formille tarvitaan painonappi (Command1) ja ListBox (List1)