Question

《VB程序设计试题》

《VB程序设计试题》
一、填空题
1、要使窗体上最小化按钮在运行时不可用，应将其（ ）属性值设置为（ ）。要改变窗体的标题文字，应修改其（ ）属性。
2、要改变标签控件背景颜色，应修改其（ ）属性。要使标签的尺寸自动适应标题文字，应将其（ ）属性值设置为（ ）。
3、要给文本框空间加上纵、横向滚动条，应将其（ ）属性值设置为（ ）。同时还要设置其（ ）属性值设置为（ ）。
二、将下列数学式子改写为VB表达式
1、 －cosx
2、 ×
3、
4、X、Y一个为正，一个为负
三、写出下列程序段的运行结果
X＝9
Y=2
Z=x\y
If z>y then
X=y mod z
Else
Y=x mod z
Endif
Print x,y,z
1. For i =1To3
Print tab (10+I )
For j = 1To 3
Print “ # * ”
Next j
Print
Next i
3. Private Sub Form__Click ( )
Dim x ( 5 )As Variant
For i =1 To 5
x ( i ) = 2*i+5
Next i
Print max (x ( ))
End Sub
Public Function max (x ( ) )
For i =2 To 5
If x ( 1 )<x ( i ) Then ( 1 )=x ( i )
Next i
max = x ( 1 )
End Function
四、求解分段函数
lnx×e的-x 次方 （0＜ x ＜1）
y = x + 1 （1 ≤ x ＜2）
e的 -x 次方 （2≤ x ＜3）

五、找出100～10000之间的素数，每行10个输出。
六、随机产生20个10~100之间的整数 , 把其中的奇数从小到大排序输出。
七、编子程序求1+2+3….+N , 调用该子程序 求:分数,其中分子为 ((1+2+3+...+8)+(1+2+3+....+15)) 分母为 (1+2+3+....+7) 。

答案一经被采用,分数再加倍奉上!!

Answer 1

1:minButton
False
Caption
2:BackColor
clipcontrols
false
三：
1：9,1,4
3: 15