外招VB机试题GH卷

《外招VB机试题GH卷》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、G卷一、在VB应用程序中打开工程文件VB11G1.vbp进行程序代码的调试，以实现所要求的程序功能。要求只能通过增加或修改代码，而不得删减原代码中的语句。（共30分）（运行效果参见程序DEMO11_G1.exe所示）。'======================================================='分别统计文本框中大写字母、小写字母的个数，并将统计结果'在图形框显示输出，待调试。'===================================================

2、====PrivateSubForm_Load()Text1="Let'sgoDutch."EndSubPrivateSubCommand1_Click()Dimn1AsInteger,n2AsInteger,xAsString,i%Fori=1ToLen(Text1)x=Mid(Text1,i,1)SelectCasexCase"A"And"Z"n1=n1+1Case"a"And"z"n2=n2+1NextiPrint"大写字母个数：";n1Print"小写字母个数：";n2EndSub二、在VB应用程序中新建

3、一个标准EXE工程，然后完成下列操作。（共40分）1．构建窗体及控件（20分）⑴窗体Form1标题：学生自己的学号（如输入：2011050618）；背景色：浅蓝。⑵标签Label1标题：“祝你考试顺利！”；背景：透明；标签大小：自动；字体：隶书、小一号、加粗。⑶命令按钮Command1：标题为“手动”；命令按钮Command2：为图形按钮，加载图形文件为：KEY01.ICO。⑷计时器Timer1：时间间隔100ms，初始状态为不可用。2．按下列要求编写代码（20分）⑴窗体加载事件：设置Label1的初始位置在窗体

4、垂直居中。⑵单击Command1即“手动”按钮：计时器Timer1不可用；Label1从上向下移动（每次移动100twip）。⑶单击Command2即“图形”按钮：计时器Timer1可用。⑷计时器Timer1的Timer事件：实现Label1从上向下移动，到达窗体的底边界后，自动又从上端开始向下移动；（每次移动100twip）。完成后将窗体Form1保存为VB11G2.frm，将工程保存为VB11G2.vbp（运行效果参见程序DEMO11_G2.exe所示）。三、在VB应用程序中新建一个标准EXE工程，然后完成下

5、列操作。（共30分）1．构建窗体及控件（10分）Form1标题：试卷A之第三题；背景色：浅绿；字体为：隶书；字号：16。2．按下列要求编写代码（20分）编写函数过程AvgA(x%())，返回数组x中元素的平均值。在Form1_Click事件过程中完成下列功能：随机生成20个[50，90]之间的正整数存入一维数组a中，并在窗体上以每行5个的方式显示；以数组a为实参调用函数AvgA，将元素的平均值显示在窗体上。完成后将窗体Form1保存为VB11G3.frm，将工程保存为VB11G3.vbp（运行效果参见程序DEMO

6、11_G3.exe所示）。H卷一、在VB应用程序中打开工程文件VB11H1.vbp进行程序代码的调试，以实现所要求的程序功能。要求只能通过增加或修改代码，而不得删减原代码中的语句。（共30分）（运行效果参见程序DEMO11_H1.exe所示）。'======================================================='分别统计Text1中的I、J两个字母（不分大小写）出现的次数，'并将结果在Text2中分行显示输出，待调试。'=========================

7、==============================PrivateSubForm_Load()Text1="Iappliedforajobinthatoffice."EndSubPrivateSubCommand1_Click()Dimn1AsInteger,n2AsInteger,xAsString,i%Fori=1ToLen(Text1)x=Mid(Text1,i,1)SelectCasexCase"i","I"n1=n1+1Case"j","J"n2=n2+1EndSelectNextText2=T

8、ext2&"字母i或I出现次数："&n1&vbCrLfText2=Text2&"字母j或J出现次数："&n2EndSub二、在VB应用程序中新建一个标准EXE工程，然后完成下列操作。（共40分）1．构建窗体及控件（20分）⑴窗体Form1标题：学生自己的学号（如：2011050618）；背景色：浅蓝。⑵标签Label1标题：“祝你考试顺利！”；背景：透明；标签大小：自动；