- 306
- 0
- 约4.39万字
- 约 51页
- 2016-11-26 发布于河南
- 举报
VB程序填空(Option Explicit)1
1.Option Explicit题目:窗体上建立了一个文本框Text1(输入口令)和一个命令按钮Command1(检查)。判断密码是否正确,并显示相应提示;在加载窗体时设置密码框最大长度为8,密码显示字符为“*”
Private Sub Command1_Click()
x = Text1.Text
If x 【? ?Then (like 和 =,不定)
MsgBox (欢迎你用机!)
Else
MsgBox (对不起,口令错)
End If
Text1.Text =
Text1.SetFocus
End Sub
---------------------------------------------------------------------------------------------------------------------
Private Sub Form_Load()
Text1.Text =
Text1.【 ? ?】=8 (maxlength)
Text1.【 ? ?】=*
您可能关注的文档
- 计算机考试范围.doc
- 动量典型例题.ppt
- 高品质音乐的CD刻录方法.doc
- Sharepoint题库.doc
- 计算机基础期末必备题.docx
- 多媒体概念题.doc
- Corel VideoStudio Pro X5使用介绍.pptx
- 计算机基础题3.doc
- HTML第8章.ppt
- 6.Internet应用.ppt
- 2026年安徽省农村信用社联合社招聘22人笔试备考题库及答案解析.docx
- 2026上海师范大学康城实验学校招聘笔试参考题库及答案解析.docx
- 2026南充市顺庆区人民医院招聘31人笔试备考题库及答案解析.docx
- 2026新疆喀什经准检验检测有限公司(第二次)招聘5人笔试参考题库及答案解析.docx
- 屏山县事业单位2026年上半年公开考核招聘工作人员(12人)笔试参考试题及答案解析.docx
- 2026中国电力国际发展有限公司招聘34人笔试备考试题及答案解析.docx
- 2026年4月贵州黔东南州施秉县公益性岗位招聘笔试备考题库及答案解析.docx
- 2026浙江金华金东区部分区属国有企业上半年招聘工作人员14人笔试参考题库及答案解析.docx
- 2026海口美兰空港吉耐斯航空发动机维修工程有限公司董事长岗位招聘1人笔试参考试题及答案解析.docx
- 2026贵州黔东南州天柱县招聘乡镇政府专职消防员19人笔试备考试题及答案解析.docx
最近下载
- 小学六年级英语测试题(006号).doc VIP
- 玉柴YC4D120-20-D1008发动机零件图册.pdf VIP
- 透析正则动量与配速法的应用讲义+跟踪训练.pdf VIP
- 小学五年级英语测试题(010号).doc VIP
- [英语]《开心学英语》小学五上学期英语试题.doc VIP
- 小学英语素材-英语音标发音规则大法.doc VIP
- 2026年高考物理二轮复习微专题六 配速法与洛伦兹力冲量法(复习讲义)(全国通用)(原卷版).docx VIP
- 2025年教育行业五年在线教育发展与用户习惯报告.docx
- 2026吉林新高考:地理必考知识点归纳.doc VIP
- 2023年上海市中考英语试卷真题(含答案)+听力材料.pdf
原创力文档

文档评论(0)