大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
解决方码旅案资源管理器中右键菜单,添加,WINDOWS窗体,弹出的对话框中,左栏已安装的模板中选择WINDOWS FORMS ,右信改边中找到 登录滑模判窗体。添加 。程序会添加一个登录界面。很方便。你试下。
创新互联-成都网站建设公司,专注做网站、成都网站建设、网站营销推广,域名注册,虚拟主机,网站运营有关企业网站制作方案、改版、费用等问题,请联系创新互联。
1,在桌面上,鼠标左键双击程序,打开VB编慎友程软件,在左边工具栏上,单击【Label】按钮,在Form1窗口上绘制出两标签,用来写文字的说明。在这里写上用户名和密码,如下图所示。
2,接着,根据窗口的大小,感觉文字小了,可以在Label属性窗口上,修改Font属性值,单击其选择按钮就可以更改字体的大小了,如下图所示。
3,然后,在弹出的字体对话框中,选择四号字的大小,单击【确定】按钮后,就可看到Form1窗口上用户名的字体变大了。密码的字体大小也如此操作,如下图所示。
4,接着,在程序左边工具栏上,单击【TextBox】按钮,在Form1窗口上绘制出两文本框,并在TextBox属性面板上,修改Text的值,将其清空,如下图穗孝仔所示。
5,然后,在程序左边工具栏上,单击【CommandButton】按钮,在Form1窗口上绘制出两命令按钮在其属性面板上,将Caption的值改为确定。另一个改为取消,如下图所示。
6,最后,在程序左边工具栏上,单击【Image】按钮,在Form1窗口上绘制出两图框,并修改其两处属性值,如图所示,选取两个图标后,将它们重新布局猜汪的更好看些后,单击运行,登录窗口就出现了,如下图所示。
1、新建一个标准工程,在窗体添加两个窗体,使用默认名(这里默认可以自己更改),第一个窗体caption属性更改为“用户登录”,第二个窗口caption属性改为“”空格,在第一个窗口添加两个label控件,名称分别改为“用户名:”“密码”(这里右边属性表passwordchar添加“*”)borderstyle分别选择3,两个commandbox空间,caption属性分别改为“登录”“退出”
主要程序添加,这里代码在图片里
2、在第二窗口添加两个label,一个commandbox控件,label的caption属性分别改为“用户成功登录,欢迎使用”,“声明:纯属个人爱好与学习,切勿商业使用”;commandboxe控件caption属性改为“退出”主要代码在图片里
3、点击菜单栏“启动”输入“用户名”“密码”,即可登录,登录界面就这样制作完成了,很简单,希望大家多揣摩,开发出更好程序
进入VB6.0软件羡滚,双击“标准EXE”显示的页面如图。预设正确的用户名和密码为aaa和abc123。
先从控件栏选择标签控件在form1窗体的相应位置画两个大小适合的标签,再从控件栏选择文本框控件在form1窗体的相应位置画两个大小适合的文本框,然后再知派纯从控件栏选择按钮控件在form1窗体的相应位置画两个大小适合的按钮。
选中(单击即可)窗体Form1,在右边的属性栏将Caption属性值改为“用户登录”;选中标签Lable1将Caption属性值改为“用户名”,选中标签Lable2将Caption属性值改为“密码”,属;选中文本框Text1,将Text属性值置空,选中文本框Text2,将Text属性值置空且将PasswordChar属性值改为“*”;选中按钮Command1,将Caption属性值改为“登录”,选中按钮Command2,将Caption属性值改为“重新输入”。然后调整各控件位置和大小,使整个窗体更加美观。
在右边右键点击“窗体”,选中“添加”,点击“添加窗体”,如图在出现的窗口里双击“窗体”,添加一个form2窗体;用同样的方法再添加一搭咐个form3窗体。
在form2窗体各添加一个标签和按钮。在标签的Caption属性值改为“登录成功!”也可以通过Font属性更改字体;按钮的Caption属性值改为“返回”。
在form3窗体各添加一个标签和按钮。在标签的Caption属性值改为“用户名或密码错误,请重新登录!”也可以通过Font属性更改字体;按钮的Caption属性值改为“重新登录”。
1.首先添加2个label控件,一个caption为用户名,一个为密码然后分别在2个label控件后面添加一个text控件,
2.将text的text属性稿族设置为码迟空再添键模弊加2个button按钮,一个名为登陆,一个名为取消简要代码如下:
private sub text2_change() sswordchar="*"end subprivate sub button1_click()if text1.text="text" and text2.text="123456" then '这里写验证代码... '通过验证后要干么elsemsgbox("用户名或者密码不正确!")end if end subprivate sub button2_click()endend sub