Visual Basic题库（有答案）(7)

第15题 窗体上有一个命令按钮，事件代码如下： Private Sub

Command1_Click() A = \<> B Then Print A - B Else Print B - A End Sub 程序运行后，单击命令按钮，输出_________。 答1:-9 第16题 以下语句的输出结果是_________。 a% = 3.1425926 Print a% 答1:3 第17题 a$ = LCase(\，a$的值是_________，b$ = UCase(\，b$的值是_________。 答1:答2:hello HELLO第18题 表达式\的值是_________，表达式12 + 34的值是_________。 答1:答2:1234 46第19题 整形变量M中存放了一个两位数，要将两位数交换位置，例如24变成42，实现的表达式为_________。 答1:((M mod 10) 第20题 代数式|y| + ln3x的Visual Basic表达式为_________。 答1:Abs(y) + Lo 第21题 VB的常量分为_________ 和符号常量、系统常量。 答1:直接常量 第22题 在立即窗口中输入如下内容： A$=”I love Visual Basic” x=instr(a$,”Visual”) Print x 则在立即窗口显示的是_________ 答1:8 第23题 在VB中用_________函数来产生一个0~1之间的单精度随机数。由于一个随机数序列可能反复出现，VB提供了_________语句来消除这种情况。 答1:答2:rnd randomize第24题 写出一个能产生取值范围为[30,45]的随机整数的表达式_________ 答1:Int(rnd*16+ 第25题 算术表达式 14.3\\3.1 和 14.3 mod 3.1 的值分别是_________ 和_________ 答1:答2:4 2第26题 VB的变量名的最大字符为_________个 答1:255 第27题 VB表达式Int（-4.8）*6\\3^2+Fix（-4.8）的值是_________ 答1:-7 第28题 设有如下程序段： a$=\

b$=Mid(a$,InStr(a$,\执行上面的程序段后，变量b$的值为________。 答1:Shanghai 第29题 下面程序运行后，输出的结果为________。 Private Sub Command1_Click( ) A$=”Beijing” B$=”dalian” C$=”shanghai” C$=Instr(Left（A$,2)+Right(B$,2),C$) Print C$ End Sub

答1:0 第30题 若要使文本框控件运行时不可见，应将______属性设置为_______。 答1:答2:visible False第31题 可以实现x和y变量内容进行交换的算法是________。 答1:t=x ：x=y ： 第32题 若要使标签控件显示时不覆盖其背景内容?则要对___________属性进行设置。 答1:BackStyle 第33题 在Visual Basic中?Print、Cls属于_________。 答1:方法 第34题 为了使文本框同时具有水平和垂直滚动条?应先把MultiLine属性设置为True?然后再把ScrollBars属性设置为______ 。 答1:3 第35题 当焦点进入文本框Text1时，要自动选定文本框开始的5个字符，则需要通过代码 Text1.SelStart = ______ 和 Text1.SelLength = 5来实现。 答1:0 第36题 在程序代码Label1.Caption = \中，表示对象的是 ___________，表示属性的是 ___________。 答1:答2:Label1 Caption第37题 如果打印宽度 Width 是 80，并指定 Tab(90)?则下一个打印将从列___________ 开始

答1:10 第38题 要判断在文本框中是否按了【Enter】键，应在文本框的_________事件中进行判断。 答1:keypress 第39题 要锁定文本框Text的内容，应将______属性设置为True。 答1:locked 第40题 要使文本框中的内容都被显示为“*”，则应将文本框的__________属性修改为“*”。 答1:passwordcha 第41题 要使指定的文本框成为焦点，则应采用文本框控件的_________方法。 答1:setfocus 第42题 下面事件过程的功能是：输入3个整数x、y、z，按从大到小的顺序输出这3个数，在横线上填上适当内容。 Private sub command1_click() dim x!,y!,z! x=inputbox(\if________then t=x:x=y:y=t if________then t=x:x=z:z=t if y< z then t=y:y=z:z=t print x,y,z end sub 答1:答2:x

string*1 ch=inputbox(\请输入一个字符\elseif_________then ch=ucase(ch) end if print ch end sub 答1:答2:ch>=\ ch>=\第44题 单行结构条件语句必须在_________行内书写完。 答1:一<|>单 第45题 判别变量X是否大于0，若大于0，则累加到变量s1中，否则，累加到s2中，使用的单行结构条件语句为_________。 答1:if x>0 then 第46题 Private sub command1_click() dim year%,month%,days% year=inputbox(\请输入年份\请输入月份\case________ case 1,3,5,7,8,10,12 days=31 _________ days=30 case 2 if___________then days=29 else days=28 end if end select print year;\年\月有\天\答1:答2:答3:month case 4,6,9,year mod 4=第47题 设a=1,b=2,c=3，表达式aa or c>b and a<>b 的值为_______。 答1:true 第48题 为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将控件的_________属性设置为_________。 答1:答2:interval 500

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库Visual Basic题库（有答案）(7)在线全文阅读。