(1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序,如图1-23所示。要求如下: ①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐; ②请编写适当的程序完成以下功能:在Text1 中输入40(度数)

admin2018-10-29  21

问题 (1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序,如图1-23所示。要求如下:
    ①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;
    ②请编写适当的程序完成以下功能:在Text1 中输入40(度数),选择组合框中的一个项目,单击“计算”按钮,则根据所选择的项目,计算出相应的正弦、余弦值(保留3位小数,第4位截去,π取3.14159),并显示在Text2 中。

    注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须进行一种计算;在Text1中输入的必须是40;必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后按原文件名存盘。
    (2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经画出所有控件。程序的作用是构成一个简单的时钟。刚运行时,不计时,选择一个单选按钮后,再单击“计时”按钮,则开始计时,并根据所选的单选按钮决定是每秒显示一次秒数,还是每10秒显示一次秒数。Text2用于显示秒,如图1-24所示。窗体文件中已经给出了程序,但不完整,请去掉程序中的注释符,把程序中的?为正确的内容。

    注意:不得修改已经给出的程序。最后把修改后的文件按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹中的工程文件依次选中窗体中的两个文本框,将其 设置为1-Right Justify。 步骤2:双击窗体中的“计算”命令按钮,在打开的代码编辑窗口中编写其单击事件过程。 参考代码: Private Sub Command1_Click() Const PI = 3.14159 Select Case Combo1.Text Case "sin": a = Sin(CInt(Text1.Text) * PI / 180) Case "cos": a = Cos(CInt(Text1. Text) * PI / 180) End Select Text2 = Int(a * 1000) / 1000 End Sub 步骤3:按<F5>键运行程序,在左侧文本框中输入“40”,选择不同选项,单击“计算”按钮。 步骤4:单击窗体右上角的关闭按钮以结束程序。 步骤5:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: num = num + 1 Text2.Text = Text2.Text + 10 Text1.Text = Text1.Text + 1 步骤2:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://jikaoti.com/ti/Bzm0FFFM
0

最新回复(0)