[问答题]

在考生目录下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在运行时,若用鼠标左键单击圆的边线,则指针指向鼠标单击的位置(如图2所示);若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若鼠标左键或右键单击其他位置,则在标签上显示“鼠标位置不对”。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。程序中的oncircle函数的作用是判断鼠标单击的位置是否在圆的边线上(判断结果略有误差),是则返回True,否则返回False。符号常量x0、y0是圆心距窗体左上角的距离;符号常量radius是圆的半径。
  注意:不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
图1
图2
  (2)在考生目录下有一个工程文件sjt4.vbp,窗体如图3所示。其功能是单击“输入数据”按钮,则可输入一个整数n(8<=n<=12);单击“计算”按钮,则计算1!+2!+3!+…+n!,并将计算结果显示在文本框中;单击“存盘”按钮,则把文本框中的结果保存到考生目录下的out4.dat文件中。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容,并编写“计算”按钮的Click事件过程。
  注意:不得修改已经存在的内容和控件属性,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后把修改后的文件按原文件名存盘。
图3

参考答案与解析:

相关试题

设窗体上有一个名称为label1的标签,程序运行时,单击鼠标左键,再移动鼠标,鼠

[试题]设窗体上有一个名称为label1的标签,程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在label1标签中,单击鼠标右键则停止实时显示,并将标签中内容清除,下面的程序可实现这一功能,请填空。D.im down as BooleanPrivate Sub form_mousedown(button as integer,shIft as integer,X as single, Y as single)Select Case(8)C.ase 1D.own=trueC.ase2D.o

  • 查看答案
  • 在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时

    [试题]在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则把它的大写形式显示在标签Labell中;若是大写字母,则把它的小写形式显示在Label1中;若是其他字符,则把该字符直接显示在LabelI 中。输入的字母总数则显示在标签Label2中,如图4所示。 要求:去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不得修改已经存在的程序,最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4.v

  • 查看答案
  • 窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件

    [单选题]窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如下图所示。现有如下程序: Public Sub display (x As Control) If TypeOf x Is Label Then x.Caption="计算机等级考试" Else x.Picture=LoadPicture("piC.jpg") End If End Sub Private Sub Labell_Click() Call display(Labell) End Sub Pr

  • 查看答案
  • 在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器

    [试题]在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称 为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形状,其显示形式为圆,并设置适当属性使其满足以下要求: ①圆的顶端距窗体Form1顶端的距离为360; ②圆的颜色为红色(红色对应的值为&H000000FF&或&HFF&),如图3所示。 程序运行时,Shape1将在Line1和Line2之间运动。当Shape1的顶端到

  • 查看答案
  • 在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形

    [问答题]在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape

  • 查看答案
  • 在考生文件夹下有一个工程文件sjt3.vbp,请在名称为Forml的窗体上画一个

    [试题]在考生文件夹下有一个工程文件sjt3.vbp,请在名称为Forml的窗体上画一个名称为Text1 的文本框和一个名称为C1、标题为“转换”的命令按钮,如图8所示。在程序运行时,单击“转换”按钮,可以把Text中的大写字母转换为小写,把小写字母转换为大写。 窗体文件中已经给出了“转换”按钮的Click事件过程,但不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序中的其他部分,最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件sjt4.vbp,其功能是:

  • 查看答案
  • 在考生文件夹下游一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件,在两条直线之间画一个宽和高都相等的形

    [问答题]在考生文件夹下游一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及名称为Line1和Line2的两条水平直线。请用名称为Shape

  • 查看答案
  • 在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时

    [试题]在考生目录下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认文件类型为“文本文件”,默认目录为考生目录。选中in5.txt文件,如图6(a)所示,单击“打开”按钮,则把文件中的内容读入并显示在文本框(Text1)中;单击“修改内容”按钮,则可把Text1中的大写字母“E”、“N”、“T”改为小写,把小写字母“e”、“n”、“t”改为大写;单击“保存文件”按钮,则弹出“另存为”对话框,默认文件类型为“文本文件”默认目录为考生目录,

  • 查看答案
  • 在窗体上有一个计时器控件Timer1和一个标签控件Label1,在程序运行时可通

    [单选题]在窗体上有一个计时器控件Timer1和一个标签控件Label1,在程序运行时可通过每隔30毫秒让Lable1左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动。空格处应填 ______。 Private Sub Form1_Load() LabelLeft=FormWidth TimerInterval=30 ______ End Sub Private Sub Timer1_Timer() Lable1.Left=LableLeft -100 If La

  • 查看答案
  • 在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签Label1,请添加一个单选按钮数组,名称为Op1,含3个单选按钮,它们的Index属性分别为0、1、2,标题依次为“飞机”、“火车”

    [问答题]在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签Label1,请添加一个单选按钮数组,名称为Op1,含3个单选按钮,它们的Index

  • 查看答案