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

admin2019-06-11  29

问题 在考生目录下有一个工程文件sjt3.vbp,窗体文件中已给出所有控件和部分程序,如图2-118所示。要求:
①利用属性窗口设置适当的属性,使Textl、Text2中数据右对齐;
②请编写适当的程序完成以下功能:在Textl中输入40(度数),选择一个单选按钮,单击”计算”按钮,则根据所选择的单选按钮,计算出相应的正弦、余弦值(保留3位小数,第4位截去,x取3.14159),并显示在Text2中。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须进行一种计算,在Textl中输入的必须是40,必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后程序按原文件名存盘。

选项

答案步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,程序界面如图3-9所示。 [*] 步骤2:依次选中窗体中的两个文本框,将其Alignment属性值设置为1-Right Justify。 步骤3:双击窗体中的”计算”命令按钮,在打开的代码编辑窗口中编写其单击事件过程。 参考代码: Private Sub Command1_Click( ) If Optionl.Item(0) =True Then Text2.Text Format(Sin(Val(Textl.Text) *3.14159/ 1 80), “0.0 0 0”) End If If Optionl.Item(1)=True Then Text2.Text=Format(Cos(Val(_ Text1.Text)*3.14 15 9/1 80),”0.00 0”) EndIf End Sub 步骤4:按<F5>键键运行程序,在左侧文本框中输入”40”,选择不同选项,单击”计算”按钮,结果图3-10所不。 [*] 步骤5:单击窗体右上角的关闭按钮以结束程序。 步骤6:按要求将文件保存至考生文件夹中。

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

最新回复(0)