[.NET] 請教一個比較數字的問題

看板Visual_Basic作者 (VAIO才是NB的王道呀!)時間17年前 (2008/11/04 12:34), 編輯推噓0(004)
留言4則, 3人參與, 最新討論串1/1
有一個題目: 寫一個程式讓使用者連續輸入數值資料,直到輸入-1為止。然後把所有輸入數值中 最大及最小的數值顯示出來。 我先把max設定很小,min設定很大,然後比較,如下。 有沒有方法可以把一開始輸入的數字就設定為max及min? 或是有沒有別的比較好的寫法呢? 請高手指教。 Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim max As Double = -999999999999999999 Dim min As Double = 999999999999999999 Dim a As Double Do a = InputBox("Input below") If a > max And a <> -1 Then max = a End If If a < min And a <> -1 Then min = a End If Loop Until a = -1 MsgBox("Max :" & max & vbCrLf & "Min :" & min) End Sub End Class -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.168.209.133

11/04 12:53, , 1F
既然一定會有 -1...... 那一開始兩個都設 -1 如何?
11/04 12:53, 1F

11/04 12:55, , 2F
沒事,我誤會了 = ="
11/04 12:55, 2F
※ 編輯: fjf1980 來自: 218.168.209.133 (11/04 13:09)

11/04 13:57, , 3F
為何不在第一回合設 max = min = a
11/04 13:57, 3F

11/04 13:58, , 4F
剛才有高手指點了, Do loop外面先輸入一次就可以了。^^
11/04 13:58, 4F
文章代碼(AID): #193z3WTD (Visual_Basic)