单选题窗体上有文本框Text1,执行下列程序后在文本框输入123abc,单击按钮后输出结果为______。
Private Sub From_Load()
Text1. Text=""
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii)
KeyAscii=Asc(UCase(Char))
Eud Sub
Private Sub Commandl Click()
Print Text1.Text
End Sub
单选题在窗体卜画一个组合框,一个命令按钮和一个文本框,其名称分别为Combol,Command1和Text1,然后编写如下事件过程: Private Sub Form_Load() Combo1.Addltem"AAAAA":Combo1.AddItem"BBBBB" Combol.Addltem"CCCCC":Combo1.Addltem"DDDDD" Combo1.Addltem"EEEEE" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的Click事件过程中应使用的语句为
单选题数据库管理系统中负责数据模式定义的语句是
A. 数据定义语言
B.数据管理语言
C. 数据操纵语言
D. 数据控制语言
单选题在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a) c=Len(b) Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。
单选题窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:
Private Sub Command1_Click()
CD1.Filter="All File |*.*| Text File|*.txt|Word|*.Doc"
CD1.FilterIndex=2
CD1.FileName="E:/Test.ppt"
CD1.InitDir="E:"
CD1.ShowOpen
End Sub
关于上述程序,以下叙述中正确的是______。
单选题复选框是否被选中,取决于复选框的( )。
单选题在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 2 = n + z y=y+z x = x + z Label1.Caption =x Label2.Caption =y Label3.Caption =z End Sub 运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是 A) 10 10 10 B) 30 30 30 C) 30 30 10 D) 10 30 30
单选题下列四组控件属性中,属性值的类型不相同的一组是( )。
单选题可以用作其他控件容器的控件是
单选题软件需求分析阶段的工作,可以分为4个方面:需求获取、需求分析、编写需求规格说明书以及( )。 A) 阶段性报告 B) 需求评审 C) 总结 D) 都不正确
单选题以下叙述中错误的是{{U}} {{/U}}。
A.一个工程中可以包含多个窗体文件
B.在一个窗体文件中用Public定义的通用过程不能被其他窗体调用
C.窗体和标准模块需要分别保存为不同类型的磁盘文件
D.用Dim定义的窗体层变量只能在该窗体中使用
单选题当文本框ScrollBars属性设置了非零值,却没有效果,原因是 A) 文本框中没有内容 B) 文本框的MultiLine属性为False C) 文本框的MultiLine属性为True D) 文本框的Locked属性为True
单选题窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下: Private Sub Command1_Click() Dim In As Integer In=______ List.Remove Ind End Sub 则在程序的空白行的语句是( )。
单选题下面程序段执行结果为( )。
x=Int(Rnd()+3)
Select Case x
Case 5
Print "excellent"
Case 4
Print "good"
Case 3
Print"pass"
Case Else
Print"fail"
End Select
单选题设有命令按钮Commandl的单击事件过程,代码如下: Private Sub Commandl_Click() Dima(3,3)As Integer Fori=1 To 3 Forj=1 To 3 a(i,j)=i*j+i Next j Nexti Sum=0 Fori=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序,单击命令按钮,输出结果是( )。
单选题在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String Private Sub Form_Load()
Show Text1.Text=""
Text1.SetFocus End Sub Private Sub
Commandl_Click() Text1.Text=LCase(SaveAll)+SaveAll
End Sub Private Sub Form_KeyPress(KeyAscii As
Integer) SaveAll=SaveAll+Chr(KeyAscii) End
Sub 程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为______。
A.vbVB
B.不显示任何信息
C.VB
D.出错
单选题设执行以下程序段时依次输入2,4,6,执行结果为( )。
Dim a(4)As Integer
Dim b(4)AS Integer
For k=0 To 2
a(k+1)=Val(InputBox("Enter data:"))
b(3 - k) =a(k + 1)
Next k
Print b(k)
单选题利用通用对话框控件打开字体对话框的操作是( )。
单选题有如下程序: a$="122345876" d$=Left$(a$,1) For i=2 To Len(a$); z$=Mid$(a$,i,1) If z$>d$ Then d$=z$ Next i Print d$ 运行后,输出的结果是______。
单选题在窗体上有若干控件,其中有一个名称为,Text1的文本框。影响Text1的Tab顺序的属性是________。
A. TabStop
B. Enabled
C. Visible
D. TabIndex
