$Rs.Open('Select * From UserTable Where ' & "User_Name" & '=' & '"' & $VarName & '"')
While (Not $Rs.eof And Not $Rs.bof)
If $VarID = $Rs.Fields(0).value Then
GUICtrlSetData($UserName, $Rs.Fields(1).value)
GUICtrlSetData($UserSex, $Rs.Fields(2).value)
EndIf
$Rs.Movenext
WEnd