先定位到123所在的行，然后：
姓名框 ＝ tables("user").current("username")
.............
或者：
Dim dr As DataRowdr = DataTables("user").Find("[usermane] = '123'")
姓名框 ＝ dr("username")
加好友 
发短信
Post By：2011/6/5 0:54:00 [显示全部帖子]
