2. 计算机
  3. （1）在考生文件夹下有一个工程文件sjt3.vbp，窗体上有两个列表框，名称分别为List1、List2，在List2中已经预设了内容；还有两个命令按钮，名称分别为C1、C2，标题分别为“添加”、“清除”，如图1－62 所示。程序的功能是在运行时，如果选中

（1）在考生文件夹下有一个工程文件sjt3.vbp，窗体上有两个列表框，名称分别为List1、List2，在List2中已经预设了内容；还有两个命令按钮，名称分别为C1、C2，标题分别为“添加”、“清除”，如图1－62 所示。程序的功能是在运行时，如果选中

admin2018-10-29  45
问题 （1）在考生文件夹下有一个工程文件sjt3.vbp，窗体上有两个列表框，名称分别为List1、List2，在List2中已经预设了内容；还有两个命令按钮，名称分别为C1、C2，标题分别为“添加”、“清除”，如图1－62 所示。程序的功能是在运行时，如果选中右边列表框中的一个列表项，单击“添加”按钮，则把该项移到左边的列表框中；若选中左边列表框中的一个列表项，单击“清除”按钮，则把该项移回右边的列表框中。

    文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。既不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
    （2）在考生文件夹下有一个工程文件sjt4.vbp，请在Form1窗体上建立一个名称为Op1 的单选按钮数组，含有三个单选按钮，其标题分别为“10!”、“11!”、“12!”，Index 属性分别为0、1、2；再画一个名称为C1 的命令按钮，标题为“计算”；画一个名称为Text1的文本框，如图1－63所示。程序的功能是在选定一个单选按钮并单击“计算”按钮后，可以计算出相应的阶乘值，在Text1中显示该阶乘值。请画出上述控件并编写程序。

    注意：考生不得修改工程中已经存在的内容，在结束程序运行之前，必须进行一次计算。必须通过单击窗体右上角的关闭按钮结束程序，否则无成绩。最后按原文件名存盘。
选项
答案第1小题 【操作步骤】 步骤1：打开本题对应工程文件sjt3.vbp。 步骤2：打开代码编辑窗口，去掉程序中的注释符 “’”，将问号“?”改为正确的内容。 参考代码： While (k < List2.ListCount) If List2.Selected(k) = True Then List2.RemoveItem List2.ListIndex List1.RemoveItem List1.ListIndex 第2小题 【操作步骤】 步骤1：打开考生文件中的本题工程文件sjt4.vbp，如表2－11在窗体中用“复制”和“粘贴”命令画出包含三个元素的单选按钮数组、一个文本框和一个命令按钮并设置属性。 [*] 步骤2：在代码编辑窗口，编写“计算”按钮的单击事件过程。 参考代码： Private Sub C1_Click() Dim k As Integer k = 0 While Not Op1(k).Value And k < 3 k = k + 1 Wend If k ＜ 3 Then Text1.Text=calculat(Val(Left$ (Op1( k).Caption, 2))) End If End Sub Function calculat(n As Integer) Dim k As Integer, t As Long t = 1 For k = 2 To n t = t * k Next k calculat = t End Function 步骤3：按要求将文件保存至考生文件夹中。 步骤4：按＜F5＞键运行程序，先选中一个选项，接着单击“计算”按钮，然后单击窗体右上角的关闭按钮结束程序。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/rtFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)