题库
题库
A．0
B．1
C．2
D．3
| 单选题 | 某人编写了下面的程序，希望能把text1文本框中的内容写到out.txt文件中 private sub comand1_click() open "out.txt" for output as #2 print "text1" close #2 end sub 调试时发现没有达到目的，为实现上述目的，应做的修改是 |
查看答案 |
| 单选题 | 数据库设计中，用e-r图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的 | 查看答案 |
| 单选题 | 算法的时间复杂度是指 | 查看答案 |
| 单选题 | 窗体上有一个名为command1的命令按钮，并有下面的程序： private sub comand1_click() dim arr(5) as integer for k=1 to 5 arr(k)=k next k prog arr() for k=1 to 5 print arr(k) next k end sub sub prog(a() as integer) n=ubound(a) for i=n to 2 step -1 for j=1 to n-1 if a(j) t=a(j):a(j)=a(j+1):a(j+1)=t end if next j next i end sub 程序运行时，单击命令按钮后显示的是 |
查看答案 |
| 单选题 | 窗体上有一个text1文本框，一个command1命令按钮，并有以下程序 private sub commandl_click() dim n if text1.text<>"23456" then n=n+1 print "口令输入错误" & n & "次" end if end sub  希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是 |
查看答案 |
| 单选题 | 下面正确使用动态数组的是 | 查看答案 |
| 单选题 | 计算二的近似值的一个公式是 。某人编写下面的程序用此公式计算并输出π的近似值： private sub comand1_click() pi=1 sign=1 n=20000 for k=3 to n sign=-sign/k pi=pi+sign/k next k print pi*4 end sub 运行后发现结果为3.22751，显然，程序需要修改。下面修改方案中正确的是 |
查看答案 |
| 单选题 | 下面不能在信息框中输出“vb”的是 | 查看答案 |
| 单选题 | 设工程中有2个窗体： form1、form2，form1为启动窗体。form2中有菜单。其结构如表。要求在程序运行时，在form1的文本框text1中输入口令并按回车键(回车键的ascii码为13)后，隐藏form1，显示form2。若口令为“teacher”，所有菜单项都可见;否则看不到“成绩录入”菜单项。为此，某人在form1窗体文件中编写如下程序： private sub text1_keypress(keyascii as integer) if keyascii=13 then if text1.text="teacher" then form2.input.visible=true else form2.input.visible=false end if end if form1.hide form2.show end sub 程序运行时发现刚输入口令时就隐藏了form1，显示了form2，程序需要修改。下面修改方案中正确的是  |
查看答案 |
| 单选题 | 设x是整型变量，与函数ⅱf(x>0,-x,x)有相同结果的代数式是 | 查看答案 |
| 单选题 | 窗体上有一个名称为option1的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程 private sub option1_c1ick(index as integer) … end sub 下面关于此过程的参数index的叙述中正确的是 |
查看答案 |
| 单选题 | 下面哪个属性肯定不是框架控件的属性 | 查看答案 |
| 单选题 | vb中有3个键盘事件：keypress、keydown、keyup，若光标在text1文本框中，则每输入一个字母 | 查看答案 |
| 单选题 | 下面程序运行时，若输入395，则输出结果是 private sub comand1_click() dim x% x=inputbox("请输入一个3位整数") print x mod 10,x\100,(x mod 100)\10 end sub |
查看答案 |
| 单选题 | 下面关于标准模块的叙述中错误的是 | 查看答案 |
| 单选题 | 下面是求最大公约数的函数的首部 function gcd(byval x as integer, byval y as integer) as integer 若要输出8、12、16这3个数的最大公约数，下面正确的语句是 |
查看答案 |
| 单选题 | 数据流程图(DFD图)是 | 查看答案 |
| 单选题 | 下面程序计算并输出的是 private sub comand1_click() a=10 s=0 do s=s+a*a*a a=a-1 loop until a<=0 print s end sub |
查看答案 |
| 单选题 | 有下面的程序段，其功能是按图1所示的规律输出数据 dim a(3,5) as integer for i=1 to 3 for j=1 to 5 a(i,j)=i+j print a(i,j); next next  若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是 |
查看答案 |
| 单选题 | 窗体上有list1、list2两个列表框，list1中有若干列表项(见图)，并有下面的程序： private sub comand1_click() for k=list1.listcount-1 to 0 step -1 if list1.selected(k) then list2.additem list1.list(k) list1.removeitem k end if next k end sub 程序运行时，按照图示在list1中选中2个列表项，然后单击commandl命令按钮，则产生的结果是 |
查看答案 |