VB+Access分析维修管理系统,怎样进入系统窗体上显示登陆用户名;
请高手帮忙;
首先谢谢“mingtian97091”回答:
对不起,我本人刚接触状态条,能否具体点,谢谢;
"user"为我登陆时用户工号的文本框;
”Login“为我的登陆窗体;
再次感谢“ yutianstar”,回答;
可是还无法现实,请各位DX出谋划策.TKS!
VB怎样显示登陆用户ID
答案:3 悬赏:40
解决时间 2021-01-04 08:24
- 提问者网友:不懂我就别说我变
- 2021-01-04 01:46
最佳答案
- 二级知识专家网友:荒唐后生
- 2021-01-04 01:57
下面放一个状态条,把要现实的用户名现实在上面就可以
StatusBar 属性--窗格---分出多列,每列现实不同的内容(随便自己,例如用户名,时间,职位,权限等)
With StatusBar
.Height = 315
.Panels.Item(2).Text = "操作员: " & gobjUser.getFullName
.Panels.Item(3).Style = sbrCaps
.Panels.Item(3).Alignment = sbrCenter
.Panels.Item(4).Style = sbrIns
.Panels.Item(4).Alignment = sbrCenter
.Panels.Item(5).Style = sbrNum
.Panels.Item(5).Alignment = sbrCenter
.Panels.Item(6).Alignment = sbrLeft
End With
StatusBar 属性--窗格---分出多列,每列现实不同的内容(随便自己,例如用户名,时间,职位,权限等)
With StatusBar
.Height = 315
.Panels.Item(2).Text = "操作员: " & gobjUser.getFullName
.Panels.Item(3).Style = sbrCaps
.Panels.Item(3).Alignment = sbrCenter
.Panels.Item(4).Style = sbrIns
.Panels.Item(4).Alignment = sbrCenter
.Panels.Item(5).Style = sbrNum
.Panels.Item(5).Alignment = sbrCenter
.Panels.Item(6).Alignment = sbrLeft
End With
全部回答
- 1楼网友:时光不老我们不分离
- 2021-01-04 03:42
在要显示登录用户名的系统窗体(如:Form1)上放上一个文本框(如:text1),然后在Login登录窗体中增加一句代码:Form1.text1.text=user.text。这样就行了。
Login窗体上肯定有一个确定按钮吧,把上面这句代码附在这个确定按钮上就行了。
- 2楼网友:厌今念往
- 2021-01-04 02:45
你分开查询导致的
function searchdata1(schstr1$, schstr2$) as boolean
searchdata1 = false
rs.movefirst
rs.find "usernm = " & chr(39) & schstr1 & chr(39) & " and " & "passw = " & chr(39) & schstr2 & chr(39)
if not rs.eof then searchdata1 = true
end function
改成这样的 然后调用时 if searchdata1 (text1.text,text2.text) then
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯