1.窗体的top、left属性为数值,其单位长度为缇,且不可改变 (
2.数组的下标最小为1,且不可改变 (
3.设置好窗体字体后,在窗体上建立控件,各控件的默认字体为窗体字体 (
4.控件的只读属性值不可以在程序运行时动态地修改 (
5.函数val("2a")的返回值为42 (
6.标签框的caption属性值为字符串,运行时可以重新赋值 (
7.列表框控件的sorted属性可以在运行时修改 (
8.将容器的fillstyle属性设置为0后,容器中所有图形都变为实心填充 (
9.在容器的scalemode属性值中,取值7使得容器的单位长度最小 (
10.**框的clear方法可以清除**框中的文字以及用图形方法绘制的图形 。
每题1分,共5分)1.装入窗体后,使窗体最大化的窗体属性名是 。
a、windowstateb、maxc、mind、style
2.按tab键时,决定焦点在各个控件之间移动顺序的属性是 。
a、indexb、tabindexc、tabstopd、setfocus
3.表示文本框中所选定内容的属性是 。
a、seltextb、sellenghtc、textd、caption
4.设置某菜单项是不是一个分割条的属性是。
a. nameb. captionc. enabled d. visible
5.语句“circle(1000,1000),800,,,2”绘制的是。
a、弧b、椭圆c、扇形d、同心圆。
每题2分,共20分)1.将一条语句分成多行显示,语句间使用的分隔符为-
2.将数学式 (x+1)e2x 写作vb算术表达式为。
3.判断整型变量n是否为两位正整数的逻辑表达式为。
4.执行下列程序段后,变量s、k的值依次为。
s=0 : for k = 1 to 10 step 2 : s = s + k : next k
5.在form2中引用form1中的全局变量x,写作。
6.单选的列表框控件list1中,所选中的表项为。
7.将文本框控件text2所显示的文本清空,应执行语句。
8.确定时间间隔为1秒,定时器控件的interval属性应设置为。
9.为列表框控件list1增加一个表项 “删除记录”,应执行语句--
10.在**框控件pic1上以坐标(10,10)为圆心、8为半径画轮廓线为红色的圆,应执行语句 。
1.【程序说明】计算下列级数的和,直到累加的末项之绝对值小于10的-7次方为止。
private sub command1_click()
dim s as double, x as double, t as double, i as integer
x = inputbox("x=")s = 1
i = 1)
t = 2)
do while (3
t = t * x / i : i = i + 1
loopprint s
end sub
1) a、1b、0c、2d、x
2) a、1b、xc、-1d、-x
3) a、t<1e-7 b、t>1e-7 c、abs(t)<1e-7 d、abs(t)>=1e-7
4) a、s=t b、s=s+t c、s=s-td、s=s+x
2.【程序说明】本题利用计时器控件来实现文字的水平移动,要求:
运行时设置窗体为最大窗口;标签框内的文字从窗体左边向右边移动,每1/10秒移动1次;当标签框的最左边超出窗体的右边界时,从窗体的左边进入窗体(尾部先进入)。
文字移动时颜色不断产生随机变化。
private sub form_load()
end sub
private sub timer1_timer()
(3) =rgb(rnd*255, rnd*255,rnd*255)
if >=then = 4)
end sub
1) a、0b、1c、2d、3
2) a、100 b、10 c、0.1d、1
3) a、 b、
c、4) a、
c、0d、1.程序1:写出单击窗体后,**框控件pic1上的显示结果。
private sub form_click()
dim i as integer, j as integer
for i = 1 to 4
for j = 1 to i
tab(4 - i + j); trim(str(j));
next j
next i
end sub
2.程序2. 写出单击command1后,窗体上的显示结果。
private function f(k as integer) as long
f = 1do while k > 1
f = f * k
k = k - 1
loopend function
private sub command1_click()
dim m as integer, n as integer
m = 5n = 3
print f(m)
print f(n)
print f(m - n)
end sub
3.程序3. 写出打开窗体后,列表框中的显示结果。
private sub form_load( )
end sub
4.程序4. 写出运行时两次单击窗体后屏幕上的显示结果。
dim x as byte
private static sub form_click()
dim y as byte, z as byte
call init(y, z)
call op(x, y, z)
print x, y, z
end sub
private sub init(a as byte, b as byte)
a = a + 1
b = b + 2
x = a + b
end sub
private sub op(byval u as byte, v as byte, byref w as byte)
u = u + 1
v = v + u
w = u + v + w
end sub
x2/(x+1x<-2
y= sin(x)·cos(x) -2≤x≤2
log10xx>2
1.编制事件过程command1_click,调用该过程后输入x,计算并显示下列分段函数的值。
附录1 迎中秋十一方案
迎国庆,庆中秋 中科福康回报会员大型联谊会。一 活动目的 1 通过节日送大礼 亲情服务月 扶贫 认亲等一系列战术打一场漂亮的 激战中秋 丰收仗,通过销量的大幅度提升开启销售旺季的大门,振奋军心,鼓舞斗志 2 对老会员 通过会员教育课,加深与老顾客的感情交流促使其加强转介绍的力度,纠正会员对转介绍的偏...
模拟试卷 1
响水县实验初中2014秋学期期中模拟试卷 1 测试时间 100分钟满分 120分 一 精心选一选 本大题共8小题,每题3分,共24分,相信你一定会选对的 1 绝对值等于2的数是。a 2 b c 2 d 2 2 下列各对数中互为相反数的是。a 3 和 3 b 3 和 3 c 3 和 3 d 3 和 3...
模拟试卷 1
2010 2011年初三数学模拟试卷 一 满分120分 考试时间120分钟。下列各题所附的四个选项中,有且只有一个是正确的 一 选择题 每小题2分,共20分 1 比 1小的数是。a 1b 1 c 2d 0 2 计算x3 x的结果是。a x2b x3c x4d 2 x4 3 嫦娥一号运行1小时的行程约...