' 帮助中到处都是If dr isnot nothing ：：：：：
dr = DataTables("user").Find("[username] ='" & re & "' ")If dr is nothing then
MessageBox.Show("暂未查询到该用户资料!", "错误提示", MessageBoxButtons.ok, MessageBoxIcon.Information)Else
加好友 
发短信
Post By：2011/6/5 8:14:00 [显示全部帖子]
