用VB求A、B、C三数中最大数的方法.pptVIP

求A、B、C三数中最大数的方法？ 解题思路：先求两数的最大数，然后用这最大数与第三个数比较，得出最大数。 先求A与B两数的最大数，设A为这两数最大数。 A－B值有三种情况： A－B0 A－B=0 A－B0 A可以代表两数最大数 A不可以代表两数最大数 当A-B0时，A不能代表A、B两数的最大数，如果将A和B交换数值，A就可以代替A、B两数的最大数了。 A与B如何交换？ B D A 表示：D=A,A=B,B=D 经过这样处理就能求出两数的最大数，然后用这样方法，将这个数与第三数比较，也就求出三数的最大数了。 表示：开始或结束 表示：输入或输出 表示：处理或计算 表示：选择或判断 表示：流向或方向 star 输入A、B、C A－B0 D=A,A=B,B=D A－C0 D=A,A=C,C=D 输出最大数A end Y N Y N * 求解 退出 文体框(T3) 按钮1(C1) 按钮2(C2) 标签5(L5) 窗口(Form1) 最大数是谁呢？ 第一数： 第二数： 第三数： 0 0 0 求三个数的最大数 标签4(L4) 标签3(L3) 标签2(L2) 标签1(L1) 文体框(T1) 文体框(T2) * 属性 对象 名称 标题 字体 文本 Name Caption Font Text 窗口 Form1 图片浏览器 宋体 \ 标签1 L1 求三个数的最大数 宋体小四 \ 标签2 L2 第一数： 宋体小四 \ 标签3 L3 第二数： 宋体小四 \ 标签4 L4 第三数： 宋体小四 \ 标签5 L5 最大数是谁呢？ 宋体小四 \ 文本框1 T1 \ 宋体小四 0 文本框2 T2 \ 宋体小四 0 文本框3 T3 \ 宋体小四 0 按钮1 C1 求解 宋体小四 \ 按钮2 C2 退出 宋体小四 \ 对象——属性 * 方法 对象 名称 启动 单击 Name Load() Click() 窗口 Form1 无 标签1 L1 无 标签2 L2 无 标签3 L3 无 标签4 L4 无 标签5 L5 无 文本框1 T1 无 文本框2 T2 无 文本框3 T3 无 按钮1 C1 无 运行程序 按钮2 C2 无 END 对象——方法 * 运行程序 a =Val (T1.Text) b = Val(T2.Text) c = Val(T3.Text) d = 0 If a b Then 将a,b两数进行交换 d = a a = b b = d End If If a c Then 将a,c两数进行交换 d = a a = c c = d End If a为求解的最大数 L5.Caption = 最大数为： a *