单选题窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单击命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编写如下程序,以期实现上述功能:Private Sub Command1_Click()str1=Trim(Combo1.Text)flag=0If str1<>""ThenFor i=0 To Combo1.ListCount-1If str1=Combo1.List(i)ThenCombo1.RemoveItemi:Combo1.Text=""flag=1End IfNextIf flag=1ThenCombo1.AddItem Combo1.TextEnd IfEnd Sub程序中存在问题,以下关于程序问题的叙述中,正确的是
单选题编写如下程序代码: Option Explicit Private Sub Form_Click() Dim x As Variant Dim i As Variant x=Array(50,27,69,80,45) For Each i In x If i Mod 2=0 Then Print i End If Next i End Sub 以下叙述中正确的是( )。
单选题表达式Abs(-5)+Len("ABCDE")的值是( )。
单选题算法的空间复杂度是指( )。
单选题下列程序运行后,输出的结果为______ 。B=1Do while b<40 b=*(b+1)LoopPrint B
单选题下面叙述中正确的是______。
单选题为了使标签具有“透明”的显示效果,需要设置的属性是
单选题设在工程中有一个标准模块,其中定义了如下记录类型______。 Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为Commandl的命令按钮,要求当执行事件过程Commandl_click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
单选题单击命令按钮,并在对话框内依次输入5,7,6下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n AS Integer, a As Integer, b As Integer, c As Integer n = 0 For i = 1 To 3 a = InputBox ("请输入数字") n = n+a*a If n > 50 Then GoTo ex End If Next i ex: Print n End Sub
单选题阅读下面程序:
Option Base 1
Private Sub Form_Click()
Dim arr,Sum
Sum=0
arr=Array(1,3,5,7,9,11,13,15,17,19)
For i=1 To 10
If arr(i)/3=arr(i)/3 Then
Sum=Sum+arr(i)
End If
Next i
Print Sum
End Sub
程序运行后,单击命令按钮,输出结果为______。
单选题下列说法中,错误的是______。
A.将焦点移至命令按钮上,按Enter键,则引发命令按钮的Click事件
B.单击命令按钮,将引发命令按钮的Click事件
C.命令按钮没有Picture属性
D.命令按钮不支持Db1Click事件
单选题以下关于过程及过程参数的描述中,错误的是
____
。
单选题数据字典(DD)所定义的对象都包含于
单选题当ScrollBars属性的值为 ______ 时,给文本框同时加水平滚动条和垂直滚动条。 A) 0 B) 1 C) 2 D) 3
单选题下列合法的变量名是______。
单选题在执行以下程序时,为了使输出结果为t=4,则给a和b输入的值应当满足的条件是______。 a=InputBox(“a=”) b=InputBox(“b=”) s=1 t=1 If a>0 Then s=s+1 End If If a>b Then t=s+1 Else If a=b Then t=5 Else t=2*s End If End If Print t
单选题在窗体上画两个名称分别为Text1,Text2的文本框和一个名称为Command1命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+1 Loop Text1.Text=str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。
单选题窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
单选题以下叙述中不正确的是______ 。 A.顺序文件结构简单 B.存储在顺序存取文件中的记录不允许任意存取 C.能同时对顺序文件进行读写操作 D.顺序文件的数据以字符(ASCII码的形式存储)
单选题为了使标签具有“透明”的显示效果,需要设置的属性是
