单选题在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Option Base 1
Private Sub Command1_Click()
Dim a
s=0:j=1
a=Array(1,2,3,4)
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next
Print s
End Sub
运行上面的程序并单击命令按钮,其输出结果是______。
单选题若要使文本框能够输入多行文本,应该设置的属性是( )。
单选题在滚动条的滑块移动时,Scroll事件连续返回______属性的数值。
单选题在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写下列程序:
Private Sub rune(L AS Labe1)
L.Caption="1234"
End Sub
Private Sub Form Load()
Labe11.Caption="ABCDE"
Labe12.Caption=10
End Sub
Private Sub Command1Click()
a=Va1(Label2.Caption)
Call func(Label1)
Label2.Caption a
End Sub
程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。
单选题有如下事件过程: Private Sub Form_Click() Dim n As Integer x=0 n=InputBox("请输入一个整数") For i=1 To n For j=1 To i x=x+1 Next j Next i Print X End Sub 程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是( ) A.13 B.14 C.15 D.16
单选题在程序中可以通过复选框和单选按钮的( )属性值来判断它们的当前状态。
单选题在窗体(Name属性为Form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:Private Sub Command1_Click()a=Text1.Text+Text2.TextPrint aEnd SubPrivate Sub Form_Load0Text1.Text=" ":Text2.Text=" "End Sub程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为( )。
单选题窗体上建立了一个名为CornmonDialong1的通用对话框,用下面的语句建立一个对话框:CommonDialong1.Action=2,则以下语句与之等价的是______。
单选题有下列函数过程: 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
单选题窗体上有一个名称为Command1的命令按钮,其事件过程如下: Private Sub Command1.Click() x="Visual BasicProgramming" a=Right(x,11) b=Mid(x,7,5) c=MsgBox(a,,b) End Sub 运行程序后单击命令按钮,下列叙述中错误的是( )。
单选题下列关于文件及其操作的描述中,正确的是
单选题以下叙述中,错误的是
单选题设计窗体时双击窗体的任何位置,将打开( )。
单选题在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() x=1 s=0 Fori=1To5 x=x/i s=s+x Next PrintsEndSub该事件过程的功能是计算_____。A.S=1+2+3+4+5B.S=C.D.
单选题对长度为n的线性表排序,在最坏的情况下,比较次数不是n(n-1)/2的排序方法是 A) 快速排序 B) 冒泡排序 C) 直接插入排序 D) 堆排序
单选题为了暂时关闭计时器,应把它的一个属性设置为False,这个属性是
单选题在窗体上从左到右有Text1、Text2两个文本框(见下图),要求程序运行时,在Text1中输入1个分数后按Enter键,则判断分数的合法性,若分数为0~100中的1个数,则光标移到Text2中;否则光标不动,并弹出对话框显示“分数错”,下面程序中正确的是______。
单选题设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下:
Private Sub Command1_Click( )
Dim a As Integer
a=10
Call g(Form2,a)
End Sub
Private Sub g(f As Form,x As Integer)
y=Iif(x>10,100,-100)
f.Show
f.Caption=y
End Sub
运行以上程序,正确的结果是( )
单选题下列描述不正确的是( )。
单选题在窗体上添加一个命令按纽,名为COMgAND1,事件过程如下: Private Sub CQmmand1_Click() x =0 Do Until c = -1 a=InputBox(“请输入a的值”) a=Val
