请教一条VB.NET语句

ASP.NET2.0:
strSearch &= "&con=" & Server.UrlEncode(hdCon.Value.Trim.Substring(3)) & "&conall=" & Server.UrlEncode(tbConAll.Text.Trim.Substring(3))
Response.Write("<script language='javascript'>window.open(""SearchContactResult.aspx?" & strSearch & """);</script>")
hdCon,tbConAll是两个Textbox控件

Dim strcon As String = "integrated security=sspi;server=(local);database=北风贸易"
Dim mycon As New SqlConnection(strcon)

'创建数据命令
Dim mycmd As New SqlCommand
'mycmd.Connection = mycon
'mycmd.CommandType = CommandType.Text
'mycmd.CommandText = "select name from stud88"
'以上三句话的方法二
With mycmd
.Connection = mycon
.CommandType = CommandType.Text
.CommandText = "select name from stud88"
End With

'打开连接
mycon.Open()

'执行数据命令,赋值
Dim myreader As SqlDataReader
myreader = mycmd.ExecuteReader

If myreader.HasRows Then
While myreader.Read
Me.ComboBox1.Items.Add(myreader("name"))
End While
End If
'关闭连接