单选题删除组合框中指定的项目所使用的方法是( )。
单选题设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时,单击某个复选框,如果列表框中没有该复选框的标题,则把该复选框的标题添加到列表框中,否则从列表框中把该复选框标题删除。Private Sub Check1_Click(Index As Integer) For k = 0 To List1.ListCount - 1 If Check1(Index).Caption = List1.List(k) Then Exit For End If Next k If k < List1.ListCount Then List1.RemoveItem k Else List1.AddItem______________________ End IfEnd Sub 为使上面程序可以实现该功能,程序代码中横线上应该填入的代码是
单选题下列排序方法中,最坏情况下比较次数最少的是( )。
单选题设有变量声明为“Dim aDate As Date”,则能为变量aDate正确赋值的表达方式是( )。
单选题在窗体上画一个名称为Text1的文本框,然后编写如下代码: Option Base 1
Private Sub Form Click() Dim arr
Dim Start As Integer, Finish As Integer
Dim Sum As Integer arr = Array(12, 4,
8, 16) Start = LBound (arr)
Finish = UBound (arr) Sun = 0
For i = Start To Finish Sum
= Sum + arr(i) Next i c =
Sum/Finish Text1.Text = c End
Sub程序运行后,单击窗体,则在文本框中显示的内容是______ 。
A.40
B.10
C.12
D.16
单选题在正确安装Visual Basic6.0后,可以通过多种方式启动Visual Basic6.0。以下方式中,不能启动Visual Basic6.0的是( )。
单选题设窗体上有一个Picturel图片框,要求在图片框中的指定位置(坐标为(500,300))输出 “OK”,下面可以实现这一功能的事件过程是
单选题以下声明数组和给数组赋值的语句中,正确的是( )。
单选题有如下函数: Function fun(a As Integer,n As Integer) As Integer Dim m As Integer While a>=n a=a-n:m=m+1 Wend fun=m End Function 该函数的返回值是( )。
单选题在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为
单选题能够将Picture对象Picl加载当前目录中的face.bmp的语句是
A. Pic1.Picture=LoadPicture(App.path &"face.bmp")
B. Pic1.LoadPicture(App.path及&"face.bmp")
C. Picutrel.Picutre=LoadPicture(App.path&"face.bmp")
D. Picturel.LoadPicture(App.path &"face.bmp")
单选题单击一次命令按钮,下列程序代码的执行结果为( )。 Private Sub Command1_Click() Dim a As Intege,b As Intege,c As Integer a=2:b=3:c=4 PrintP2(c,b,a) End Sub Private Function P1(x AS Integer,yAs Integer, z As Integer) P1=2*x+y+3*z End Function Private Function P2(x As Integer,y As Integer, z As Integer) P2=P1(z,x,y)+x End Function
单选题关于通用对话框概念的说法中,错误的是____。
单选题下面哪个属性肯定不是框架控件的属性( )。
单选题窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序: Private Sub Form_Load() Private Sub Commandl_Click() Textl.Text=“” Print Text1.TeXt+Text2.Text Text2.Text-“” End SubEnd Sub 程序运行后,在Text1和Text2中依次输入100和200,单击Command1,则输出结果为
单选题下列描述中正确的是
单选题在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。PrivateSubTimer1TextTime.Text=TimeEndSub在下划线上应填入的内容是()。
单选题在下列选项中,不是算法一般应该具有的基本特征的是
单选题下面对对象概念描述正确的是
单选题为了使窗体左上角不显示控制框,需设置为False的属性是( )。
