注册 登录
编程论坛 VB6论坛

求教,怎么让程序退出到登录界面后,登录界面不保存用户名和密码

sclx88 发布于 2016-09-01 23:36, 1617 次点击
我有2个窗体,form1是登录,form2是返回到form1,现在是form2退回到form1的时候,form1仍然保留用户名和密码,我需要清除密码和用户名,这个怎么搞
form1:
程序代码:
Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Me.Show
Text1.SetFocus
End Sub


form2:
程序代码:
Private Sub Command9_Click(Index As Integer)
myexit = MsgBox("退出并返回登录界面?", vbExclamation + vbYesNo + vbDefaultButton2, "退出确认...")
If myexit = vbYes Then
form1.Show
Unload Me
End If
End Sub
2 回复
#2
风吹过b2016-09-02 08:42
Private Sub Command9_Click(Index As Integer)
myexit = MsgBox("退出并返回登录界面?", vbExclamation + vbYesNo + vbDefaultButton2, "退出确认...")
If myexit = vbYes Then
load form1    '先载入
form1.Text1.Text = ""        '再清掉
form1.Text2.Text = ""
form1.Show
Unload Me
End If
End Sub

如果先显示,再清掉,电脑慢的情况下就可能出现字符一闪而没。
当显示一个窗体时,如果该窗体没有载入, 就会自动载入。
当使用一个窗体控件时,如果该窗体没有载入,也会导致自动载入。
需要在显示之前调整窗体内容时,建议先手动载入。

#3
sclx882016-09-02 11:41
回复 2楼 风吹过b
非常详细 谢谢
1