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
2、然后点击二级菜单选项按钮,如下图所示。
3、此时将会d出选项对话框,这时候切换编辑器格式选项卡,如下图所示。
4、然后就可以在这里更改字体大小,如下图所示。
5、更改完毕后点击确定即可成功设置,如下图所示就完成了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)