10.将指定的目录设为当前目录的语句是。
a. chdriveb. chdirc. changed. pattern
二、填空题。
1.设置或返回所选择的驱动器名的属性是。
2.控件共用一个的控件名字称控件数组,控件数组的下标也称 。
3.vb中的菜单可分为菜单和菜单两类。
4属性设置标签内容在标签框的对齐方式。
5.用方向箭头”可移动当前控件,用方向箭头”可改变控件的大小。
6.列表框list数组的下标是从开始的,如果未选中任何项,则listindex的值为 。
7.inputbox函数返回值的数据类型为 ;msgbox函数返回值的数据类型为 。
8.在vb中,若要改变一个窗体的标题,应在属性窗口中改变这个窗体的属性的值。
9.组合框有三种不同的类型。
10.表达式4+5\6*7/8mod9的值是。
三、程序阅读题。
1.执行了下面程序后,组合框中数据项的值是。
private sub form_click()
for i=1 to 6
inext i
for i= 1 to 3
inext i
end sub
2.执行下列语句,输出的结果是。
a$=”good”
b$=”morning”
print a$+chr(13)+b$
3.在窗体上一个文本框,其名称为text1,然后编写如下事件过程:
private sub text1_keypress(keyascii as integer)
dim str as string ,n as integer
str = ucase (chr(keyascii))
n=len(str)
str)end sub
程序运行后,如果在键盘上输入单字母"a",则在文本框text1中显示的内容为。
4.执行下列语句后整型变量a的值是。
if(3-2)>2 then
a=10else if(10/2)=6 then
a=20else
a=30end if
四、完善程序题。
输入10个学生的成绩(显示于第一个文本框中),将其中高于平均分的成绩以‘学号_分数;’形式显示于第二文本框中。
请将控件属性值补充完整,程序**如下(请补充完整)
dim mark(1 to 20)as integer
private sub command1_click()
dim i as integer
for i=1 to 10
mark(i)=inputbox(“输入mark(“&i&”)的值”)
next i
end sub
private sub command1_click()
dim i as integer
dim sum as single,**er as single
sum=0for i=1 to 10
sum=【2
next i
**er=【3
for i=1 to 10
if 【4then
next i
end sub
五、编程题。
编写一工资调整程序。若基本工资大于等于2500元,增加工资10%,若小于2500元大于1500元,则增加工资15%;若小于1500元则增加工资18%。要求在文本框text1中输入某职工的基本工资,单击“计算”按钮,在标签框label1中输出增加后的工资。
程序运行界面如图所示。
2019秋VB复习指南
2011秋学期期末复习指南参考题。一 选择题。1 for next循环结构中,循环控制变量的步长为0,则 a.循环体执行一次后结束循环b.形成无限循环。c.语法错误d.循环体不执行即结束循环。2 向组合框控件添加项目的方法是 a.clickb.clearc.appenditemd.additem 3...
2019秋VB补修课复习指南
一 选择题。1.数组声明为dim a 3,2 to 2,5 则数组a包含 个元素。a.75b.120c.60d.220 2.在vb中,若要改变一个标签 label 上显示的内容的水平对齐方式,应当在属性窗口中改变这个标签的 属性的值。a.textb.namec.alignmentd.list 3.m...
2019秋VB02上机
stnext i end sub private function d2b n as integer as string dim p as string dop n mod 2 d2b d2b p n n 2 loop until n 0 end function 要求 1 新建工程,输入上述 改正...