c# kodunu ile vb kodu ile yapma yardım??

Dim cmd As New SqlClient.SqlCommand("SELECT dbo.kullanici.*, dbo.kulgrp.grupadi, dbo.tbl_il.ilad, dbo.tbl_ilce....................................................................................
Dim myReader As SqlDataReader
myReader = cmd.ExecuteReader()
While (myReader.Read())
konya = myReader("ilid").ToString()
End While
sqlbaglan.Close()
Dim sqlbaglanti = bag.name()
Dim sil As New SqlClient.SqlCommand("select * from tbl_ilce where ilid=" + konya, sqlbaglan)
Dim adap = New SqlDataAdapter(sil)
adap.Fill(data)
DropDownList3.DataTextField = "ilcead" benim yaptığım kod bu şekilde çalışıyor ama uzun oluyo adamın C# ile yaptığı
DropDownList3.DataSource = data
DropDownList3.DataBind()
sqlbaglanti.Close()

----------------------------------------------------------------
datarow kullanıcı =klas.getdatarow("SELECT dbo.kullanici.*, dbo.kulgrp.grupadi, dbo.tbl_il.ilad, dbo.tbl_ilce....................................................................................

datatable ilçe =klas.getdatatable("select * from tbl_ilce where ilid=" +kullanıcı[ "ilid"], sqlbaglan) benim 7 satır da yaptığım işi tek kelime ile bitiriyor...bunu vb de nasıl yaparım...
Dim adap = New SqlDataAdapter(sil)
adap.Fill(data)
DropDownList3.DataTextField = "ilcead"
DropDownList3.DataSource = data
DropDownList3.DataBind()
sqlbaglanti.Close()

güncel