. Microsoft NET Framework stöder en mängd olika datatyper som du kan visa på Windows Forms kontroller . Uppräkningen typ av data som tillåter användare att representera tabellkolumnerna uppgifterna . Du kan använda den för att mata in en uppsättning objekt från en datakälla till en DataGridView kontroll eller för att välja värden från en lista med alternativ . Genom att binda en uppräkning till en display kolumn kan du visa varje uppsättning av objekt i en separat rad . Instruktioner
1
Klicka på "Start " i Windows och klicka sedan på " Miccrosoft Visual Studio . "
2
Klicka på " File " och klicka sedan på " Nytt ".
3
Skriv följande kod i det öppna fönstret för att binda " sjuksköterskor " uppräkning till DataGridView kontroll .
Import system.windows.forms
Import System . Collections.Generic
Public Enum Titel
RN
CN
End Enum
public class EnumsAndComboBox
ärver Form
Privat flöde som ny FlowLayoutPanel ( ) katalog
Privat WithEvents checkForChange Som Button = ny knapp ( ) katalog
Privata sjuksköterskor Som List ( Of Nurse ) katalog
privata dataGridView1 Som New DataGridView ( ) katalog
Public Sub New ( ) katalog
MyBase.New ( ) katalog
SetupForm ( ) katalog
SetupGrid ( )
End Sub
Private Sub SetupForm ( ) katalog
autoSize = Sant
End Sub
Private Sub SetupGrid ( ) katalog
sjuksköterskor = Ny lista ( för sjuksköterska ) katalog
nurses.Add ( Ny Sjuksköterska ( Title.RN , " Jane " , sant) ) katalog
nurses.Add ( Ny Sjuksköterska ( Title.RN , " Cynthia " , sant) ) katalog
nurses.Add ( Ny Sjuksköterska ( Title.CN , " Julie " , False ) ) katalog
nurses.Add ( Ny Sjuksköterska ( Title.CN , " Mary " , sant) ) katalog
nurses.Add ( Ny Sjuksköterska ( Title.CN , " Galahad " , sant) ) katalog
' initiera DataGridView .
dataGridView1.AutoGenerateColumns = False
dataGridView1.AutoSize = Sant
dataGridView1.DataSource = sjuksköterskor
dataGridView1.Columns.Add ( CreateComboBoxWithEnums ( ) ) katalog
" initiera och lägg en textruta kolumn .
Dim kolumn Som DataGridViewColumn = _
DataGridViewTextBoxColumn ( ) katalog
column.DataPropertyName = " Namn "
column.Name = " RN "
dataGridView1.Columns.Add ( kolumn ) katalog
Private Function CreateComboBoxWithEnums () As
DataGridViewComboBoxColumn
Dim combo som ny DataGridViewComboBoxColumn ( )
combo.DataSource = [ Enum ] . GetValues ( getType ( Title ) ) katalog
combo.DataPropertyName = " Titel "
combo.Name = " Titel "
Return combo
End Function
Public Property Name ( ) As String
Få
Return hisName
End Få
Set ( ByVal Value As String ) katalog
hisName = Värde
End Set
End Property
Public Property Goodguy ( ) As Boolean
Få
Return bra
End Få
Set ( ByVal Value As Boolean ) katalog
bra = Värde
End Ställ
End Property
Public Property Titel ( ) Som titeln
Få
Return hisTitle
End Get
Set ( ByVal Value som titel ) katalog
hisTitle = Värde
End Set
End Property
End Class
Public Shared Sub main ( ) katalog
Application.Run ( New EnumsAndComboBox ( ) ) katalog
End Sub
End Class
4
Klicka på " File " , och klicka sedan på " Spara ". Ange ett filnamn i det öppna fönstret och klicka på " OK " för att spara DataGridView med garanterad leverans uppräkningen i din ansökan .
