. Microsoft NET Framework understøtter en række datatyper , som du kan vise på Windows Forms kontroller. Opregningen type data giver brugerne mulighed for at repræsentere de tabelkolonner data. Du kan bruge det til at indtaste et sæt af objekter fra en datakilde til en DataGridView kontrol, eller at vælge værdier fra en liste af valgmuligheder. Ved at binde en opregning til et display kolonne kan du vise hvert sæt af objekter i en separat række . Instruktioner
1
Klik på " Start" i Windows og derefter klikke på " Miccrosoft Visual Studio ".
2
Klik på " File " og derefter klikke på " Ny".
3
Indtast følgende kode i det åbne vindue til at binde " sygeplejersker " opregning til DataGridView kontrol.
Import System.Windows.Forms
Import System . Collections.Generic
Public Enum Titel
RN
CN
End Enum
Public Class EnumsAndComboBox
arver Form
Private flow som ny FlowLayoutPanel ()
Private WithEvents checkForChange Da Button = Ny Button ()
Private sygeplejersker Som liste ( som sygeplejerske )
< p > Privat dataGridView1 Som New DataGridView ()
Public Sub New ()
MyBase.New ()
SetupForm ()
SetupGrid () < br >
End Sub
Private Sub SetupForm ()
AutoSize = Sand
End Sub
Private Sub SetupGrid ()
< p > sygeplejersker = Ny liste ( som sygeplejerske )
nurses.Add (New sygeplejerske ( Title.RN , " Jane " , sand) )
nurses.Add (New sygeplejerske ( Title.RN , " Cynthia " , sand) )
nurses.Add (New sygeplejerske ( Title.CN , " Julie " , False ) )
nurses.Add (New sygeplejerske ( Title.CN , " Mary " sand) )
nurses.Add (New sygeplejerske ( Title.CN " Galahad " , sand) )
' Initialiser DataGridView .
dataGridView1.AutoGenerateColumns = False
dataGridView1.AutoSize = Sand
dataGridView1.DataSource = sygeplejersker
dataGridView1.Columns.Add ( CreateComboBoxWithEnums () )
' Formatér og tilføje en tekstboks kolonne.
Dim kolonne Som DataGridViewColumn = _
Nyt DataGridViewTextBoxColumn ()
column.DataPropertyName = "Navn "
column.Name = " RN "
dataGridView1.Columns.Add ( kolonne)
Private Function CreateComboBoxWithEnums () som
DataGridViewComboBoxColumn
Dim combo som ny DataGridViewComboBoxColumn () < br >
combo.DataSource = [ Enum ]. GetValues ( getType ( titel) )
combo.DataPropertyName = "Titel"
combo.Name = "Titel"
< p > Retur combo
End Function
Public Property Navn ( ) As String
Få
Return hisName
End Get
Set ( ByVal Value As String )
hisName = Værdi
End Set
End Ejendomsmæglere
Public Property Goodguy () Som Boolean < br >
Få
Return god
End Get
Set ( ByVal Value Som Boolean )
god = Værdi
End Set
End Ejendomsmæglere
Public Property Titel ( ) Som titel
Få
Return hisTitle
End Get
< p > Set ( ByVal Value Som titel)
hisTitle = Værdi
End Set
End Ejendomsmæglere
End Class
Public Shared Sub main ()
Application.Run (New EnumsAndComboBox () )
End Sub
End Class
4
Klik på "File " og klik derefter på " Gem". Indtast et filnavn i det åbne vindue og klik på "OK " for at gemme DataGridView kontrol med binded opregningen i din ansøgning.