单选题在过程内用Dim语句声明的变量只能在本过程中使用,而其他的过程不可访问,这种变量称之:为 ______。
单选题以下合法的VB变量名是
单选题为了在列表框中使用Ctrl和Shift键进行多个列表项的选择,应将列表框的Multi-select属性设置为( )。 A) 0 B) 1 C) 2 D) 3
单选题在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base
1 Pdvate Sub Command1_Click() Dim c As
Integer,d As Integer d=0
c=6 X=Array(2,4,6,8,10,12) For i=1 To
6 If X(i)>c
Then
d=d+X(i)
c=X(i) Else
d=d-c
End If Next
i Print d End
Sub 程序运行后,单击命令按钮,则在窗体上输山的结果是{{U}} {{/U}}。
A.10
B.12
C.16
D.20
单选题在VisualBasic6.0集成开发环境中,主窗口的标准工具栏上有一个按钮,单击此按钮可以运行正在设计的工程,这个按钮的图标是______。A.B.C.D.
单选题窗体上有1个名称为Commandl的命令按钮,事件过程如下:Private Sub Commandl_Click() Dim art_x(5,5)As Integer For i=1 To 3 For j=2 To 4 arr_x(i,j)=i*j Next j Next i Print art_x(2,1);arr_x(3,2);art_x(4,3)End Sub运行程序,并单击命令按钮,窗体上显示的内容为
单选题设a=4,b=5,c=6,执行语句Print a<b And b<c窗体上显示的是
单选题设窗体上有一个文本框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 Invert(By Val xstr As String,ystr As String) Dim tempstr AS String Dim I AS Integer I=Len(xstr) Do While I>=1 tempstr=tempstr + Mid(xstr,I,1) I=I - 1 Loop ystr=tempStr End Sub Private Sub Form_Click( ) Dim s1 As String,s2 As String S1="abcdef" Invert S1,S2 Print S2 End Sub
单选题在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim City As Variant city=Array("北京","上海","天津","重庆") Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。
单选题函数过程Funl的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。
Function Fun1(b As Integer)
If ______ Then
Fun1=0
Else
Fun1=1
End If
End Function
使该功能完整,应在空行处填入______。
单选题在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和 Commandl,然后编写如下两个事件过程: Prirate SUb Command1 Click() strText = InputBox(“请输入”) Textl.Text = strText End Sub Private Sub Text1 Change() Labell.Caption = Right(Trim(Text1.Text), 3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是
单选题在窗体上添加一个文本框,名为Textl,然后编写如下的Load事件过程,则程序的运行结果是 Private Sub Form_Load() Text1.Text=" " Text1.Setfocus t=1 For k=10 To 6 Step -2 t=t(k Next k Text1.Text =t End Sub
单选题下列程序段的执行结果为( )。 a=0:b=1 Do a=a+b b=b+1 Loop While a<10 Print a:b A) 10 5 B) ab C) 0 1 D) 10 30
单选题对于列表框控件List1,能够表示当前被选中列表项内容的是
单选题下列关于类、对象、属性和方法的叙述中,错误的是( )。
单选题在窗体上画一个命令按钮(其名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim a(5,5)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1)*3+j Print a(i,j) Next j Print Next i End Sub 程序运行后,单击命令按钮,在窗体上的输出结果是: ______。
单选题设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是( )。
单选题当组合框的Style属性设置为何值时,组合框称为下拉式列表框
A. 0
B. 1
C. 2
D. 3
单选题Visual Basic集成开发环境可以
