设有如下通用过程：Public Function Fun（xStr As Stri ng）As Stri ngDi mt Str As Stri ng ，strLAs IntegertStF＝＂＂strL＝Len（xStr）i ＝1 Do While i ＜＝strL／2tStr ＝Tstr ＆Mid（xStr ，i ，1）＆Mid（xStr ，strL－i＋1，1）i ＝i ＋lLoopFun ＝tStrEnd Function在窗体上画一个名称为Co mmand1的命令按钮。然后编写如下的事件过程：Private Sub Co mmandI＿Click（）Di mS1As Stri ngS1＝＂abedef＂Pri m UCase（Fun（S1））End Sub程序运行后，单击命令按钮，输出结果是（　　）。

试卷相关题目

• 1某人创建了1个工程，其中的窗体名称为Form1；之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是（　　）。

  A.在工程属性对话框中把"启动对象"设置为Form2

  B.在Forml 的Load 事件过程中加入语句Load Form2

  C.在Form2的Load 事件过程中加入语句Form2．Show

  D.把Form2的TabIndex 属性设置为l ，把Form1的TabIndex 属性设置为2

  开始考试点击查看答案
• 2设计数据库的存储结构属于（　　）

  A.需求分析

  B.概念设计

  C.逻辑设计

  D.物理设计

  开始考试点击查看答案
• 3任何控件都有的属性是( )。

  A.BackColor

  B.Caption

  C.Name

  D.BorderStyle

  开始考试点击查看答案
• 4下列关于栈的描述正确的是（　　）。

  A.在栈中只能插入元素而不能删除元素

  B.在栈中只能删除元素而不能插入元素

  C.栈是特殊的线性表，只能在一端插入或删除元素

  D.栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素

  开始考试点击查看答案
• 5下列程序段的运行结果是（　　）。Sub sele（　　）Di mn As Integeri ＝21：n ＝3Do While i ＞ni ＝i －nLoopPrint iEnd Sub

  A.2

  B.4

  C.5

  D.3

  开始考试点击查看答案
• 6复选框的Value 属性为0时，表示该复选框（　　）。

  A.未被选中

  B.被选中

  C.框内有灰色的勾

  D.操作有误

  开始考试点击查看答案
• 7在窗体上添加一个命令按钮，名为Co mmand1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出（　　）。For i ＝1To 4For j＝1To 3x＝3For k ＝1To 2x＝x＋3Next kNext jNext iTextl ．Text ＝Str（x）

  A.3

  B.6

  C.9

  D.12

  开始考试点击查看答案
• 8下列关于Sub 过程的叙述正确的是（　　）。

  A.一个Sub 过程必须有一个Exit Sub 语句

  B.一个Sub 过程必须有一个End Sub 语句

  C.在Sub 过程中可以定义一个Function 过程

  D.可以用Goto 语句退出Sub 过程

  开始考试点击查看答案