• 搜标题
  • 搜题干
  • 搜选项
0 / 200字
单项选择题

下列程序段的结果为 A="ABBACDDCBA" For i=6 To 2 Step-2 X=Mid(A,i,i) Y=Left(A,i) Z=Right(A,i) Z=X&Y&Z Next Print Z

A．ABC
B．AABAAB
C．BBABBA
D．ABBABA
题目列表

你可能感兴趣的试题

单项选择题

为了在列表框中使用Ctrl和Shift键进行多个列表项的选择，应将列表框的Multiselect属性设置为

A．0
B．1
C．2
D．3
单项选择题

当文本框ScrollBars属性设置了非零值，却没有效果，原因是

A．文本框中没有内容
B．文本框的MuhiLine属性为False
C．文本框的MultiLine属性为True
D．文本框的Locked属性为True
单项选择题

要使菜单项MenuOne在程序运行时失效，使用的语句是

A．MenuOnVisible=True
B．MenuOnVisible=False
C．MenuOnEnabled=True
D．MenuOnEnabled=False
单项选择题

下列叙述中正确的是

A．程序执行的效率与数据的存储结构密切相关
B．程序执行的效率只取决于程序的控制结构
C．程序执行的效率只取决于所处理的数据量
D．以上3种说法都不对
单项选择题

下列语句中，获得列表框List1中项目个数的语句是

A．x=List1.ListCount
B．x=ListCount
C．x=List1.Listlndex
D．x=ListIndex
单项选择题

下面的数组声明语句中正确的是

A．Dim gg[1,5] As String
B．LabelBackStyle=1
C．Dim gg(1 To 5) As String
D．Dim gg[1:5,1:5]As String
单项选择题

设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是

A．命令按钮的所有Caption属性都是Command1
B．在代码中访问任意一个命令按钮只需使用名称Command1
C．命令按钮的大小都相同
D．命令按钮共享相同的事件过程
单项选择题

数据结构中，与所使用的计算机无关的是数据的

A．存储结构
B．物理结构
C．逻辑结构
D．物理和存储结构
单项选择题

以下各项中，Visual Basic不能接收的图形文件是

A．.ico文件
B．.jpS文件
C．.psd文件
D．.bmp文件
单项选择题

树是节点的集合，它的根节点数目是

A．有且只有1
B．1或多于1
C．0或1
D．至少2
单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 X=3 For k=1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是

A．7
B．15
C．157
D．538
单项选择题

当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不能响应的事件

A．MouseDown
B．MouseUP
C．Load
D．Click
单项选择题

检查软件产品是否符合需求定义的过程称为

A．确认测试
B．集成测试
C．验证测试
D．验收测试
单项选择题

定时器的Interval属性以什么为单位指定Timer事件之前的时间间隔

A．分
B．秒
C．毫秒
D．微秒
单项选择题

执行下列程序段后，输出的结果是 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3，k2，k1 Print y

A．90
B．60
C．40
D．10
单项选择题

在设计程序时，应采纳的原则之一是

A．不限制goto语句的使用
B．减少或取消注解行
C．程序越短越好
D．程序结构应有助于读者理解
单项选择题

执行以下语句过程，在窗体上显示的内容是 Option Base 0 Private Sub Command3_Click() Dim d d=Array("a"，"b"，"c"，"d") Print d(1);d(3) End Sub

A．ab
B．bd
C．ac
D．出错
单项选择题

数据库、数据库系统和数据库管理系统之间的关系是

A．数据库包括数据库系统和数据库管理系统
B．数据库系统包括数据库和数据库管理系统
C．数据库管理系统包括数据库和数据库系统
D．3者没有明显的包含关系
单项选择题

用于获得字符串S最左边4个字符的函数是

A．Left(S，4)
B．Left(1，4)
C．Leftstr(
D．Leftstr(3，4)
单项选择题

如果在C盘当前文件下已存在名称为studata.dat的顺序文件，那么执行语句Open "C:\studata.dat" For Append As#1之后，将

A．删除文件中原有内容
B．保留文件中原有内容，并在文件尾填加新内容
C．保留文件中原有内容，并在文件头填加新内容
D．以上均不对
单项选择题

软件是指

A．程序
B．程序和文档
C．算法加数据结构
D．程序、数据与相关文档的完整集合
单项选择题

下列有关数据库的描述正确的是

A．数据库是一个DBF文件
B．数据库是一个关系
C．数据库是一个结构化的数据集合
D．数据库是一组文件
单项选择题

下列代码运行后输出结果是 Ｄefstr B-E Ｐrivate Sub Command1_Click() Ｂ$="123" Ｃ="456" Ｐrint B+C$ Ｅnd Sub

A．123456
B．"123456"
C．123+"456"
D．显示出错信
单项选择题

线性表的顺序存储结构和线性表的链式存储结构分别是

A．顺序存取的存储结构、顺序存取的存储结构
B．随机存取的存储结构、顺序存取的存储结构
C．随机存取的存储结构、随机存取的存储结构
D．任意存取的存储结构、任意存取的存储结构
单项选择题

以下不属于对象的基本特点的是

A．分类性
B．多态性
C．继承性
D．封装性
单项选择题

下列程序段的结果为 A="ABBACDDCBA" For i=6 To 2 Step-2 X=Mid(A,i,i) Y=Left(A,i) Z=Right(A,i) Z=X&Y&Z Next Print Z

A．ABC
B．AABAAB
C．BBABBA
D．ABBABA
单项选择题

阅读下列程序： PrivateSubCommand1_Click() Dim i As Integer，k As Integer k=2 For i=1 To 3 Print Fun(k)； Next End Sub Function Fun(j As Integer) Static b a=0 a=a+1 b=b+1 Fun=a*b+j End Function 程序运行后，单击命令按钮输出结果是

A．234
B．345
C．567
D．356
单项选择题

设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)＞0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text="BBBBB" End If End Sub 上述程序运行后，如果按“Shift+F2”组合键，则在文本框中显示的是

A．Alt+F2
B．BBBBB
C．随机出几个数
D．文本框内容无变化
单项选择题

单击命令按钮时，下列程序的执行结果是 Private Sub Commandl_Click() Dim a As Integer，b As Integer，c As Integer a=3:b=4:c=5 Print SecProc(c，b，a) End Sub Function FirProc(x As Integer，y As Integer，z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer，y As Integer，z As Integer) SecProc=FirProc(z，x，y) +x End Function

A．20
B．22
C．28
D．30
单项选择题

下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FirSt="abcdef" Print Pat(FirStr) End Sub Private Function Pat(xStr As String) As String Dim tempStr As String，strLen As Integer tempStr="" strLen=Len(xStr) i=1 Do While i＜=Len(xStr)-3 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr，strLen-i+1,1) i=i+1 Loop Pat=tempStr End Function

A．abcdef
B．afbecd
C．fedcba
D．defabc
单项选择题

设已经在菜单编辑器中设计了窗体的快捷菜单，某顶级菜单为a1，且取消其“可见”属性。运行时，哪个事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右健单击的事件过程是 Ａ) Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) If Button=2 Then PopupMenu a1，2 End Sub Ｂ) Private Sub Form_MouseDown(ButtonAsInteger，ShiftAsInteger，X As Single，Y As Single) PopupMenu a1，0 End Sub Ｃ) Private Sub Form_Mouse Down(Button As Integer，Shift As Integer，X As Single，Y As Single) PopupMenu a1 End Sub Ｄ) Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) If(Button=vbLetfButton) Or (Button=vbRightButton) Then PopupMenu a1 End Sub
单项选择题

在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FiherIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

A．All Files(*.*)
B．Text Files(*.*)
C．*.txt
D．All Files(*.*)|Text Files(*.*)
单项选择题

执行下列程序后，鼠标单击窗体，输出结果为 Private Sub Form_Click() Print "Click"； End Sub Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print "Donw" End Sub Private Sub Form_MouseUp(ButtonAs Integer，Shift As Integer，X As Single，Y As Single) Print "Up" End Sub

A．DownUpClick
B．ClickDownUp
C．DownClickUp
D．UpDownCliek
单项选择题

在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，对应的事件过程是 Ａ) Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub Ｂ) Private Sub Text1_LostFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub Ｃ) Private Sub Text1_Change() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub Ｄ) Private Sub Text1_SetFocus() Text.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub
单项选择题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=Fun2(Fun1(x),y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer) As Integer x=x+y:y=x+y Fun1=x+y End Function Private Function Fun2(x As Integer，y As Integer) As Integer Fun2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是 　　Ａ) 2 4 2 4 　Ｂ) 2 4 4 8 　Ｃ) 10 10 58 58 Ｄ) 4 4 8 8
微信扫码免费搜题