西西河

主题:请教VB高人一个问题,不难,但是我怎么也做不出来。 -- 锦候

共:💬12 🌺6 新:
全看分页树展 · 主题 跟帖
家园 hehe

If (score > a) And (score < b) Then

b = score

ElseIf (score > b) Then

a = score

End If

这段有问题。感觉应改为

If (score > a) And (score < b) Then

a = score

ElseIf (score > b) Then

a = b

b = score

End If

a是第二高的数,b是第一高的数。

你的程序当输入的时候1时无操作,之后反复置a直到a=9所以输出9,1

全看分页树展 · 主题 跟帖


有趣有益,互惠互利;开阔视野,博采众长。
虚拟的网络,真实的人。天南地北客,相逢皆朋友

Copyright © cchere 西西河