2. 计算机
  3. (1)考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图1-32(a)

(1)考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图1-32(a)

admin2010-09-02  35
问题 (1)考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合框只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图1-32(a)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图1-32(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。
注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。

(2)在考生目录下有一个工程文件sjt4．vbp。窗体上有一大一小两个名称分别为Shape2、Shapel的Shape控件。请在属性窗口中将Shapel控件设置为圆形，并将其颜色设置为红色(颜色值为&H000000FF&)，如图1-33所示。
要求：当单击窗体时，Shapel移动到矩形(即Shape2)左上角，再次单击窗体，则Shapcl移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。
要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的?改为正确的内容。
注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案第1小题 【操作步骤】 步骤l：打开考生文件中的本题工程文件sjt3．vbp，将组合框的Style属性设置为2。 步骤2：在代码编辑窗口，去掉程序中的注释符们”，将问号“?”改为正确的内容。 参考代码： Select Case Comb01．ListIndex MsgBox Str(x)&fl(x) MsgBox Str(x)&f2(x) Private Funct ion f2(ByVal x As Integer)As String If x Mod 7=0 Then 步骤3：按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1：打开考生文件中的本题工程文件sjt4．vbp，将Shapel控件的Shape属性设置为3，BackColor属性设置为&H000000FF&。 步骤2：在代码编辑窗口，去掉程序中的注释符“’”，将问号“?”改为正确的内容。 参考代码： Private Flag As Boolean Shapel．Top=Shape2．Top+Shape2．Height- Shapel．Height Shapel．Left=Shape2．Left+Shape2．Width -Shapel．Width 步骤3：按要求将文件保存至考生文件夹中。
解析 第1小题
本题源代码中给出了两个函数，f1函数的作用是判断参数的奇偶性并返回判断结果，其返回值为字符型；f2函数的作用是判断参数能否被7整除，其返回值也为字符型。
    在“判断”命令按钮的单击事件中，首先根据组合框的Listlndex值判断选中的是组合框中的哪一项，如果ListIndex值为0则调用fl函数，否则调用f2函数。
第2小题
    本题原程序中，在窗体的单击事件中，要求实现圆形在左上角和右下角之间来回切换，需要设置一个全局布尔型变量flag，每次单击窗体之后将其取反，通过flag的值来判断是需要将圆形移动到哪个位置。要移动到矩形的右下角，需要令其Top属性等于Shape2．Top+Shape2．Height-Shapel．Height，Left属性等于Shape2．Left+Shape2．Width Shapel．Width。
转载请注明原文地址:https://jikaoti.com/ti/5Ng0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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