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

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