قائمة القارات
2
Click here to load reader
-
Upload
omar-computer-teacher -
Category
Education
-
view
110 -
download
1
Transcript of قائمة القارات
1
Dim dt As New DataTabledt = Getdata("C:\atlas1\databases\atlas.xls", "select distinct القارة from [data$]")
2
Me.ComboBox1.DataSource = dtMe.ComboBox1.DisplayMember = dt.Columns(0).ToStringMe.ComboBox1.ValueMember = dt.Columns(0).ToStringMe.ComboBox1.SelectedIndex = 1
01234