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

admin2018-09-19  33

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

    (2)在考生目录下有一个工程文件sit4.vbp.窗体上有一大一小两个名称分别为Shape2、Shapel的Shape控件。清在属性窗口中将Shapel控件设置为圆形,并将其颜色设置为红色(颜色值为&H000000FF&),如图2.211所示。
    要求:当单击窗体时,Shapel移动到矩形(即Shape2)左上角,再次单击窗体,则Shapel移动到矩形的右下角。在给出的窗体文件中已经有了全部控件,但程序不完整。要求:在属性窗口中设置有关的属性值,去掉程序中的注释符,把程序中的?改为正确的内容。
    注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjr3.vbp,将组合框的Style属性设置为2。 步骤2:在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: Select Case Combol.LiStIndex MsgBox Str(x)&f1(x) MsgBox Str(X)&f2(X) Private Function f2(ByVal x As Integer)As String If x Mod 7=0 Then 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt4.vbp,将Shapel控件的Shape属性设置为3,将FillStyle设置为0和FillColor设置为&H000000FF&。 步骤2:在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: Private Flag As Boolean Shapel.Top=Shape2.Top+Shape2. Height—Shapel.Height Shapel.Left=Shape2.Left+Shape2. Width—Shapel.Width 步骤3:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/ZoFp777K
0

最新回复(0)