荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: huhaiming (一生只爱她), 信区: Program
标 题: [合集]请教VB的算法问题
发信站: 荔园晨风BBS站 (Fri May 2 09:37:08 2003), 站内信件
biao (阿北?) 于Wed Apr 16 17:18:24 2003提到：
题目是“用Inputbox函数输出三个数，选出其中的最大数和最小数，显示于窗体上”
Private Sub Form_Load()
a = InputBox("请输入第一个数", , "0")
b = InputBox("请输入第二个数", , "0")
c = InputBox("请输入第三个数", , "0")
End Sub
接下来的代码不知如何写，因为没有“MAX,MIN”之类的函数
仅用大于号，小于号又太烦，没思路
都怪自己数学基础不好，^_^－－－－－刚开始接触编程，请各位多多指教！
chris (誰よりもあなたを見つめて) 于Wed Apr 16 17:50:06 2003提到：
定义另一个变量，比如imax，在commandbutton click事件里让imax等于a（把a
设为全局变量），用一个循环比较选值。不过你这里只有三个数，直接用If判断取
值就可以了。
biao (阿北?) 于Wed Apr 16 18:18:02 2003提到：
我试过用多一个变量，但要同时显示最大值和最小值，
用IF语句老是有条件交叉，究竟怎样“用IF判断取值”呢
（我现在还只会用IF语句）
Version (Who makes history and why) 于Wed Apr 16 21:04:54 2003提到：
在form load事件那里定义下面的变量 a b c max他们是相同类型的。
在一个button 的click 事件里头添加如下代码。
if(a>b&&a>c)then
max=a;
else
if(b>a&&b>c) then
max=b;
else
if(c>a&&c>b) then
max=c;
endif
endif
endif
Msgbox("最大的数是" & max);
chris (Meaning of Happiness) 于Wed Apr 16 21:12:04 2003提到：
最简单的做法就是
dim imax
if (a>b) and (a>c) then imax=a
if (b>a) and ....(不用写了吧，共三个if）
if。。。
Version (Who makes history and why) 于Wed Apr 16 21:14:42 2003提到：
这样3给if都要比较，效率不高。
biao (阿北?) 于Wed Apr 16 21:36:38 2003提到：
感谢各位高手
其实我的初衷是：用一个button的click事件来显示两个值
现在觉得还是用两个控件方便些
总之，多谢大家了！^_^－－自己以后还要努力啊！
Chengal (努力学习) 于Thu Apr 17 11:02:02 2003提到：
j定义两个÷函数max和min咯 ^_^
题目是“用Inputbox函数输出三个数，选出其中的最大数和最小数，显示于窗体上”
Private Sub Form_Load()
a = InputBox("请输入第一个数", , "0")
b = InputBox("请输入第二个数", , "0")
c = InputBox("请输入第三个数", , "0")
End Sub
接下来的代码不知如何写，因为没有“MAX,MIN”之类的函数
仅用大于号，小于号又太烦，没思路
都怪自己数学基础不好，^_^－－－－－刚开始接触编程，请各位多多指教！
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店