بيانات الدولة 1

2
1 Dim dt As New DataTable dt = Getdata("C:\databases\ atlas.xls", "select * from [data$] where ة ل الدو= “Me.ComboBox2.SelectedValue")

Transcript of بيانات الدولة 1

Page 1: بيانات الدولة 1

1

Dim dt As New DataTabledt = Getdata("C:\databases\atlas.xls", "select * from [data$]where الدولة = “Me.ComboBox2.SelectedValue")

Page 2: بيانات الدولة 1

2

Me.Label6.Text = dt.Rows(0).Item(2).ToStringMe.Label7.Text = dt.Rows(0).Item(3).ToStringMe.Label8.Text = dt.Rows(0).Item(4).ToString

R0

IT1

R1

R2

R3

IT0IT2IT3IT4