单选题在VisualBasic集成环境中,要从工具栏打开菜单编辑器窗口,可以单击工具栏上的一个按钮,这个按钮是______。
单选题设窗体上有一个文本框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中显示的是
单选题当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不能响应的事件
单选题在一个窗体上添加命令按钮控件,名为Command1,事件过程如下,则该过程的执行结果为______。Option
Base 1Private Sub Command1_ Click() Dim a(5)As
Integer Dim k As Integer Dim Total As
Integer a (1)= 2 a (2)= 5 a
(3)= 4 a (4)= 10 a (5)= 6 for
k =1 To 5 Total = Total +a(k)
Next k Print TotalEnd Sub
A. 10
B. 15
C. 27
D. 35
单选题若要清除列表框的所有内容,则实现的方法是( )。 A.Removeitem B.Cls C.Clear D.以上均不可以
单选题某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)( )。
单选题窗体上有一个通用对话框控件CommonDialog1,有下列语句:CommonDialog1. Action = ShowFont其表示为 ______。
单选题有两个关系R,S如下,由关系R和S通过运算得到关系T,则所使用的操作为______。
R
B
C
D
a
0
k1
b
1
n1
S
B
C
D
f
3
k2
a
0
k1
T
B
T
D
b
1
n1
单选题有下面程序代码:Private Sub Command1_Click() Dim a, s As Integer a = 7: b = 4 Do c = a Do c = c - b Loop Until c < b Or c = 0 Print c; a = a - 1 Loop Until c = 0End Sub程序运行产生的输出是
单选题下列打开“代码窗口”的操作中错误的是( )。 A) 按F4键 B) 单击“工程资源管理器”窗口中的“查看代码”按钮 C) 双击已建立好的控件 D) 执行“视图”菜单中的“代码窗口”命令
单选题能够用于标识对象名称的属性是( )。 A) Name B) Caption C) Value D) Text
单选题要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为
单选题为使程序运行时通用对话框Cd1上显示的标题为“对话框窗口”,若通过程序设置该标题,则应使用的语句是___________。
单选题在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:
Private Sub Command1_Click()
a=InputBox("请输入日期(1~31)")
t="旅游景点:"
&IIf(a>0 And a<=10,"长城","")
&IIf(a>10 And a<=20,"故宫","")
&IIf(a>20 And a<=31,"颐和园","")
Text1.Text=t
End Sub
程序运行后,如果从键盘上输入16,则在文本框中显示的内容是______。
单选题为组合框Combo1增加一个列表项“电脑”,下列语句正确的是( )。
单选题窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框,窗体的单击事件过程如下: Pfivme Sub Form_Click() CD1.DialogTitle=”改变颜色”:CD1.Color=Forml.BackColor CD1.Action=3:Text1.BackColor=CD1.Color End Sub 运行程序时,单击窗体,则以下叙述中错误的是
单选题已知x=7.5,y=2,z=3.6。表达式x>y And z>x Or x<y And Not z>y的值是( )。
单选题以下关于变量的叙述中,错误的是
单选题下列程序的运行结果是
Private Sub Form_Click()
Dim k As Integer
n=5
m=1
k=1
Do
m=m+2
k=k+1
Loop Until k>n
Print m
End Sub
单选题窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Dim x1 As Integer,x2 As Integer,x3 As Integer
s=Trim(Text1.Textl
strLen=Len(s)
For i=1 To strLen
C=Mid(s,i,1)
Select Case C
Case "0" To "9"
x1=x1+1
Case "A" To "Z"
x2=x2+1
Case "a" To "Z"
x3=3+1
Case Else
x4=x4+1
End Select
Next
Print"x1";x1,"x2";x2,"x3";x3,"x4";x4
End Sub
以下关于上述程序的叙述中,正确的是______。