题库 题库

【填空题】

有如下程序:
private sub form_click()
n=10
i=0
do
i=i+n
n=n-2
loop while n>2
print i
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
print
next
 
若要按图2所示的规律继续输出数据,则接在上述程序段后面的程序段应该是
查看答案
单选题 设窗体上有一个通用对话框控件cd1,希望在执行下面程序时,打开如图所示的文件对话框
private sub comand1_click()
cd1.dialogtitle="打开文件"
cd1.initdir="c:\"
cd1.filter="所有文件|*.*|word文档|*.doc|文本文件|*.txt"
cd1.filename=""
cd1.action=1
if cd1.filename=""then
print"未打开文件"
else
print"要打开文件"& cd1.filename
end if
end sub
但实际显示的对话框中列出了c:\下的所有文件和文件夹,“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是
查看答案
单选题 若在窗体模块的声明部分声明了如下自定义类型和数组
private type rec
code as integer
caption as string
end type
dim arr(5) as rec
则下面的输出语句中正确的是
查看答案
单选题 下面哪个属性肯定不是框架控件的属性 查看答案
单选题 数据流程图(DFD图)是 查看答案
单选题 下面是求最大公约数的函数的首部
function gcd(byval x as integer, byval y as integer) as integer
若要输出8、12、16这3个数的最大公约数,下面正确的语句是
查看答案
单选题 软件(程序)调试的任务是 查看答案
单选题 软件生命周期可分为定义阶段,开发阶段和维护阶段。详细设计属于 查看答案
单选题 下面程序计算并输出的是
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
查看答案
单选题 在学生管理的关系数据库中,存取一个学生信息的数据单位是 查看答案
单选题 某人编写了下面的程序,希望能把text1文本框中的内容写到out.txt文件中
private sub comand1_click()
open "out.txt" for output as #2
print "text1"
close #2
end sub
调试时发现没有达到目的,为实现上述目的,应做的修改是
查看答案
单选题 设x是整型变量,与函数ⅱf(x>0,-x,x)有相同结果的代数式是 查看答案
单选题 算法的时间复杂度是指 查看答案
单选题 下面正确使用动态数组的是 查看答案
单选题 要求当鼠标在图片框p1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是 查看答案
单选题 窗体上有一个名称为option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程
private sub option1_c1ick(index as integer)

end sub
下面关于此过程的参数index的叙述中正确的是
查看答案
单选题 下面程序运行时,若输入“visual basic programming”,则在窗体上输出的是
private sub comand1_click()
dim count(25) as integer, ch as string
ch=ucase(inputbox("请输入字母字符串"))
for k=1 to len(ch)
n=asc(mid(ch,k,1))-asc("a")
if n>=0 then
count(n)=count(n)+ 1
end if
next k
m=count(0)
for k=1 to 25
if m
m=count(k)
end if
next k
print m
end sub
查看答案
单选题 设工程中有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,程序需要修改。下面修改方案中正确的是
查看答案
单选题 数据库设计中,用e-r图来描述信息结构但不涉及信息在计算机中的表示,它属于数据库设计的 查看答案
单选题 vb中有3个键盘事件:keypress、keydown、keyup,若光标在text1文本框中,则每输入一个字母 查看答案