单选题在Visual Basic中,对象方法的调用格式为______。
单选题有如下程序:Private Sub Form_Click() Dim i As Integer,n As Integer For i=1 To 20 i=i+4:n=n+i Ifi>10 Then Exit For Next Print nEnd Sub程序运行后,单击窗体,则输出结果是
单选题不能脱离控件而独立存在的过程是
单选题在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4一m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n); Next n Print Next m End Sub 运行程序,单击命令按钮,窗体上显示的内容为( )。
单选题有下列函数过程:
Function fun1(ByVal x As Integer,ByVal y As Integer)As Integer
Do While y<>0
reminder=x Mod y
x=y
y=reminder
Loop
fun1=x
End Function 在下列按钮单击事件中调用该函数,则该程序的运行结果是( )。
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a=100
b=25
x=fun1(a,b)
Print x
End Sub
单选题窗体的MouseUp事件过程如下: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) … End Sub 关于以上定义,以下叙述中错误的是( )。 A) 根据shift参数,能够确定使用转换键的情况 B) 根据X、Y参数可以确定触发此事件时鼠标的位置 C) Button参数的值是在MouseUp事件发生时,系统自动产生的 D) MouseUp是鼠标向上移动时触发的事件
单选题可以在常量的后面加上类型说明符以显示常量的类型,可以表示整型常量的是
单选题下列可作为Visual Basic的变量名的是( )
单选题命令按钮Command1的单击事件过程如下: Private Sub Command1_Click() x=10 Print f(x) End Sub Private Function f(y As Integer) f=y*y End Function 运行上述程序,如下叙述中正确的是( )。
单选题在窗体上画3个名称为Command1的命令按钮作为控件数组,从左到右,控件数组下标分别为0、1、2,界面如下图所示。有下列程序:PrivateSubCommand1Click(IndexAsInteger)DimsAsStringSelectCaseIndexCase0s="飞机"Case1s="汽车"Case2s="火车"EndSelectMsgBoxs,IndexEndSub执行程序后,单击中间那个按钮,显示的对话框形式为
单选题在数据库管理系统提供的数据语言中,负责数据模式定义的是______。
单选题设有如下过程: Sub ff(x,y,z) x=y+z End Sub 下列选项中所有参数的虚实结合都是传址方式调用的是( )。
单选题设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer Call p(a) 如下过程定义中,正确的是
单选题为了显示弹出式菜单,要使用
单选题假定有下列两个过程: Private Sub PPP(a As Single, b As Single) a=a+b Print a, b b=a+b Print a, b End Sub Private Sub Form_Activate() x=18 Call PPP((x), (x)) Print x End 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 Shapel. Top = Shape1. Top + 100 x=x+1 If x Mod 10 =0 Then Shape1. Top = 0 End If End Sub 以下关于上述程序的叙述中,错误的是( )。 A) 每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1 B) Shape1每移动10次回到起点,重新开始 C) 窗体上的shape1由下而上移动 D) Shape1每次移动100
单选题默认情况下,下面声明的数组的元素个数是 Dim a(5,-2 To 2)
单选题在窗体上绘制一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: D CD BCD ABCD 则在横线处应填入的内容为( )。
单选题在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click( ) n=Val(Text1.Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End if Print f;n End Sub Public Function f1(ByRef x) x=X*X n=x+x End Function Public Function f2(ByVal x) X=X*X f2=X+x+x End Function 程序运行后,在文本框中输入6,然后单击命令按钮,窗体上显示的是
单选题窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是________。 Private
Sub Command1_Click()
Picture1.Picture=LoadPicture("c:\1.jpg")
Picture1.Cls Picture1.Print "Test"
End Sub
A.窗体无显示,图片框显示图片和文字Test
B.窗体上出现Test文本,图片框无显示
C.窗体上出现Test文本,图片框显示图片1.jpg
D.窗体无显示,图片框只显示Test文字
