假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i = 1 To Len(S)s1 = UCase(Mid(S, i, 1)) + s1Next iFun = s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim Str1 As String, Str2 As StringStr1 = InputBox("请输入一个字符串")Str2 = Fun(Str1)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg"，则单击"确定"按钮后在窗体上的输出结果为

试卷相关题目

• 1在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Option Base 0Private Sub Command1_Click()Dim city As Variantcity = Array("北京", "上海", "天津", "重庆")Print city(1)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是

  A.空白

  B.错误提示

  C.北京

  D.上海

  开始考试点击查看答案
• 2在窗体上画三个单选按钮，组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是

  A.Tag

  B.Index

  C.ListIndex

  D.Name

  开始考试点击查看答案
• 3以下关于菜单的叙述中，错误的是

  A.在程序运行过程中可以增加或减少菜单项

  B.如果把一个菜单项的Enabled属性设置为False，则可删除该菜单项

  C.弹出式菜单在菜单编辑器中设计

  D.利用控件数组可以实现菜单项的增加或减少

  开始考试点击查看答案
• 4在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = 0n = InputBox("")For i = 1 To nFor j = 1 To ix = x + 1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是

  A.3

  B.4

  C.5

  D.6

  开始考试点击查看答案
• 5在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是

  A.Private Sub List1_Click()Label1.Caption = List1.ListIndexEnd Sub

  B.Private Sub List1_Click()Label1. Name = List1. ListIndexEnd Sub

  C.Private Sub List1_Click()Label1.Name = List1.TextEnd Sub

  D.Private Sub List1_Click()Label1.Caption = List1.TextEnd Sub

  开始考试点击查看答案
• 6设有语句Open "c:Test.Dat" For Output As #1则以下错误的叙述是

  A.该语句打开C盘根目录下一个已存在的文件Test.Dat

  B.该语句在C盘根目录下建立一个名为Test.Dat的文件

  C.该语句建立的文件的文件号为1

  D.执行该语句后，就可以通过Print #语句向文件Test.Dat中写入信息

  开始考试点击查看答案
• 7以下叙述中错误的是

  A.用Shell函数可以调用能够在Windows下运行的应用程序

  B.用Shell函数可以调用可执行文件，也可以调用Visual Basic的内部函数

  C.调用Shell函数的格式应为：<变量名>=Shell (……)

  D.用Shell函数不能执行DOS命令

  开始考试点击查看答案
• 8以下关于过程及过程参数的描述中，错误的是

  A.过程的参数可以是控件名称

  B.用数组作为过程的参数时，使用的是"传地址"方式

  C.只有函数过程能够将过程中处理的信息传回到调用的程序中

  D.窗体可以作为过程的参数

  开始考试点击查看答案
• 9在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress(keyascii as integer)……End Sub若焦点位于文本框中，则能够触发KeyPress事件的操作是

  A.单击鼠标

  B.双击文本框

  C.鼠标滑过文本框

  D.按下键盘上的某个键

  开始考试点击查看答案
• 10目录列表框的Path属性的作用是

  A.显示当前驱动器或指定驱动器上的路径

  B.显示当前驱动器或指定驱动器上的某目录下的文件名

  C.显示根目录下的文件名

  D.只显示当前路径下的文件

  开始考试点击查看答案