Public Function redset(ByVal sqlstr As String, ByVal tabelname As String) As DataSet
Dim myda As SqlClient.SqlDataAdapter
myda = New SqlClient.SqlDataAdapter(sqlstr, mycon)
Dim dset As New DataSet
myda.Fill(dset, tabelname)
redset = dset
End Function

Public globaluname As String '用户名

Dim sqlstr As String
dim uid as string
uid=trim(textbox1.text)
sqlstr = "select u_name form t_user where u_id='" + uid + "'"
globaluname = redset(sqlstr, "用户表").Tables("用户表").Columns('u_name')
我想检索t_user 中 u_id='"+uid+"'的u_name的值并把这个值赋给全局变量globaluanme
因为刚接触vb.net所以请教大家一下
我想实现我想要的功能这样写代码行不行有没有简单的方法
而且globaluname = redset(sqlstr, "用户表").Tables("用户表").Columns('u_name')这句代码本身也有错误
不知道该怎么写

谢谢