单选题窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsIntegerPrivateSubForm_Load()Callfill(color())EndSubPrivateSubfill(c()AsInteger)Form1.BackCotor=RGB(c(1),c(2),c(3))EndSubPrivateSubHSRed_Change()color(1)=HSRed.ValueCallfill(color())EndSubPrivateSubHSGreen_Change()color(2)=HSGreen.ValueCallfill(color())EndSubPrivateSubHSBlue_Change()color(3)=HSBlue.ValueCallfill(color())EndSub关于以上程序,如下叙述中错误的是()。A)color是窗体级整型数组B)改变任何一个滚动条滚动框的位置,窗体的背景色将立刻随之改变C)3个滚动条Change事件过程中只设置了一个color数组元素的值,调用fill过程失败D)fill函数定义中的形式参数是数组型参数
单选题命令按钮Command1的Caption属性为“退出(x)”,要将命令按钮的快捷键设为“A1t+X”,应修改Caption属性为______。
单选题若要使用户不能修改文本框TextBox1中内容,应修改______ 属性。
单选题窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。以下叙述中错误的是
单选题下列表达式的值为Tme的是( )。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As Integer,s As Integer
a=8
s=1
Do
s=s+a
a=a-1
Loop While a<=0
Print s;a
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
____
。
单选题对全局数据逻辑结构和特征的描述称为______ 。
单选题下列叙述中正确的是
单选题设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:
Private Sub Command1_Click()
Dim s As String,ch As String
s=
For k=1 To Len(Text1)
ch=Mid(Text1,k,1)
s=ch+s
Next k
Text1.Text=s
End Sub
程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是______。
单选题有如下程序:
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=5:b=4
Call Sub1(a,b)
End Sub
Sub Sub1(x As Single,y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在调用运行上述程序后,a和b的值分别为______。
单选题下列程序运行结果是( )。
a=25:b=-45
i=Not a=b
Print i
单选题下面循环语句中在任何情况下都至少执行一次循环体的是
单选题下列语句的输出结果为( )。
Print Format$(5689.36,"000,000.000")
单选题在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click( ) For I=1 To 4 For J=0 To 1 Print Chr$(65+1); Next J Print Next 1 End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是
单选题已知过程定义的首行为Sub sum(a As Integer,b As Integer),则下面过程调用语句中正确的是( )。
单选题假定有下表所列的菜单结构: 标题 名称 层次 显示 appear 1(主菜单) 大图标 bigicon 2(菜单) 小图标 smallicon 3(菜单) 要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是( )。
单选题文件d:\city.tXt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:Private Sub Form_Click() Dim InD Open"d:\city.txt"For Input As#1 Do While Not EOF(1) Line Input #1,InD Loop Close 1 Print InDEnd Sub运行程序,单击窗体,输出结果是
单选题窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load()
Shape1. Top=0
Timer1. Interval=100
End Sub
Private Sub Timer1_Timer()
Static x As Integer
Shape1. Top=Shape1. Top+100
x=x+1
If x Mod 10=0 Then
Shape1. Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是______。
单选题下列程序段的执行结果为______。 I= 4 a= 5 Do I=I+1 a=a+2 Loop Until I>=7 Print“I=”;I Print“A=”;a
单选题在窗体上先后画两个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图3),且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖拽到Picture1中(见图4)。能实现此功能的事件过程是