单选题设有菜单结构如表所示 表1 菜单结构 标 题 名 称 层 次 显示 Appear 1 大图标 BigIcon 2 小图标 SmallIcon 3 要求在运行时,当鼠标单击菜单项“大图标”时,在这个菜单项前面就添加一个“√”, 下面正确的事件过程是
单选题从键盘上输入一个实数nu,利用字符串函数对该数进行处理,如果输出的内容不是字符End,则程序输出的内容是{{U}}
{{/U}}。 nu=InputBox("nu=") n$=Str$(nu)
p=InStr(n$,".") if p>0 Then Print
Mid$(n$,P) Else Print"END"
End If
A.用字符方式输出数据nu
B.输出数据的整数部分
C.输出数据的小数部分
D.只去掉数据中的小数点,保留所有数字输出
单选题在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labell),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
单选题设x是小于10的非负数。对此陈述,以下正确的VB表达式是______。
单选题下列程序的执行结果为______。A)150B)200C)50D)0
单选题在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:
Private Sub Form_Load()
Text1.Text=""
Text 1.SetFocus
For i=1 To 10
Sum=Sum+i
Next i
Text1.Text=Sum
End Sub
上述程序的运行结果是
单选题在标准模块中用Public关键字定义的变量,其作用域为( )。
单选题对象可以识别和响应的某些操作行为称为______ 。
单选题如果在Visual Basic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是
单选题设有如图所示窗体和以下程序:PrivateSubCommandlClick()Text1.Text="VisualBasic"EndSubPrivateSubText1LostFocus()IfText1.Text<>"BASIC"ThenText1.Text=""Text1.SetFocusEndIfEndSub程序运行时,在Text1文本框中输入"Basic"f如图所示1,然后单击Command"按钮,则产生的结果是______。A.文本框中无内容,焦点在文本框中B.文本框中为"Basic",焦点在文本框中C.文本框中为"Basic",焦点在按钮上D.文本框中为"VisualBasic",焦点在按钮上
单选题以下是MDI子窗体在运行时特性的叙述,错误的是( )。
单选题层次型、网状型和关系型数据库划分原则是______。 A) 数据之间的联系方式 B) 记录长度 C) 联系的复杂程度 D) 文件的大小
单选题窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:
Private Sub Command1_Click()
For i=0 To List1.ListCount-1
If List1.Selected(i)=True Then
List2.AddItem Text
End If
Next
End Sub
上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是______。
单选题窗体的单击事件过程如下:Private Sub Form_Click() K = 1 For i = 5 To 1 Step -1 T = T * 10 + K S = S + T Next i Print SEnd Sub运行程序时,单击窗体后,显示的是
单选题编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写),运行程序,如果按"A"键,则程序的输出是________。
单选题假定已经在菜单编辑器中建立了窗体的弹出式菜单,其顶级菜单项的名称为al,其“可见”属性为false,程序运行后,单击鼠标左键或右键都能弹出菜单的事件过程是______。
单选题以下属于Visual Basic合法的数组元素是( )。
单选题垂直平铺所有非最小化MDI子窗体的方法是( )。
单选题文本框控件中将Text的内容全部显示为所定义的字符的属性项是
____
。
单选题下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer,Chrl As String Chrl=UCase(InputBox(”请输入字母字符串”)) For k=1 To L,en(Chrl) n=Asc(Mid(Chrl.k.1))-Asc(“A”) If n>=0 Then Num(n)=Num(n)+1 End If Next k m=Num(0) For k=1 To 25 If m
