vb模拟题94225

《vb模拟题94225》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、2008-5-16Vb模拟题一、程序填空：1、以下程序的功能是：依次从弹出对话框中输入10个数字并输出到窗体中，将它们的最大值输出。PrivateSubCommand1_Click()max=0Fori=1To10x=Val(____(1)____)PrintxIf____(2)____Then____(3)____NextiPrintMaxEndSub1）InputBox("")2）x>max@max

2、将程序补充完整。PrivateSubCommand1_Click()Dimx(1To5,1To5)s=0Fori=1To5Forj=1To5x(i,j)=____(1)____Printx(i,j);If____(2)____Thens=s+x(i,j)NextjPrintNextiPrintsEndSub1）Int(Rnd*90+10)2）i=j3.下面程序的功能是：设计一个选课运行界面，如下图所示。它包含两个列表框，左边列表框list1为已可供选择的课程名，当单击某课程名后，将该课程加入到右边的列表框list2中，同时在左边列

3、表框中删除。当右边课程数已满5门时，不允许再加入。请将程序补充完整。PrivateSubForm_Load()List1.ClearList1.AddItem""大学计算机基础""List1.AddItem""VB程序设计""List1.AddItem""数据库技术与应用""List1.AddItem""C程序设计""List1.AddItem""多媒体技术""List1.AddItem""硬件技术基础""List1.AddItem""网络技术与应用""List1.AddItem""WEB程序设计""EndSubPrivateSu

4、bList1_Click()If____(1)____ThenMsgBox""超过5门课程，不能再选！""ExitSubElse____(2)____List1.RemoveItemList1.ListIndexEndIfEndSub1）List2.ListCount>=52）List2.AddItemList1.Text4."下面程序的功能是：随机产生20个两位的随机数，将其组成一个四行五列的矩阵并输出。请将程序补充完整。PrivateSubCommand1_Click()Dimx(1To4,1to5)Fori=1To5forj

5、=1to4x(i,j)=____(1)____Printx(i,j);Nextj____(2)____nextiEndSub1)Int(Rnd*90+10)2)Print5、"下面程序的功能是：找出被3、5、7除，余数均为1的最小的5个正整数。请将程序补充完整。PrivateSubCommand1_Click()Dimcount%,n%count=____(1)____n=1Don=____(2)____IfnMod3=1OrnMod5=1OrnMod7=1ThenPrintncount=count+1EndIfLoop____(

6、3)____EndSub1）02）n+13）Untilcount=5（whilecount<5）6、"下面程序的功能是：将输入的字符串以反序显示，如输入""ASDFGHJKL""，显示""LKJHGFDSA""。请将程序补充完整。PrivateSubCommand1_Click()s=InputBox(""输入字符串："")Fori=____(1)____To1Step-1Print____(2)____;NextiEndSub1）Len(s)2）Mid(s,i,1)二、选择题：1、在VisualBasic中称对象的数据为____

7、______。A、属性B、方法C、事件D、封装（A）2、刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是__________。A、单选按钮B、图片框C、通用对话框D、文本框（C）3、双击窗体中的对象后，VisualBasic将显示的窗口是_（C）___。A、项目（工程）B、窗口工具箱C、代码窗口D、属性窗口4、VB是一种_________的可视化编程程序。A、面向对象B、面向过程C、A和BD、面向机器（A）5、为了使文本框同时具有水平和垂直滚动条，应先把MultiLine属性设置为True，然后再把ScrollBars属性

8、设置为________。A、0B、1C、2D、3（D）6、为了取消窗体的最大化功能，需要设置_________属性为False。（D）A、ControlBoxB、MinButtonC、EnabledD、MaxButton77、文本框(Text1)中