28. maj 2001 - 20:49Der er
2 kommentarer og 1 løsning
2 Listbox\'s!!!
Heeey!
Mit prob er at jeg vil indlæse 2 \"ting\" fra en semikolonseperet txt fil, og derefter smidt det 1. (det FØR simekolon) i en listbox og det 2. (EFTER semikolon) i en anden listbox. Det går også fint..! MEN hvis brugeren trykker på en \"ting\" i den ene listbox, skal tingens \"bror\"(dvs. det som \"det\" stod på linje med i txt filen) også makeres...! Hvordan gør jeg det?
Et lille eksempel til dem der ikke forstod min tekst:
1st listbox: 2nd listbox:
Ole Jensen Skibsbygger Britta Nielsen Sygeplejeske Børge Hermansen Ordensmand
Hvis jeg klikker på \"Ole Jensen\" skal \"Skibsbygger\" også markeres sammen med \"Ole Jensen\".
Hvis du har oprettet et kontrol array kan du bruge følgende subs.
Private Sub List1_Click(Index As Integer) \'Kalder sub som markere alle listboxe Call vis(List1(Index).ListIndex) End Sub
Public Sub vis(listNumber As Integer) \'Markere alle listboxe Dim i As Integer For i = 0 To List2.Count - 1 List1(i).ListIndex = listNumber Next End Sub
Hyde\'s svar er dækkende, forudsat at du ikke gør sortering=true. Ellers må du ved læsning fra filen oprette en unik ID så du kan identificere sammenhørende data. Forslag til dette kommer jeg gerne med, dersom sortering ønskes mulig.
M.v.h. Jørn
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
