单选题设程序中有如下语句:
X=inputbox(“输入”,“数据”,100)
Print X
运行程序,执行上述语句,输入5并单击输入对话框上的“取消“按钮,则窗体上输出( )。
单选题在窗体上画一个图片框,在图片框中画一个命令按钮,位置如图所示。 则命令按钮的Top属性值是
单选题以下关于VB特点的叙述中,错误的是( )。
单选题标准模块中有如下程序代码: Public x As Integer, y As Integer Sub var_pub() x=10:y=20 End Sub 在窗体上有一个命令按钮,并有如下事件过程: Private Sub Command1_Click() Dim x As Integer Call var_pub x=x+100:y=y+100 Print x;y End Sub 运行程序后单击命令按钮,窗体上显示的是
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: Microsoft Visual Basic Programming 然后编写如下事件过程: Private Sub Command1_CIick() Open"d:/temp/outf. txt" For Output As #1 For i=1 To Len(Text1. Text) c=Mid(Text1. Text, i, 1) If c>="A" And c<="Z" Then Print #1, LCase(C) End If Next i Close End Sub 程序运行后,单击命令按钮,文件outf. txt中的内容是______。
单选题以下关于事件、事件驱动的叙述中,错误的是______。
A.事件是可以由窗体或控件识别的操作
B.事件可以由用户的动作触发
C.一个操作动作只能触发一个事件
D.事件可以由系统的某个状态的变化而触发
单选题设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是 A)|x| B)-|x| C)x D)-x
单选题用下面的语句所定义的数组的元素个数是: ______。 Dim arr(3 To 5,-2 to 2)
单选题在窗体上添加一个命令按钮,名为 command1,一文本框,名为text1,则执行如下事件过程后,文本框中的输出为______。 For i = 1 To 3 For j = 1 To 3 For k = 1 To 2 x=x+ 3 Next k Next j Next i Text1. Text =str (x)
单选题以下叙述中错误的是
单选题下列程序的运行结果是( )。 Private Function myfun(m,n) Do While m>n Do While m>n:m=m-n:Loop Do While n>m:n=n-m:Loop Loop my fun=m End Function Private Sub Command1_Click() Print myfun(9,8) End Sub
单选题在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a$, b$, c$, k%
a="ABCD"
b="123456"
c=""
k=1
Do While k<=Len(a) Or k<=Len(b)
If k<=Len(a)Then
c=c&Mid(a,k,1)
End If
If k<=Len(b)Then
c=c&Mid(a,k,1)
End If
k=k+1
Loop
Print c
End Sub
运行程序,单击命令按钮,输出结果是______。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer, y As Integer x = 6: y = 7 Do y = y - x Debug. Print y; x=x+1 Loop While x<= 0 Print y; x End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是
单选题下列事件的事件过程中,参数是输入字符ASCII码的是( )。
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3:n=n+1 Ifi>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是
单选题决定控件上文字的字体、字形、大小、效果的属性是______。
A. Text
B. Caption
C. Name
D. Font
单选题执行了下面的程序后,组合框中数据项的值是( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol.Removeltem i Nexti End Sub
单选题执行语句Open "Tel.dat" For Random As# 1 Len=50后,对文件Tel.dat中的数据能够执行的操作是 ______。 A) 只能写,不能读 B) 只能读,不能写 C) 既可以读,也可以写 D) 不能读,不能写
单选题编写如下事件过程。 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按T键,则程序输出的结果是( )。 A) T T B) t T C) T C D) t t
单选题在窗体上画一个名称为Command1的命令按钮。有下列程序: Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(45,27,34,24,91,37,11,67,82,63) For i=1 To 9 For j=i+1 To 10 If a(i)>a(j)Then a1=a(i) a(i)=a(j) a(j)=a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub 程序运行后,单击命令按钮,则窗体上第二行和第三行显示的内容是______。
