搜索
第四套VisualBasic是一种面向_____的程序设计语言。A、过程B、用户C、工程D、对象答案：D一个应用程序_____窗体。A、可包括多个B、应该有两个C、只许有一个D、可以没有答案：AVisualBasic中文版的菜单栏包括：文件、编辑、视图、工程、格式、调试、_____、查询、图表、工具、外接程序、窗口和帮助。A、浏览B、运行C、属性D、查看答案：B一只白色的足球踢进球门，则白色、足球、踢、进球门是________。A、对象、属性、方法、事件B、属性、对象、方法、事件C、对象、属性、事件、方法D、属性、对象、事件、方法答案：D_____在用户的应用程序执行期间发生，比如鼠标单击或敲击键盘。A、事件B、工程C、属性D、方法答案：A引用列表框(List1)最后一个数据项应使用_____。A、List1.List(List1.ListCount)B、List1.Lis(ListCount)C、List1.List(ListCount-1)D、List1.List(List1.ListCount-1)答案：D当文本框的ScrollBars属性设置了非零值，却没有效果，原因可能是_____。A、文本框的MultiLine属性为FalseB、文本框中没有内容C、文本框的MultiLine属性为TrueD、文本框的Locked属性为True答案：A将数据项China添加到列表框(List1)中成为第一项应使用_____语句。A、List1.Addltem1,ChinaB、List1.AddltemChina,1C、List1.AddltemChina,0D、List1.Addltem0,China答案：C下列控件中，_____控件不能改变大小。A、LabelB、FrameC、TimerD、TextBox答案：C当一个CheckBox控件的Value属性为2时，表示该控件_____。A、未选中B、以被选中C、当前不可用D、未知答案：C使用_____方法，可取得列表框中的项数。A、RemoveItemB、ListCountC、AddItemD、Clear答案：B要使标签所在处透明显示背景，应设置BackStyle属性的值为_____。A、FalseB、TrueC、1D、0答案：D如果单击一个当前没有被选中的复选框，其他已被选中的复选框会处于_____状态。A、不显示B、选中C、禁止D、不选中答案：B复选框的Value属性为1时，表示_____。A、复选框未被选中B、复选框内有灰色的勾C、复选框被选中D、复选框操作有误答案：C在VisualBasic中最基本的对象是_____，它是应用程序基石，也是其它控件的容器。A、窗体B、文本框C、命令按钮D、标签答案：A以下四个说法中不正确的是_____。A、控件工具箱中可以添加新的控件B、可以通过双击工具箱中的控件，将控件加入窗体上C、VB中所有基本控件都可以改变大小D、在窗体上选中控件，按【Del】键可删除该控件答案：C使用_____方法可将新的列表项添加到一个列表框中。A、ClearB、PrintC、AddItemD、RemoveItem答案：C如果要使文本框同时具有水平滚动条和垂直滚动条，应将ScrollBars设置为_____。A、0B、3C、1D、2答案：B窗体Form1的名称属性为frm，它的Load事件过程名为_____。A、Me_LoadB、Frm_LoadC、Form_LoadD、Form1_Load答案：C若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的_____属性。A、BackColorB、BorderStyleC、BackStyleD、ForeColor答案：C有应用代码：Text1.Text=VisualBasic，其中的Text1、Text和VisualBasic分别代表_____。A、对象、方法、属性B、属性、对象、值C、对象、属性、值D、对象、值、属性答案：C存在如下程序：PrivateSubCommand1_Click()a=Val(InputBox(请输入))b=Val(InputBox(请输入))x=a+bIfabThenx=a-bendifPrintxEndSub运行后，从InputBox对话框中连续输入3和4，输出结果为_____。A、3B、34C、0D、7答案：D下列程序：PrivateSubForm_Click()Forj=1To15a=a+jMod3NextjPrintaEndSub运行后输出的结果是_____。A、15B、1C、90D、120答案：A哪个程序段不能分别正确显示1、2、6、24的值_____。A、Fori=1To4n=1Forj=1ToiN=n*jNextjPrintnNextiB、n=1Forj=1To4N=n*jPrintnNextjC、n=1j=1DoWhilej=4n=n*jPrintnj=j+1LoopD、Fori=1To4Forj=1Toin=1n=n*jNextjPrintnNexti答案：D下面程序段，显示的结果是_____。Dimxx=Int(Rnd)+5selectCasexCase5print优秀Case4print良好Case3print通过CaseElseprint不通过EndSelectA、通过B、不通过C、良好D、优秀答案：D在窗体Form1上，有一个列表框控件List1，在窗体的Click事件中有如下代码:PrivateSubForm_Click()DimkAsIntegerDimentryAsString,itemAsStringentry=EDCBAFork=Len(entry)To1Step-1item=LCase(Mid(entry,k,1))&kList1.AddItemitemNextkEndSub运行此程序，单击窗体,列表框第4行为_____。A、d2B、b2C、b4D、d3答案：A以下程序段运行后，消息框的输出结果是a=sqr(5)b=sqr(3)c=abMsgboxc+2A、2B、-1C、1D、出错答案：C下列循环能正常结束循环的是_____。A、i=5Doi=i+1LoopUntili0B、i=6Doi=i-2LoopUntili=1C、i=1Doi=i+2LoopUntili=10D、i=10Doi=i+1LoopUntili0答案：D假定时钟控件的Interval属性为1000，Enabled属性为True，并且有下面的事件过程，则1秒钟的时候窗体上将输出_____个字母a。PrivateSubTimer1_Timer()Fori=1To10PrintaNextiEndSubA、10次B、10000次C、以上都不对D、1000次答案：ADimyAsIntegerm=1DoWhilem=3m=m+1Printm;LoopA、2B、234C、23D、2345答案：B设a为Integer型变量，s为Single型变量，把3.75赋值给s后，再执行下列某一语句，则在文本框中显示的结果与执行语句a=s:Text1=a的结果相同的有_____个。①a=Int(s):Text1=a②a=Fix(s):Text1=a③a=CInt(s):Text1=a④a=Format(s,#####):Text1=aA、4B、1C、2D、3答案：C在窗体中添加一个命令按钮，并编写如下程序代码：PrivateSubCommand1_Click()DimyAsIntegery=0DoWhiley7y=y+3LoopMsgBoxyEndSub程序运行后，消息对话框中显示_____。A、8B、9C、7D、6答案：B在窗体上面一个文本框（其中Name属性为Text1），然后编写如下事件过程：PrivateSubCommand1_Click()Text1.Text=Fori=1To10Sum=Sum+iNextiText1.Text=SumEndSub上述程序的运行结果是_____。A、在文本框中Text1中输出0B、出错C、在文本框中Text1中输出不定值D、在文本框中Text1中输出55答案：D用冒泡法将数组a中的10个整数按升序排列。所谓冒泡法就是从第一个数依次比较相邻数，若不符合排序要求则互换值，直到最后一个数；然后再开始第二轮的比较，至所有数全部比较结束。排序过程中大数后退，小数前行，犹如水泡往上冒。请完善以下程序段________。n=1OFori=1ton-1Forj=1ton-iIf____________Then……'互换语句EndIfNextjNextiA、a(i)a(i+1)B、a(j)a(j+1)C、a(i)a(j)D、a(i)a(j)答案：B以下程序的输出结果是_________。OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,p(3)AsIntegerk=5Fori=1To10a(i)=iNextiFori=1To3p(i)=a(i*i)NextiFori=1To3k=k+p(i)*2NextiPrintkEndSubA、28B、35C、33D、37答案：C某过程的说明语句中，正确的数组说明语句是____________。ConstNasinteger=4DimLasinteger①.DimX(L)AsInteger②.DimA(K)AsIntegerConstKAsInteger=3③.DimB(N)AsInteger④.DimY(2000To2008)AsIntegerA、②③B、③④C、①②④D、①③④答案：B以下程序输出的结果是____________。Dimaa=Array(1,2,3,4,5,6,7)Fori=Lbound(a)ToUbound(a)a(i)=a(i)*a(i)NextiPrinta(i)A、49B、程序出错C、不确定D、0答案：B下列语句可以用来正确地声明一个动态数组的是_____。A、PrivateA(n)AsIntegerB、DimA()AsIntegerC、DimA(1ton)D、DimA(,)AsInteger答案：B在窗体模块的通用声明处有如下语句，会产生错误的语句是___。①ConstaasInteger=25②PublicStAsString*8③ReDimB(3)AsInteger④DimConstXAsInteger=10A、①③B、②③④C、①②③D、①②答案：B在窗体上画一个命令按钮，然后编写如下事件过程：OptionBase1PrivateSubCommand1_Click()DimaAsVarianta=Array(1,2,3,4)j=1Fori=4To1Step-1s=s+a(i)*jj=j*10NextiPrintsEndSub运行上面的程序，单击命令按钮，其输出结果是_____________。A、1234B、34C、12D、4321答案：A填空==================================================文本框的_____属性用来设置在文本框中显示的最多字符个数。答案：空1:MaxLength_____属性决定了按Tab键时，焦点在各个控件移动的顺序。答案：空1:TabIndex当文本框中的内容改变时，将会发生_____事件。答案：空1:Change输入一个三位的正整数，将之反向输出。如输入123，则输出321，完善下列程序。PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsInteger,mAsIntegerm=InputBox(输入一个正整数)a=m\100b=(m-a*100)\10c=_____MsgBox结果=+Str(c*100+b*10+a)EndSub答案：空1:mmod10表示A和B之一为零但不同时为零的VB表达式为_____。答案：空1:A=0xorb=0A=7，B=3，C=4，则表达式AMOD3+B^