第二次作业— 顺序结构程序设计.doc

实验目的：1、掌握面向过程和面向对象可视化程序设计方法2、掌握标签、文本框、命令按钮对象以及对话框输的使用实验内容：（注：选择题和填空题答案写到WORD文件中）一、选择题 1. 下列哪组语句可以将变量A、B的值互换？CA) A = BB) A = (A + B) / 2 B = A B = (A B ) / 2C) A = A + BD) A = C B = A B C = B A = A B B = A 2. 结构化程序设计的三种基本结构是：BA) 选择结构、循环结构和嵌套结构B) 顺序结构、选择结构和循环结构C) 选择结构、循环结构和模块结构D) 顺序结构、递归结构和循环结构 3. &可以标记注释的开始，&的位置是：BA) 必须在一行的开始B) 必须在一行的结尾C) 可以在一行的任意位置D) 必须在一行的中间4. 在表单MyForm的事件代码中，改变表单中控件cmd1的Caption属性的正确命令是：BA) MyForm.cmd1.Caption = 最后一个B) THIS.cmd1.Caption = 最后一个C) THISFORM.Caption = 最后一个D) THISFORMSET.cmd1.Caption = 最后一个 5. 在表单MyForm的一个控件的事件代码中，改变该表单的背景色为绿色的命令是：BA) MyForm.BackColor = RGB(0, 255, 0)B) THIS.Parent.BackColor = RGB(0, 255, 0)C) THISFORM.BackColor = RGB(0, 255, 0)D) THIS.BackColor = RGB(0, 255, 0)二、填空题 1. 在表单MyForm中添加一个按钮Command1，单击按钮会做出某种操作，程序员必须编写的事件过程名字是_程序_。 2. 在上题中，如果表单运行时单击Command1按钮，表单的底色改为蓝色，则该Click事件过程中的命令是_this.parent,backcolor=rgb(0.0.255)_。 3. 编辑框控件与文本框控件最大的区别是，在编辑框中可以输入和编辑_多行_文本，而在文本框中只能输入和编辑_单行_文本。三、编程题 1. 用过程化编成方式编写本题。求解一元二次方程 （JFC.PRG） a=1 b=4 C=4 x1= (-b+ SQRT(b*b-4*a*c)/(2*a) x2= (-b- SQRT(b*b-4*a*c)/(2*a) ? ”方程的根是：” , x1 , “ 另一个根是：” , x2a=1b=4c=4x1=(-b+sqrt(b2-4*a*c)/(2*a)x2=(-b-sqrt(b2-4*a*c)/(2*a)?方程的一个根是：+str(x1,7,4),方程的另一个根是：+str(x2,7,4)运行：2.理解大小写转换函数。在文本框中输入文本串，按“转大写”按钮，文本中的英文字母变为大写，按“转小写”按钮，文本中的英文字母变为小写（如图所示）。答案：1：新建表单，按要求设计好表单格式。2.编写代码。表单的activate事件代码：Public a文本框“interactivechange”事件代码：a=thisform.text1.valu “还原”按钮click事件代码：Thisform.text1.value= a“大写”按钮click事件代码：Thisform.text1.value=upper(a)“小写”按钮click事件代码：Thisform.text1.value=lower(a)运行：输入数据：转换大写：转换小写：还原：3. 班上集体购买课外读物，在文本框中输入3种书的单价、购买数量，计算并输出所用的总金额。答案：1，设计表单格式：2，编写“总金额（元）：”按钮的click事件代码：a=thisform.text1.valueb=thisform.text2.valuec=thisform.text3.valued=thisform.text4.valuee=thisform.text5.valuef=thisform.text6.valuethisform.text7.value=a*b+c*d+e*f运行：4. 在文本框中输入小时、分、秒，化成共有多少秒，然后输出之。答案：按照要求设计表单格式：“转化为”按钮click事件代码：a=thisform.text1.valueb=thisform.text2.valuec=thisform.text3.valueThisform.text4.value=a*3600+b*60+c运行：5. 编程序输出在指定范围内的3个随机数，范围在文本框中输入。按照要求设计表单：“产生随机数”按钮的click事件的代码：a=thisform.text1.valueb=thisform.text5.valuethisform.text2.value=int(b-a+1)*rand()+a)thisform.text3.value=int(b-a+1)*rand()+a)thisform.text4.value=int(b-a+1)*rand()+a)运行：6. 编写例题4-8求圆面积，用对话框