单选题下面的过程定义语句中合法的是( )。
单选题在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim arr(10)
For i=6 To 10
arr(i)=i-5
Next i
Label1.Caption=arr(0)+arr(arr(10)/arr(6))
End Sub
运行程序,单击命令按钮,则在标签中显示的是
单选题在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1,然后编写如下两个事件过程:
Private Sub Command1_Click()
a=InputBox("请输入一个字符串") Text1.Text=a End
Sub Private Sub Textl_Change()
Label1.Caption=UCase(Mid(Text1.Text,8)) End Sub
程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“Visual Basic”,则在标签中显示的内容是
A. visual basic
B. VISUAL BASIC
C. basic
D. BASIC
单选题在菜单编辑器中建立如下图所示的菜单,并为每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
单选题假定有如下事件过程: Private Sub Form_MouseDown(Buaon As Integer,Shift As Integer,x As Single,y_As Single) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是
单选题通过文本框的
____
属性可以获得当前插入点所在的位置。
单选题下列关于变量的作用域的说法中不恰当的是____________。
A.根据变量的定义位置和使用的变量定义语句的不同,Visual Basic中的变量分为局部变量和全局变量两类
B.在不同的过程中可以定义相同名字的局部变量,它们之间没有任何关系
C.当同一窗体内的不同过程使用相同的变量时,必须定义窗体层变量
D.默认声明一般只适用于局部变量
单选题在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() b=5 c=6 Pdnta=b+c End Sub 程序运行后,单击命令按钮,输出的结果是______。 A) a=11 B) a=b+c C) a= D) False
单选题在有n个结点的--31链表中,值为非空的链域的个数为______ 。
单选题Visuai Basic 6.0集成环境的主窗口中不包括______。
单选题引用列表框(List1)最后一个数据项应使用( )。
单选题以下叙述中错误的是( )。
单选题以下叙述中错误的是
单选题已知图片框Picturel中己装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是
单选题在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dimarrayl(10,10)As Integer Dimi As Integer,j As Integer Fori=1 To 3 Forj=2 To 4 arrayl(i,j)=i+j Nextj Nexti Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
单选题一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。假定在Form1、Form2和Func中分别建立了自定义过程,其定义格式为:
Form1中定义的过程:
Private Sub Fun1()
……
End Sub
Form2中定义的过程:
Private Sub Fun2()
……
End Sub
Func中定义的过程:
Private SubFun3()
……
End Sub
在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是______。
单选题一间宿舍可住多个学生,则实体宿舍和学生之间的联系是( )。
单选题在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1+Click() a=InputBox(“请输入日期(1~31)”) t=“旅游景点:” &If(a > 0 And a <= 10, “长城”," ") &IIf(a > 10 And a <= 20, “故宫”," ") &IIf(a>20 And a<=31, “颐和园”," ") Text1.Text=t End Sub 程序运行后,如果从键盘上输入16,则在文本框中显示的内容是
单选题下面有关标准模块的叙述中,错误的是
单选题在窗体上画一个名为Text1的文本框和一个名为Labell的标签,再画四个名为Opl的单选按钮控件数组,其Index属性按季度顺序为0~3,如图左所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击一个单选按钮,则Text1中显示相应季度的销售总额,并把相应的文字显示在标签上。如图右所示单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句{{U}}{{/U}}。OptionBase1Dimsales(12)AsLongPrivateSubFormLoad()Open"C:/sales.txt"ForInputAs#1Fork=1To12Input#1,sales(k)NextkClose#1EndSubPrivateSub______(IndexAsInteger)DimsumAsLong,kAsInteger,monthAsIntegersum=0month=Index*______Fork=1To3month=month+1sum=sum+sales(month)NextkLabell.Caption=______,Caption&"销售总额:"Text1=SumEndSubA.Opl_Click3Opl(Index)B.Opl_Click0Optionl(Index)C.Optionl_Click1Opl(Index)D.Optionl_Click2Optionl(Index)
