- !!!用户新注册邮件系统遭恶意攻击,暂不能发送邮件,请隔天尝试。寻求解决方案中
- 【征集】西西河的经济学,及清流措施,需要主动参与者
- 『稷下学宫』新认证方式
- 24年网站打算和努力目标
主题:请教VB高人一个问题,不难,但是我怎么也做不出来。 -- 锦候
题目是这样的:写一个程序,当一个按钮每次被按的时候,都会从一个text box读入一个成绩。当第二个按钮被按的时候,就会显示最高的两个成绩。把两个变量设成class-level的变量来追踪两个最高的成绩。
这个是书上的练习题,是在"if block"后面的练习,也就是说要用if语句来做,
我写的程序如下,但是只可以把最高的成绩显示出来,第二高的成绩总是不对。想了很久不得要领,z只好麻烦大家一下了。谢谢了!这个是我自己做练习的,题目不难!可是就是想不通了。
Public Class Form1
Dim a As Double =0
Dim b As Double = 1
Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click
Dim score As Double
score = CDbl(txtScore.Text)
If (score > a) And (score < b) Then
b = score
ElseIf (score > b) Then
a = score
End If
txtScore.Clear()
txtScore.Focus()
End Sub
Private Sub btnEvaluate_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnEvaluate.Click
txtOutput.Text = a & " " & b
End Sub
End Class
我的做法有个明显的问题就是我给这两个变量0,1两个值,这个题没问题但是要是在实际情况中,需要比较实数的值的话,这个做法就错了。
我用1,2,3,4,5,6,7,8,9作输入结果每次都只显示 9 和 1 两个值,明显不对。
麻烦哪位高人帮帮手,谢谢了! 大大的花!
- 相关回复 上下关系8
🙂请教VB高人一个问题,不难,但是我怎么也做不出来。
🙂还有一个问题:已经输入了几个值 1 earthcolor 字84 2007-11-28 20:20:42
🙂您说的对!谢谢了! 锦候 字236 2007-11-28 20:27:07
🙂这个简单 1 懒厨 字506 2007-11-28 20:05:13
🙂您老真是高屋建瓴呀,我都晕了。佩服死了! 锦候 字101 2007-11-28 20:09:55
🙂hehe 1 突突 字368 2007-11-28 19:53:46
🙂谢谢了,您真是人如其名呀!突突一下就解决了。 锦候 字143 2007-11-28 20:12:43
🙂其实还有个小bug 1 突突 字207 2007-11-28 20:07:43