填空题

窗体上有一个组合框，其中已输入了若干项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如：单击图5中的“重庆”，则与“北京”交换，得到图6的结果。下面是可实现此功能的程序，请填空。




Private Sub Combo1_Click()
Dim temp
temp=Combo1.Text
______=Combo1.List(0)
Combo1.List(0)=temp
End Sub

【参考答案】

Combo1.List(Combo1.ListIndex)
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮和一个通用对话框，其名称分别为Command1和CommonDialog1，然后编写如下事件过程： Private Sub Command1_Click() CommonDialog1.______= 打开文件 CommonDialog1.Filter= All Files(*.*)|*.* CommonDialog1.InitDir= C: CommonDialog1.ShowOpen End Sub 该程序的功能是：程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“All Files(*.*)”，并显示C盘根目录下的所有文件。请填空。
填空题
下面程序的功能是从键盘上输入一个大于100的整数m，计算并输出满足不等式1+22+32+42+…+n2＜m的最大的n，请填空。 Private Sub Command1_Click() Dim s, m,n As Integer m=Val(InputBox( 请输入一个大于100的整数 )) n= (6) s=0 Do While s＜m n=n+1 s=s+n*n Loop Print 满足不等式的最大n是 (7) End Sub
相关试题