VB and sql SERVER 做管理系统

Question

如何能实现只浏览当前登录用户的信息  只浏览当前用户的信息  困扰好久了 求高手解答

Answer 1

假如你登陆的姓名输入到Text1
那么 Dim SQL as string
    SQL="用户信息" （这是你数据库里的表的信息）
     rs.source="select * from 用户信息 where 用户名='"& Text1.text &"'"
    rs.open
    接下来你就把数据库对应字段的信息显示到你想让他显示的地方就行

Answer 2

如果我在Form1 中登录了 一个用户，该用户可以再Form2中查看自己的个人信息（数据库中有人员信息表）
楼上我没有明白你的意思 能具体点解答么 VB是没有session的 

Answer 3

问题补充： 例如有2个窗体 
我在FORM1登录了一个账号，在Form2的功能菜单中有一个功能就是 浏览个人信息（该用户的信息）如何实现 
    楼上 我没有明白你的意思  VB中没哟session 

Answer 4

设置一个全局变量，CurrentLoginUser
默认为空
如果form1中用户账号登录了以后，则该变量赋值为用户名
同时form2中读取该用户信息并显示。

Answer 5

在[模块]中定义一全局变量，登录后用变量记录个人信息的唯一用户名或ID，
在Form2中查询个人信息，然后显示到界面。例：
'--------------------
Model1.bas代码
Dim myid
'--------------------
Form1代码
'登录代码
'略
登录成功后
myid=rs("id")'用户信息表唯一ID
'---------------------------------
Form2代码
在Form_Load中加入查询个人信息
Dim sql
sql="select * from 个人信息表 where id='"& myid &"'"
rs.open sql,conn,1,1
然后你的代码。
－－－－－－－－－－－－
友情提示，这样的问题，最好能把你的代码发上来。