Dim con As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("datasource").ConnectionString)
Dim da1 As New SqlDataAdapter("select * from item_master", con)
Dim dtCities As New DataTable()
da1.Fill(dtCities)
Dim drv As DataRowView = TryCast(e.Row.DataItem, DataRowView)
Dim City As [String] = drv("units").ToString()
Dim ddl As DropDownList = DirectCast(e.Row.FindControl("ddl1"), DropDownList)
ddl.DataSource = dtCities
ddl.DataTextField = "units"
ddl.DataBind()
ddl.Items.FindByText(City).Selected = True