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

admin2010-09-02  19

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

(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经给出所有控件。程序运行时,单击“开始”按钮,则汽车图标向右运动:单击“停止”按钮则汽车停止运动:移动滚动条上的滚动框,可以改变汽车的运动速度(滚动框向右移动,速度减慢)。如图1-119所示。要求如下:去掉程序中的注释符,把程序中的?改为正确的内容。
提示:窗体上有一个计时器,计时器的事件过程每执行一次,汽车向右移动10,程序通过改变计时器控件的Interval属性来改变汽车的运动速度。
注意:不得修改控件的属性。最后按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,程序界面如图2-9所示。 [*] 步骤2:依次选中窗体中的两个文本框,将其Alignment属性值设置为1-Right Justify。 步骤3:双击窗体中的“计算”命令按钮,在打开的代码编辑窗口中编写其单击事件过程。 参考代码: Private Sub Commandl_Click() If Optionl.Item(0)=True Then Text2.Text = Format(Sin(Val(Textl.Text) * 3.14159 / 180), "0.000") End If If Optionl.Item(1)=True Then Text2.Text=Format(Cos(Val( Text1.Text)*3.14159/180),"0.000") End If End Sub 步骤4:按键键运行程序,在左侧文本框中输入“40”,选择不同选项,单击“计算”按钮,结果图2-10所示。 [*] 步骤5:单击窗体右上角的关闭按钮以结束程序。 步骤6:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符们“’”,将问号“?”改为正确的内容。 参考代码: Timerl.Enabled=TrUe Timerl.Interval=HScroll 1.Value Picturel.Left=Picturel.Left+10 步骤2:按要求将文件保存至考生文件夹中。

解析 第1小题
    ①控件数组是一组具有共同名称和类型的控件,它们拥有共同的事件,数组中的每个控件都有唯一的索引号(Index),即下标。②Alignment属性用于确定文本框中文本的放置方式,其值可以设置为O(靠左,默认)、1(靠右)或2(居中)。③Sin(N)正弦函数用于返回N的正弦值,Cos(N)余弦函数用于返回N的余弦值,其中参数N应为弧度。④Format(数值表达式,格式字符串)函数的功能是按“格式字符串”指定的格式输出“数值表达式”的值。在格式字符串中用0表示数字位,0的个数决定了显示区域的长度,如果要显示的数值的位数小于格式字符串指定的区段长度,则多余的位以0补齐。如果要显示的数值的位数大于指定的区段长度,则数值照原样显示:“.”表示显示小数点,小数点与0结合使用,可以放在显示区段的任何位置,根据格式字符串的位置,小数部分多余的数字按四舍五入处理。
    本题可通过利用Ife…Else…语句来判断第一个单选按钮是否被选中。若是则进行正弦运算,否则进行余弦运算。
第2小题
    ①滚动条分为水平滚动条(HscrollBar)和垂直滚动条(VscrollBar)两种,常用来提供简便的定位或用于取代数据的键盘输入。通过调整滚动条滑块的位置即可改变其Value属性的值,滚动条的Max属性、Min属性:限定了滚动条所能表示的最大值和最小值。即Value属性值的取值范围,在程序中改变Value属性的值,滚动条滑块会随之移动到相应位置。LargeChange属性用于设置当点击滚动条滑块与两侧箭头间区域时Value属性值的改变量,SmallChange属性用于设置当点击滚动条两侧箭头时Value属性值的改变量。②滚动条滑块位置改变时将触发其Change事件。
    本题要求在单击“开始”按钮时,汽车向右运动,其实质是在“开始”按钮的单击事件过程中启动计时器,故第一个?处应改为True。要通过移动滚动条上的滚动框来改变汽车的运动速度,需在滚动条的Change事件过程中,将滚动条当前Value属性值赋予计时器的Interval属性,第两个?处应改为Timerl。汽车向右移动是在计时器的Timer’事件过程中,通过不断增加图片框的Left属性值来实现的,故第三个?处应改为Picturel.Left。
转载请注明原文地址:https://kaotiyun.com/show/JFmp777K
0

最新回复(0)