实验三 选择结构、循环结构程序
设计
领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
实验三 选择结构程序设计 1. 实验目的 1. 掌握逻辑
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
达式、关系表达式的正确书写格式。 1. 掌握单分支与双分支条件语句的使用。 1. 掌握多分支条件语句的使用。 1. 掌握情况语句的使用及与多分支条件语句的区别。 1. 实验要求 通过实验范例的学习、验证，根据实验内容要求编写完整的应用程序，学会条件分支语句和情况语句的使用。 1. 实验范例 1. 使用 InputBox输入一个数，判断这个数的奇偶性。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles Button1.Click Dim a As Integer a = InputBox("输入一个数") If a Mod 2 = 1 Then MsgBox(a & "是奇数") Else MsgBox(a & "是偶数") End if End Sub 图3-1程序运行界面 程序运行时，单击Button1按钮，在弹出的对话框中输入78，单击“确定”按钮，消息框提示78是偶数，运行界面如图3-1所示。 2. 使用 InputBox输入一个字符，判断你输入的字符的种类。 若是数字，则提示为数字；若是小写字母，则提示此字母为小写字母，并将该字母转换为大写字母；若为大写字母，则提示此字母为大写字母，并将该字母转换为小写字母；否则输出其他字符。 Private Sub Button1_Click(ByVal sender As Object, ByVal e As _ System.EventArgs) Handles Button1.Click Dim a As String Dim b As String a = InputBox("请输入一个字符") If a <= "9" And a >= "0" Then MsgBox(a & "是一个数字") ElseIf a >= "A" And a <= "Z" Then b = Chr(Asc(a) + 32) '也可以写为b = LCase(a) MsgBox(a & "是一个大写字母，将" & a & "变为小写的字母为" & b) ElseIf a >= "a" And a <= "z" Then b = UCase(a) '也可以写为b=Chr(Asc(a) - 32) MsgBox(a & "是一个小写字母，将" & a & "变为大写的字母为" & b) Else MsgBox(a & "是其他字符") End If End Sub 1. 实验内容 1. 在购买某物品时，若所花的钱x在下述范围内，所付钱y按对应折扣支付： x ＜ 1000 1000 ≤ x ＜ 2000 2000 ≤ x ＜ 3000 x ≥ 3000 提示：此例用多分支结构实现，注意计算公式和条件表达式的正确书写。 2. 编写一个程序，输入上网的时间，计算上网费用，计算的
方法
快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载
如下： ＜ 10小时 10 ～ 50小时 ≥ 50小时 同时为了鼓励多上网，每月收费最多不超过150元。 提示：首先利用多分支条件根据3个时间段算出费用，然后再用If语句对超过150元的费用设置为150元。 3. 编写一个程序， 输入a、b、c三个数，要求按由大到小的顺序显示，如图3-2所示。 提示： 1) 3个数的输入通过文本框获得，最好将文本框的内容存放到数值型变量中，否则直接通过3个文本框排序，有时将会得到不正确的结果（因为文本框内容是字符型，当3个数位数不同时，不是按 图3-2 按顺序显示运行界面数值大小比较，而是按字符串从左到右的规则比较， 例如会出现“34”＞“2345”＞“126789”的情况）。 2) 3个数排序，只能通过两两相比较，一般可用三句单分支的If语句来实现。方法是：先将a与b比较，使得a＞b；然后可a与c比较，使得a＞c，此时a最大；最后b与c比较，使得b＞c。 3) 要在文本框内显示如图3-2所示的排序结果，可以利用字符连接符来实现，例如：TextBox4.Text= a &“＞”& y &“＞”& c 4. 编写一个程序， 输入a、b、c三个数，要求按由小到大的顺序显示。 5. 编一模拟袖珍计算器的完整程序，界面如图3-3所示。要求：输入两个操作数和一个操作符，根据操作符决定所做的运算。 提示： 1) 为了程序运行正确，对存放操作符的文本框TextBox3，应使用Trim（TextBox3.Text）函数，去除运算符两边的空格。 2) 根据存放操作符的文本框，利用Select Case语句实现。 如图3-3 计算方法运行界面 6. 输入一个数字(1~7)，用英文显示星期一至星期日。例如输入数字1，运行后界面设计如图3-4所示。 如图3-4 显示星期运行界面 7. 输入一元二次方程ax2+bx+c=0的系数a、b、c，计算并输出一元二次方程的两个根x1，x2。界面如图3-5所示。 提示：求根时，要对a、b、c三个系数进行多种情况的考虑，即：重根、两个实根、两个复根等。 如图3-5 计算器运行界面
浙公网安备 33021202002483