22问答网
所有问题
当前搜索:
vb窗体如何设置密码用户名代码
用
vb
制作一个输入
用户名
和
密码
的
用户窗体
,单机确定时显示"张三,你好"的...
答:
'
窗体
上添加2个label,2个textbox,1个commandbutton控件Private Sub Command1_Click()MsgBox "张三,你好"End SubPrivate Sub Form_Load()Label1.Caption = "
用户名
"Label2.Caption = "
密 码
"Command1.Caption = "确定"Text1.Text = ""Text2.Text = ""End Sub ...
vb
程序设计登录程序:在
窗体
的文本框中输入
密码
。
答:
'2个
窗体
(form1,form2) 2个textbox(text1,text2) 1个commandbutton (command1)'text1 为账号框,text2为
密码
框,command1为登录按钮 Dim cCount As Long Private Sub Command1_Click()If LCase(Text1.Text) = "abc" And Text2.Text = "123" Then'账号abc(不区分大小写) ,密码123 cCount...
用
VB
编写程序(设计
密码
验证登录
窗体
,密码正确显示登录成功,否则若三...
答:
先设计好界面,(如:用标签控件,2个文本框,)
在1个要输密码文本框的属性名称中输入password,在要输入名称的文本框的属性名称中输入username.在设置字体
想要输入错误密码三次退出程序方法如下;在密码的代码框中输入:unload.me chick=3.End sub ...
VB怎么设置
账号
密码
?
答:
打开数据库资料表内的("用户名称") 和("用户密码") 栏位里面直接改就可以了
。或你自己写一个新增用户名称和用户密码的程式。比如:数据库=login.mdb 资料表=user 栏位名=username 和 password Private Sub Command1_Click()Data1.Recordset.AddNew Data1.Recordset.Fields("username") = Text1.Tex...
vb
做一个
窗体
,两个输入框,分别输入卡号
密码
,两个按钮
答:
窗体
二 End Sub Private Sub Command1_Click() '按登陆按钮 if text1.text=ID and text2.text=
PASSWORD
then form2.show form1.hide endif End Sub Private Sub Command2_Click() '按退出按钮 END End Sub 窗体2 FORM2 部分 Private Sub Form_Load()'里面请添加需要的
代码
End Sub ...
vb登陆窗体中的
用户名
显示在主
窗体vb
状态栏里求指教
答:
设置
全局变量如 Username 在登录
窗体
中,如果登录成功则将登录
用户名
赋值给该全局变量,进入主窗体后调用该变量即可。
VB
登录
窗口
制作
代码
和流程
答:
1、首先,点击菜单栏中的工具按钮,如下图所示。2、然后点击二级菜单选项按钮,如下图所示。3、此时将会弹出选项对话框,这时候切换编辑器格式选项卡,如下图所示。4、然后就可以在这里更改字体大小,如下图所示。5、更改完毕后点击确定即可成功
设置
,如下图所示就完成了。
请问我想用
VB
6.0做一个
密码
修改
窗体
,密码改成功保存到我的数据库里Acc...
答:
ACCESS 的连接字符: constr= "Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\aaa.mdb;Uid=admin;Pwd=;" ' Pwd后面填写
密码
即可连接
谁能用法
VB
编辑器
设置
excel的密码,打开弹出输入
密码窗体
的那种...
答:
1.打开需要加密码的文件;2.按F12(也就是另存为),在另存为对话框在菜单“工具”中点“常规选项”,即可看到两个
密码设置
,以及备份、建立只读等设置;3.根据需要,设置打开权限密码或修改权限密码(可以打开看,只是修改后保存时要求密码),即可。还有其他方法,比如打开文件后,直接在菜单“工具”->...
VB
题:用If …Else…End If来设计登录
窗体
的界面 ~两个标签用来说明“用...
答:
Private Sub Command1_Click()If Text2.Text = "ABCDEF" Then Label1.Caption = "
密码
正确,欢迎您!"Else Label1.Caption = "密码不正确,请重新输入!"End If End Sub Private Sub Command2_Click()End End Sub Private Sub Form_Load()Text2.PasswordChar = "*"Command1.Caption = "确定...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
vb通过代码设置窗体大小
vb关闭当前窗体的代码
vb运行时退出窗体代码
vb关闭程序窗体的代码
一个窗体调用另一个窗体
vb单击按钮关闭窗体代码
Vb6代码构建窗体
vb窗体设计
vb字体颜色代码