更多"设在窗体上有一个名称为Combo1的组合框，要删除最后一项，下列正确的"的相关试题:
[填空题]
设窗体上有—个名称为Combo1的组合框，并有以下程序：
Privale Sub Combol_ KeyPress(KeyAscii As Integer)
If（）=13 Then 回车符的ASCII码是13
For k=0 To Combo1. ListCount-1
If Combo1.Text=Combol. List(k)Then
Combo1.Text=" "
Exit For
End If
Next k
If Combo1. Text＜＞" "Then
Combo1. AddItem（）
End If
End If
End Sub
程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部。请填空。
[单项选择]设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程：
Private Sub Command1_Click( )
Static b As Variant
b=Array(1，3，5，7，9)
……
End Sub
此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是
A. Fori=0 T0 5-1/2
B. Fori=0 To 5
C. Fori=0 T0 5/2
D. For i=l To 5/2
[单项选择]设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程：
Private Sub Commandl Click（ ）
StatiC b As Variant
b=Array(1，3，5，7，9)
...
End Sub
此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是
A) For i=0 To 5-1/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
B) For i=0 To 5
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
C) For i-0 To 5/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
D) For i=1 To 5/2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
[单项选择]设在窗体上有一个文本框，然后编写如下的事件过程：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Intcger)
Const Alt=4
Const Key_f2=&H71
altdown%=(Shift And Alt) ＞ 0
f2down% And f2down% Then
If altdown% And f2down% Then
Text ="abl"
End If
Ead Sub
程序运行后，清除文本框中原有内容，如果按Shift+F2键，则在文本框中显示的是( )。
A. Alt+F2
B. abl
C. 随机出儿个数
D. 不发生变化
[单项选择]设在窗体上有一个文本框，然后编写如下的事件过程：
PriVate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Const Alt=4
Const Key_F2=＆H71
altdown%=(Shift And Alt)＞0
f2down%=(KevCode=Kev_F2)
If altdown% And f2down% Then
Text1.Text="abl"
End If
End Sub
程序运行后，清除文本框中原有内容，如果按＜Shift+F2＞组合键，则在文本框中显示的是( )。
A. Alt+F2
B. abl
C. 随机出几个数
D. 不发生变化
[单项选择]设在窗体上有个文本框，然后编写如下的事件过程：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Const Alt=4
Const Key_F2=&H71
altdown%=(Shift And Alt)＞0
t2down%=(KeyCode:Key_F2)
If altdown% And f2down% Then
Text1.Text="BBBBB"
End If
End Sub
上述程序运行后，如果按Shift+F2键，则在文本框中显示的是( )。
A. Alt+F2
B. BBBBB
C. 随机出几个数
D. 文本框内容无变化
[填空题]Access数据库窗体设计工具箱中的组合框既可以在列表页中选择内容，也可以输入文本，可以将组合框分为两种类型，分别是组合型组合框和 ______。
[填空题]Access数据库窗体设计工具箱中的组合框既可以在多列表页中选择内容，也可以输入文本，可以将组合框分为两种类型，分别是组合型组合框和______。
[单项选择]设在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。要求单击Command1按钮时可把光标移到文本框中。下面正确的事件过程是( )
A. Private Sub Command1_Click()
B. Private Sub
C. Private Sub Command1_Click()
D. Private Sub
[单项选择]设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是______。
A. Private Sub Form1_Click()
B. Private Sub Forml_Click()
C. Private Sub List1_Click()
D. Private Sub List1_Click()
[单项选择]
窗体上有一名称为Command1的命令按钮，其事件过程如下：
Private Sub Command1_Click( )
Dim i As Integer,j As Integer , k As Integer
Dim s As Double
s=0 ; i=1 ; j=0 ; k=-1
Do While i<6
s=s+k*（j/i）
i=i+1
j=j+1
k=-k
Loop
Print s
End Sub
以上程序所计算的表达式是（）。
A. 1/2-2/3+3/4-4/5
B. -1/2+2/3-3/4+4/5
C. 1-1/2+2/3-3/4+4/5
D. -1+1/2-2/3+3/4-4/5
[单项选择]设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中的某一项时，把该项显示在窗体上，正确的事件过程是( )
A. Private Sub List1_Click()
B. Private Sub Form1_Click()
C. Private Sub List1_Click()
D. Private Sub Form1_Click()
[填空题]在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。[*]Private Sub Combo1_Click( )
Call ShowItem(Combo1, Label1)
End Sub
Private Sub Combo2_Click（ ）
Call ShowItem(Combo2, Label2)
End Sub
Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label)
【10】 .Caption = 【11】 .Text
End Sub
[填空题]组合框有3种不同的类型，这3种类型是下拉式组合框、简单组合框、下拉式列表框，分别通过将 【11】 属性设置为0、1、2宋实现。
[单项选择]列表框和组合框的区别是( )。
①列表框有下拉菜单 ②列表框可以添加记录
⑧组合框可以添加记录 ④组合框有下拉菜单
A. ①②
B. ⑧④
C. ①⑧
D. ②④
[填空题]在一个窗体上有两个命令按钮，cmdMax 和 cmdMin。单击cmdMax时，窗体上显示“字体由小变大”，字号每次增加2；单击cmdMin时，窗体上显示“字体由大变小”，字号每次减小2。请填空。
Private Sub Form_Load（ ）
Forml．Caption =“字体变化示范”
cmdMax．Caption=“字体变大”
cmdMin．Caption=“字体变小”
End Sub
Private Sub cmdMax_Click（ ）
【 】
Forml．Print”字体由小变大”
End Sub
Private Sub cmdMin_Click（ ）
【 】
Forml．Print“字体由大变小”
End Sub
