niusouti.com

(1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。在窗体上有两个单选按钮,名称分别为Op1和Op2,标题分别为"斜体"和"黑体",一个文本框,名称为Text1,字体为宋体,字号为四号字,还有一个命令按钮,名称为Command1,标题为"切换"。要求程序运行后,在文本框中输入"测试结果",并选择一个单选按钮,单击"切换"按钮后,会根据所选的单选按钮来切换文本框中所显示的汉字字体,程序运行时的窗体界面如图12-3所示。注意:请在有"?"的地方填入正确内容,然后删除"?"

题目

(1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。在窗体上有两个单选按钮,名称分别为Op1和Op2,标题分别为"斜体"和"黑体",一个文本框,名称为Text1,字体为宋体,字号为四号字,还有一个命令按钮,名称为Command1,标题为"切换"。要求程序运行后,在文本框中输入"测试结果",并选择一个单选按钮,单击"切换"按钮后,会根据所选的单选按钮来切换文本框中所显示的汉字字体,程序运行时的窗体界面如图12-3所示。

注意:请在有"?"的地方填入正确内容,然后删除"?"及代码前的所有注释符"‘"但不能修改其他部分。存盘时不得改变文件名和文件夹。

(2)在考生文件夹下有一个工程文件sj4.vbp,窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,标题是"计算"。程序运行后,单击"计算"命令按钮,通过对话框输人整数12,放入整型变量a中,然后计算1+2+3+…+a(提示:运算结果应放人Long型变量中),如图12-4所示。在文本框中显示结果,并把结果存入文件out4.txt中。在考生文件夹中有一个标准模块mode4.bas,该模块中提供了保存文件的过程WriteData,考生可以直接调用。

注意:去掉程序中的注释符"‘",把程序中的"?"改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。


相似考题
更多“ (1)在考生文件夹中有工程文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。在窗体上有两个单选按钮,名称分别为Op1和Op2,标题分别为斜体和黑体,一个文本框,名称为Text1,字体为宋体,字号为四”相关问题
  • 第1题:

    (1)在名为Form1的窗体上绘制两个标签(名称分别为Label1和Label2,标题分别为“长”和“宽”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Command1,标题为“输入”)。编写命令按钮的Click事件过程,使程序运行后,若单击命令按钮,则先后显示两个“输入”对话框,在两个“输入”对话框中分别输入长和宽,并分别在两个文本框中显示出来,运行后的窗体如图21-1所示。

    注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为sj1.vbp,窗体文件名为sj1.frm。

    (2)在名为Form1的窗体上绘制一个标签(名称为Label1,标题为“输入”)、一个文本框(名称为Text1,Text属性为空白)和一个命令按钮(名称为Command1,标题为“显示”)。请编写命令按钮的Click事件过程,使程序运行后,在文本框中输入内容,然后单击命令按钮,则标签和文本框消失,并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。

    注意:要求程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为Sj2.vbp,窗体文件名为sj2.frm。


    正确答案:

    (1)根据题意,新建“标准EXE”工程,在窗体上添加两个标签,名称分别为Label1和Label2、Caption属性分别为“长”和“宽”,两个文本框,名称分别为Text1和Text2、Text属性为空,一个命令按钮,名称为Command1,Caption属性为“输入”。设计完成后,双击Command1进入代码窗口,编写如下代码:


    (2)根据题意,新建“标准EXE”工程,在窗体上添加一个标签,其名称为Label1,标题为“输入”,一个文本框,其名称为Text1、Text属性为空,一个命令按钮,其名称为Com-mand1、标题为“显示”。窗体设计完成后,双击Command1命令按钮,编写如下代码:


  • 第2题:

    在考生文件夹中有一个工程文件execise94.vbp及窗体文件execise94.frm。请在名为 Form1窗体上绘制两个框架,其名称分别为Frame1和Frame2,标题分别为“交通工具”和“到达目标”。在Frame1中绘制两个单选按钮,名称分别为Opt1和Opt2,标题分别为“飞机”和“火车”。在Frame2中绘制两个单选按钮,名称分别为Opt3和Opt4,标题分别为“上海”和“西安”。然后绘制一个命令按钮,其名称为Cmd1,标题为“确定”。再绘制一个文本框,其名称为Text1。

    编写适当事件过程。程序运行后,选择不同单选按钮时产生的显示结果见下表。

    注意:

    不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的“关闭”按钮。按原文件名并在原文件夹中保存修改后的文件。


    正确答案:

  • 第3题:

    在窗体上画一个名称为Op1的单选按钮控件数组,其包含4个单选按钮,Index值从0到 3,标题分别为“答案1”、“答案2”、“答案3”和“答案4”;再画一个命令按钮,名称为C1,标题为“选择”;再画一个文本框Text1,名称为Text1,内容为空白。编写适当的程序。程序运行时,单击“选择”按钮,只有选择“答案1”单选按钮时,在Text1文本框中显示“选择正确”,否则显示“选择错误”。程序运行结果如图2—1所示。

    注意,保存时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。

    2.在考生文件夹中有工程文件sjt4.vbp,其中包含窗体Form1,该程序是不完整的。请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:

    在窗体上有三个名称分别为Text1、Text2、Text3的文本框,一个名称为Command1,标题

    为“计算”的命令按钮(如图2—2所示)。要求程序运行后,在Text1和Text2中分别输入两个整数,单击“计算”按钮后,可把两个整数之间的所有整数(含着两个整数)累加起来并在Text3中显示出来。注意:保存时必须放在考生文件夹下,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。


    正确答案:① 对象主要属性设置如表3所示。 ② 分析:按试题要求在窗体上画一个单选按钮数组(含四个单选按钮)、一个文本框和一个命令按钮并分别将它们的属性按表3的内容进行设置。单选按钮是否被选取由其Value属性来确定当Value值为True时表示单选按钮被选取否则未被选取根据题意只有选择了Op1(0)单选按钮将字符串“选择正确”赋给Text1.Text否则将字符串“选择错误”赋给了Text1.Text。 ③ 编程代码: Private Sub C1_Click() If Op1(0).Value=True Then Text1.Text="选择正确" Else Text1.Text="选择错误" End If End Sub 2.① 试题提供的程序如下: Private Sub Command1_Click() Dim i As Integer Dim j As Integer 'For i=Text1.Text To? 'j=?+i Next i Text3.Text=j End Sub ② 要完成两个数之间所有整数的累加需要使用循环结构来读取两个数之间所有的整数然后将每一个整数累加到一个变量中。 ③ 修改后的程序如下: Private Sub Command1_Click() Dim i As Integer Dim j As Integer For i=Text1.Text To Text2. Text j=j+i Next i Text3.Text=j End Su
    ① 对象主要属性设置如表3所示。 ② 分析:按试题要求在窗体上画一个单选按钮数组(含四个单选按钮)、一个文本框和一个命令按钮,并分别将它们的属性按表3的内容进行设置。单选按钮是否被选取由其Value属性来确定,当Value值为True时,表示单选按钮被选取,否则未被选取,根据题意,只有选择了Op1(0)单选按钮,将字符串“选择正确”赋给Text1.Text,否则将字符串“选择错误”赋给了Text1.Text。 ③ 编程代码: Private Sub C1_Click() If Op1(0).Value=True Then Text1.Text="选择正确" Else Text1.Text="选择错误" End If End Sub 2.① 试题提供的程序如下: Private Sub Command1_Click() Dim i As Integer Dim j As Integer 'For i=Text1.Text To? 'j=?+i Next i Text3.Text=j End Sub ② 要完成两个数之间所有整数的累加,需要使用循环结构来读取两个数之间所有的整数,然后将每一个整数累加到一个变量中。 ③ 修改后的程序如下: Private Sub Command1_Click() Dim i As Integer Dim j As Integer For i=Text1.Text To Text2. Text j=j+i Next i Text3.Text=j End Su

  • 第4题:

    在考生文件夹中有工程文件execise92.vbp及窗体文件execise92.frmo在名为Form1的窗体中有一个Rich Text文本框控件(名称为rtx1),一个文本框控件(名称为Text1),两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为“加入92.TXT”和“统计字符个数”),如下图所示。

    要求程序运行后,单击“加入92.TXT按钮将考生文件夹中的92.txt的内容显示到rtx1中;单击“统计字符个数”按钮统计Text1中有多少个字符并将结果显示在Text1中。

    本程序不完整,请补充完整,并能正确运行。

    要求:

    去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。


    正确答案:

  • 第5题:

    考生文件夹中有一个工程文件execise97.vbp及窗体文件execise97.frm。在名为Form1的窗体上有2个文本框(名称为Text1和Text2)、3个单选按钮(标题分别为“大小写互换”、“全部大写”和“全部小写”)和1个命令按钮(标题为“互换”)。运行时,在 Text1中输入若干个大写和小写字母,并选中1个单选按钮,再单击“转换”按钮,则按选中的单选按钮的标题进行转换,结果放入Text2,如F图所示。

    在给出的窗体文件中已经给出了全部控件,但程序不完整,要求去掉程序中的注释符“'”并把程序中的问号“?”改为正确的内容。

    注意:

    不能修改程序的其他部分。最后,按原文件名并在原文件夹中保存修改后的文件。


    正确答案: