en kombinationsruta är en kontroll som låter användaren välja från en fördefinierad lista över acceptabla värden . DataGrid är en separat kontroll som visar databasen data till användaren i stort sett samma sätt som utvecklaren ser datan när man tittar direkt på olika databastabeller . Kombinationsrutan kontroll kan inte placeras i DataGrid-kontrollen . Däremot kan vi sätta Combo box " ovanpå " en särskild kolumn i DataGrid-kontrollen för att göra det det ser ut som om det är en del av själva kontrollen . Instruktioner
1
Skapa ett nytt Standard-EXE Visual Basic-projekt . Från menyn, välj " Project ", " komponenter . " Klicka på kryssrutan bredvid " Microsoft DataGrid-kontroll 6,0 ( OLE ) . " Klicka på " OK " -knappen för att spara och stänga . Från menyn, välj " Project ", " Referenser . " Klicka på kryssrutan bredvid " Microsoft ActiveX DataObjects 2.x Library , " där " x " är det högsta antalet tillgängliga . Klicka på " OK " -knappen för att spara och stänga .
2
Lägg ett nytt DataGrid kontrollen till " Form1 " som skapades som standard . Det förvalda namnet blir " DataGrid1 . " Konfigurera datakällan och andra egenskaper hos den " DataGrid1 " kontroll så att rätt information visas .
3
Lägg en kontroll Combo box till " Form1 " och ange egenskapen visible till " False ". Få toppositionen , radhöjd och kolumnbredd av cellen på " DataGrid1 " som du vill visa Combo rutan och lagra alla dessa värden i separata heltalsvariabler .
4
Ställ in läget värden för dolda Combo box till dem i cellen användaren klickat på " DataGrid1 " och ställa kombinationsrutan egenskapen visible till " sant". Detta kommer att placera Combo rutan direkt ovanpå cellen på " DataGrid1 " och användaren kommer att visa en listruta med värden att välja mellan.
5
kod click-händelsen i kombinationsrutan så att när användaren gör ett val , vi uppdaterar innehållet i cellen på " DataGrid1 " med det nya värdet som valts i kombinationsrutan :
p Om cmbMyCombo.Visible = sant då
DataGrid1 . Kolumner ( 2 ) . Text = cmbMyCombo.Text
End If Addera