例愿22：参考界面知2.13所示。要求如下： 进1语句的线习举例 日▣☒ 斯一个空酸的商偶性 5 奇俱数斯 5是奇数 斯断一个拉的正整税是否是水仙花 945 “水山花聚斯 35不是水花数 已如x,计算y :6 计算 1:6 已如三个数，对其进行处湿 家量大值 5 三角矿积 图2131f语句例题参考界面 (I)如找配套素材文件夹Qpe2下的窗体文件Ep2.b如载到“Ep”的项目《假设该项 目己经在22小情中创建，以后同)， (2)编写代码实现以下功能： D单击按组奇断时。对其左边文本框中的整数进行进行念偶数判断，并在其右 边的标签控件中显示诸如“4是偶数”或“5是奇数”的结论。 2)单击按组水仙阮时，对其左边文本根中的3位数的整数选行进行水仙花数判 断，并在其右边的标签粒件中显示请如“345不是水仙花数“或“30是水仙花数”的结论。 3》单击按钮计算时。根暴x计算y,x的值由左边文本据获取，其右边的标签控件显示 y的值，x和y的关系是： x<-3 -1+e -3sx<3 y= 3sx<10 x210 4)单击技钮求量大值时，显示其左边3个文本据中的最大值于其右边的标签控件中
例题 2.2：参考界面如 2.13 所示。 要求如下： 图 2.13 If 语句例题参考界面 (1) 加载配套素材文件夹 Chapter2 下的窗体文件 Exp2.vb 加载到“Exp”的项目（假设该项 目已经在 2.2 小节中创建，以后同）。 (2) 编写代码实现以下功能： 1）单击按钮 时，对其左边文本框中的整数进行进行奇偶数判断，并在其右 边的标签控件中显示诸如“4 是偶数”或“5 是奇数”的结论。 2) 单击按钮 时，对其左边文本框中的 3 位数的整数进行进行水仙花数判 断，并在其右边的标签控件中显示诸如“345 不是水仙花数”或“370 是水仙花数”的结论。 3）单击按钮 时，根据 x 计算 y，x 的值由左边文本框获取，其右边的标签控件显示 y 的值，x 和 y 的关系是： − + − − = ln 10 3 10 1 3 3 3 x x x x e x x x y x 4）单击按钮 时，显示其左边 3 个文本框中的最大值于其右边的标签控件中
5)单击按细三的面积时，到断其左边3个文本枢中的数值是否构成一个三角形，如 果能，则将三角形的面积显示其右边的标鉴控件中，否则显示如图214所示的信息框。 i 此三个数不能构成三角前三边1 定可 图2.14信息框 解题步耀： 1)给项目E冲深加指定的窗体文件。右击项目名E即，顺次选取“添加一添加现有项”，加 载给定的素材。即窗体文件Exp2.vb: 2)给项目设置启动窗体。若是基于22节的例题，在加我窗体文件Ex2.b后，查看“自 愿管理器”窗口，即有如图215的效果，即项目Ex却中包含两个窗体文件，而本例主要是 给窗体Ex即2编写代码。为了调试方便，现将窗体Ex2设置启动窗体（即程序运行时，首 先显示的窗体)，步骤是： ①单击“资源管理器解决方案”窗口中的“视图设计器”按钮。 ②右击项目名称E即，选取弹出菜单中的“属性”子菜单项。在“属性页”对话框的“启动 对象”栏选取“Ex2”即可，知图2.16所示。 使方室药漫管理器一 团翻回B 解决方案“p”自项目) 回图p 于白引用 回AsE1 yInfo.h 图2.15项目“Ex即”中包含两个留体
5）单击按钮 时，判断其左边 3 个文本框中的数值是否构成一个三角形，如 果能，则将三角形的面积显示其右边的标签控件中，否则显示如图 2.14 所示的信息框。 图 2.14 信息框 解题步骤： 1）给项目 Exp 添加指定的窗体文件。右击项目名 Exp，顺次选取“添加—添加现有项”，加 载给定的素材，即窗体文件 Exp2.vb。 2）给项目设置启动窗体。若是基于 2.2 节的例题，在加载窗体文件 Exp2.vb 后，查看“自 愿管理器”窗口，即有如图 2.15 的效果，即项目 Exp 中包含两个窗体文件，而本例主要是 给窗体 Exp2 编写代码，为了调试方便，现将窗体 Exp2 设置启动窗体（即程序运行时，首 先显示的窗体），步骤是： ①单击“资源管理器解决方案”窗口中的“视图设计器”按钮 。 ②右击项目名称 Exp，选取弹出菜单中的“属性”子菜单项，在“属性页”对话框的“启动 对象”栏选取“Exp2”即可，如图 2.16 所示。 图 2.15 项目“Exp”中包含两个窗体
RED花性页 ☒ 习干出)限 置型语创 山用魔理 程序焦老粘) 年复相 生成 销出元型0) B世可【D 零用界是 4s月程序。 动计以面 根喻名白可3) 重屋性 信电 项日文件共 1.CCBol 项日文件： Erp.vhgraj 编出号称 好E 图2.16设置项目“Exp”启动对象的界面 3)给按钮 奇视数斯 编写代码并运行测试。从界面铁取数据后，根据其是否能被2 整除米列断卿可，参考代码极图如图217所示。代到t1,Tt+“是偶数”中出现的运算符 “+”是将两个文本莲成一个新的文本，如“4”+“是偶数”，其结果是“4是偶数，将运 算符“+”进行文本运算的详细说明请参见小节2.4。 功，判斯一个的合性 ·判断原，这个数能否械2推，即对2取余是否为零 Private Sub Buttonl_Click(ByVal sender As Systen.Object,ByWal e As Systen EventArgs 1DsA也.Intege里"声明一个Integer出的亚量 ”庆取基世教菇 (ter) If a Hod 2 0 Then Lb11.Text=t1.Text+“是偶数 Else b11.Tnx背=t1,Txt+“是奇数 End If End Sub 图2.17判断奇国性的参考代码 4)给按铝 水仙匹数圆编写代码并运行测试。考虑以下两点： ①明确水仙花数的特征：一是3位数的整数，即介于1009网之间，二是这个数是各位数的 立方和。如153=1+3+3-1+125+27，符合这个特征的还有其它3个数，他门是30.371 和407. ②分离其个位，十位和百位。可借助于算术运算符中的取余“md”和取整”，也可利用 后续小节中将学到的字符串的处理函数，本例愿深用算术运算符来处理。考电下列表达式： 3451100,结果是3，想得到石位数. 345m0d10,结果是5，即得到个位数 (345m0d100)110等价于45110，结果是4，即得到十位数
图 2.16 设置项目“Exp”启动对象的界面 3）给按钮 编写代码并运行测试。从界面获取数据后，根据其是否能被 2 整除来判断即可，参考代码截图如图 2.17 所示。代码 中出现的运算符 “+”是将两个文本连成一个新的文本，如“4”+“是偶数”，其结果是“4 是偶数”，将运 算符“+”进行文本运算的详细说明请参见小节 2.4。 图 2.17 判断奇偶性的参考代码 4）给按钮 编写代码并运行测试。考虑以下两点： ①明确水仙花数的特征：一是 3 位数的整数，即介于 100~999 之间，二是这个数是各位数的 立方和，如 153=13+53+33=1+125+27，符合这个特征的还有其它 3 个数，他们是 370，371 和 407。 ②分离其个位、十位和百位。可借助于算术运算符中的取余“mod”和取整“\”，也可利用 后续小节中将学到的字符串的处理函数，本例题采用算术运算符来处理。考虑下列表达式： 345 \ 100 ，结果是 3，即得到百位数。 345 mod 10 ，结果是 5，即得到个位数。 （345 mod 100）\ 10 等价于 45 \ 10 ， 结果是 4，即得到十位数
但如果是：345/100，结果是3.45，这是运算符“”和“1”差异，希望读者留意这一点。 将上述表达式中的345换成变量a,面变量a的值从界面上的某个文本框获取，就可得到如 图218所示的参考代码截图，代到中表示■3可以表示为“a^3”或者“Mhp0(a,3)”。 "功能：判断一个效是否是水仙数 ”所原见。一个3位整数其个位数的立方+其十位的立方+其百位数的立方 ·关模：分离其个干。百位 Private Sub Button2_Click(Byval gender A&Systen Object.Byal e As Systen EventArgs) Dis标1ntgr"声明一个1ntr型的变量 院进B他a声不的中间变量 Toint(a.Tem) ge a lod 1o ”获取个位上的数字 ba5=81100 花重百位上的宇 shi=(a6d100)110 获重干位上的数字 机据判断并输出结论 Ifs=【ath.Pow(g%3》+【ath.Pou(shi,3)+ath.Pow(bai,3》Then Lb12Tet■tt2.Text+是水花数 ,Lb12Tet■tt2.Text+“不是水仙花数 End If End Sub 图2.18判断水仙花数的参考代码 5)给按细计算编写代码并运行测试。对于以下的分段函数是多条件「语句的典型实例， 本例题从采用从最小条件开始的方式，参考代码截图如图29所示，代码中的常用函数可 参考2.2小节中有关Mmh类的内容。读者可采用从最大的条件开始的方式修改代码：。 X<-3 -1+e -3≤x<3 3sx<10 inx x210 ”功能，己知名根君哈定的函货叶算罗 Private Sub Button3 Click (sender As,Byal e As System EventArgs D5=,y As Doub】e '声明两个o1的变量 庆取基位数延 :伊 If I<-3 Then y Hath.Abs(x) Elself x《3Ten y =-1 Iath.Exp(x) E1efx《10Thm y Iath.Sert() E14 y Hath.Los (x) End If '输出批据 Lbl3.Text Convert.ToString(y) End Sub 图219按给定的函数计算y值的参考代码 注意：对于多分支的1f语句，若If结构内有多个条件表达式的结果是T时，仅执行第一 个为T的条件后的语句块，然后洗出1f结构。如本例中的“x心3”的条件有3处满足， 1程序仅执行第一处后的语句块，即y-mah动域x),然后结束该r语句。 6)给按细米最大值编写代码并运行测试。己知三个数求最大值。采用比大的原则：即
但如果是：345 / 100 ，结果是 3.45，这是运算符“/”和“\”差异，希望读者留意这一点。 将上述表达式中的 345 换成变量 a，而变量 a 的值从界面上的某个文本框获取，就可得到如 图 2.18 所示的参考代码截图，代码中表示 a 3 可以表示为“a^3”或者“Math.pow(a,3)”。 图 2.18 判断水仙花数的参考代码 5）给按钮 编写代码并运行测试。对于以下的分段函数是多条件 If 语句的典型实例， 本例题从采用从最小条件开始的方式， 参考代码截图如图 2.19 所示，代码中的常用函数可 参考 2.2 小节中有关 Math 类的内容。读者可采用从最大的条件开始的方式修改代码。 − + − − = ln 10 3 10 1 3 3 3 x x x x e x x x y x 图 2.19 按给定的函数计算 y 值的参考代码 注意：对于多分支的 If 语句，若 If 结构内有多个条件表达式的结果是 True 时，仅执行第一 个为 True 的条件后的语句块，然后跳出 If 结构。如本例中的“x<-3”的条件有 3 处满足， 但程序仅执行第一处后的语句块，即 y=math.abs(x)，然后结束该 If 语句。 6）给按钮 编写代码并运行测试。已知三个数求最大值，采用比大的原则：即
假设a>b,然后再比较a和c娜个大，若a也大于e则a就是最大的，若a比e小，则c 就是最大的，参考代码截图如图220所示，若求最小值，则采用比小的原则。 功能，术三个数的最大值 Private Sub Button5_Click (ByVal_sender As_Systen Object,ByWal e As Syaten.EventArgs Dim a b,c As Double 明3个Da止1e型的量 Dis max Ag Double ‘周明1个aib1型的间变量 '获取基础琐据 a#Convert.ToDouble(txtA.Text) b=Conert.TaDouble(txtB.Text) 装黄深馆ie(iC.Ter If a >b Then If a c Then nax a Else 动E=G End If Else 即b If b )e Then 词x三b Else ar■c End If End ig" 输出结果 1b14.Text Convert.ToString (pax) Erd Sub 图220求三个数中最大值的参考代码 )给按细三角的西积编写代码并运行测试。主要解决问愿：首先判断三个数能否枸成 三角形的三边：二是已知三角形的三边长计算面积。 ①任何3个数值不一定能构成一个三角形，构成三边长的充要条件是：任意两边之和大于第 三边，即假设a,b,e表示三边长，必须同时满足：tb心，teb和b+e>a的条件。 ②已知三角形的三边长a,b,c,计算面积re四的公式是： aa=Vs-aXs-b训s-c以.其中s=a+b+C 2 履设，b,©的值从界面文本框铁取，参考代码截图如图221所示 ·地能，判断3个数脆否构成三角形的三边，若能具则叶算该三角形的面积，。否地出信息框， PrivateBuattod Click(Bvad A Syeten (ject.ByvalSyste EventArg Din a b,c As Double 3个Db]e的2量 Din品工ea As Dow1e·西明两个ouible约中闻变量 ”获取基证教据 Convert.ToDouble(trtA.Tert) b Convert.ToDouble(txtB.Text) 被诺.ie Ifa+b》edb+c>ade+a)bTem"构成三角形的条件 =a+6+e)/2 计再甲间值 r3三ath8at(g多(g-》幸(g-b)来(g一c)》‘获公式计算积 b15,Taxt三Coeert,ToString(ra》'输出结果 「示不合三角的件 【o(此三个数不能构成定角形的三边”，s2oxSy1 e.Critical) End If End Sub 图221判断三角形并计算面积的参考代码
假设 a>b，然后再比较 a 和 c 哪个 大，若 a 也大于 c，则 a 就是最大的，若 a 比 c 小，则 c 就是最大的，参考代码截图如图 2.20 所示，若求最小值，则采用比小的原则。 图 2.20 求三个数中最大值的参考代码 7）给按钮 编写代码并运行测试。主要解决问题：首先判断三个数能否构成 三角形的三边；二是已知三角形的三边长计算面积。 ①任何 3 个数值不一定能构成一个三角形，构成三边长的充要条件是：任意两边之和大于第 三边，即假设 a，b，c 表示三边长，必须同时满足：a+b>c， a+c>b 和 b+c>a 的条件。 ②已知三角形的三边长 a，b，c，计算面积 area 的公式是： 2 ( )( )( ) a b c area s s a s b s c s + + = − − − ，其中 = 假设 a，b，c 的值从界面文本框获取，参考代码截图如图 2.21 所示 图 2.21 判断三角形并计算面积的参考代码