Visual_Basic_程序设计试卷7.pdfVIP

QQ:401999419 全 国 计 算 机 等 级 考 试 二 级 笔 试 试 卷 VisualBasic 语 言 程 序 设 计 常 用 标 准 控 件 填空题专项练习（每空2分，共100分） 1. 以下程序的功能是：单全选按钮后，将左边文本框的内容全部选中；单击替 换铵钮后，将左边文本框中选中的内容用右边文本框的内容来替代。 PrivateSubCommand1_Click( Text1.SetFocus Text1. 【1 】 =0 Text1.SelLength= 【2 】 EndSub PrivateSubCommand2_Click( Text1. 【3 】 =Text2.Text EndSub 2. 以下程序的功能是：在文本框Text1 中输入小写字母，在文本框Text2 中同 步显示大写字母 PrivateSubText1_ 【4 】 ( 1 11 VisualBasic 第 页 共 页 全国计算机等级考试 程序设计 Text2.Text= 【5 】 EndSub 3. 将焦点停在文本框Text1 中的语句为 【6 】 4. 以下程序的功能是：在文本框Text1 中输入口令，口令以星号显示，单击登 陆铵钮Command1，如果口令正确，则显示 “合法用户”；如果口令不正确， 自动清除文本框中的内容，光标停在文本框中，等待重新输入，如果三次输 入口令不正确，则退出程序。 PrivateSubCommand1_Click( StaticnAsInteger IfText1.TextabcThen 【7 】 Ifn=3Then 【8 】 Text1.Text= Text1.SetFocus Else MsgBox合法用户 EndIf EndSub 5. 如图所示界面，窗体含有一个文本框Text1，两个复选框Check1和Check2， 两个单选按钮Option1和Option2，根据要求将程序补充完整。 2 11 VisualBasic 第 页 共 页 全国计算机等级考试 程序设计 （1）单击复选框粗体，文本框中的文字变成粗体效果 PrivateSubCheck1_Click( Text1. 【9 】 =NotText1.FontBold EndSub （2）单击单选钮10号，文本框中的文字大小被设置为10号 PrivateSubOption1_Click( Text1. 【10 】 = 10 EndSub 6. 如果双击列表框中某个列表项后，再把该列表项添加到列表框末尾，使用的 语句如下： List1.AddItem 【11 】 7. 如果双击列表框中某个列表项后，则删除该列表项，使用的语句如下： List1.RemoveItem 【12 】 8. 删除列表框List1 中所有的列表项，使用的语句为： 【13 】 9. 以下程序段的功能是：将列表框中所有列表项在窗体上打印出来 Fori=0To 【14 】 Print 【15 】 Next 10.以下程序段的功能是：将列表框中所有列表项在窗体上打印出来 3 11 VisualBasic 第 页 共 页 全国计算机等级考试 程序设计 Fori=0ToList1.ListCount-1 If 【16 】 =TrueThenPrintList1.List(i Next 11.以下程序的功能是：在组合框中输入城市名称后按回车，如果该名称已存在， 则不允许加入；如果不存在，则作为一个列表项加入到组合框中 PrivateSubCombo1_ 【17 】 (KeyAsc