ListBox kontrollen i Visual Basic är ett kraftfullt verktyg för att visa listor med data och tillåter användaren att välja ett eller flera objekt från listan . Ett urval kan sedan tvinga en åtgärd i en annan del av koden . Det finns flera egenskaper som finns med denna kontroll även sådana för att visa data i mer än en kolumn . För längre eller bredare textlistor , horisontella och vertikala rullningslister visas automatiskt . Listor kan visas sorterade eller osorterade och formulär kan ha flera sammankopplade listboxes . Skapa en listruta
Ladda en ny form genom att klicka på " File " -menyn i Visual Basic och välja " Nytt projekt . " Välj " Standard EXE " som typ i Visual Basic 6.0 . I tidigare versioner av Visual Basic.NET , är namnet på den mall " Windows Forms Application . " När ett formulär är öppet , ser du två kontrollerna till vänster som ser ut listorna . Dubbelklicka på den högra en, en listruta , att lägga till den tomma formen . Upprepa detta för att lägga till en andra ListBox , och sedan dra den till höger om den första. Expandera formuläret med handtagen längst ner och till höger i formuläret .
Experimentera med listrutan innehåll och dess egenskaper . Ändra " sorterade " egendom av varje ListBox till "true ". Ändra ForeColor den högra ListBox till " Red . " För att förbereda sig för nästa steg i guiden , tillsätt fyra Kommandoknapparna från Toolbox arrangera dem i bilden . OBS : texten i rutorna är satt större för synlighet . Använda panelen Egenskaper till höger , gör varje bildtext Command knapp följande lydelse : Överst till vänster: " Add New Item " Överst till höger: " Välj en fil" nere till vänster: " Skriv Selected List " Botten höger : " Avmarkera ett objekt " The användningar av dessa knappar blir tydlig när du arbetar igenom handledningen .
Konfigurera Tutorial
Ändra
från designvyn till koden genom att klicka på " Visa , " " kod " i menyn . För att aktivera kommandoknapparna läggs ovan , skriv in följande kod exakt som den visas : Private Sub Command1_Click ( ) Dim newItem Som StringNewItem = InputBox ( " Ange nytt objekt för listan " ) List1.AddItem NewItemEnd SubPrivate Sub Command2_Click ( ) Om List1 . ListIndex > = 0 ThenList2.AddItem List1.TextList1.RemoveItem List1.ListIndexEnd IfEnd SubPrivate Sub Command3_Click ( ) Om List2.ListIndex > = 0 ThenList1.AddItem List2.TextList2.RemoveItem List2.ListIndexEnd IfEnd SubPrivate Sub Command4_Click ( ) Dim n Som IntegerFor n = 0 till List2.ListCount - 1Print n & " " & List2.List ( n ) NästaSlut Sub
Använda ListBox Kontroll
sätt att använda dessa knappar blir uppenbart när du trycker " F5 " för att köra programmet ( bilden har förfyllda med vissa objekt ) . Börja med att använda " Add New Item " kommandot . Varje gång du använder det , kommer en ruta att uppmana dig att lägga till ett nytt objekt . Prova att lägga till några namn på länder i slumpmässig ordning . " Välj en fil" tas det bort från den vänstra rutan och lägger den åt höger . " Avmarkera ett objekt " gör det omvända . "Skriv ut " -knappen skickar den till skärmen, men genom en ändring kunde använda en skrivare istället . Ytterligare koden kan ändra valet så att genom att hålla ned shift-tangenten kan användaren välja flera objekt .
Listrutan egenskaper inkluderar länka till en databas för vidare användning av valda data . Lådor kan befolkas antingen ett objekt i taget som visas här , med hjälp av en rad artiklar för att lägga allt på en gång , eller genom att importera en förvald textfil . Detta är det sätt de långa listor med länder visas i Web versioner av ListBox .
