標題: 不知道陣列內的最大值與最小值範圍 [打印本頁]

---

作者: EGBT    時間: 2016-7-7 10:06     標題: 不知道陣列內的最大值與最小值範圍

如標題：不知道陣列內的最大值與最小值範圍

　　arr(1 to 1000)

　　用隨機產生數字正負數都有至陣列

　　產生出來我不知道陣列範圍的情況下，要怎麼去找出陣列的最大值最小值。

　　麻煩各位大大

---

作者: c_c_lai    時間: 2016-7-7 12:24

回復 1# EGBT

1. Sub Ex()
   
2.     Dim ar(), x As Integer, y As Integer
   
3.    
   
4.     ar = Array(2, 5, 8, 4, 9, 10, 1, 3, 7, 6, 12, 11)
   
5.     x = WorksheetFunction.Min(ar)
   
6.     y = WorksheetFunction.Max(ar)
   
7.     MsgBox "x = " & x & ", y = " & y
   
8. End Sub

複製代碼

---

作者: hcm19522    時間: 2016-7-7 13:52

http://blog.xuite.net/hcm19522/twblog/430280707

---

作者: PKKO    時間: 2016-7-8 09:30

回復 1# EGBT


陣列範圍
dim arr:redim arr(1 to 10)
Ubound(arr)=10
Lbound(arr)=1

---

作者: EGBT    時間: 2016-7-8 11:13

回復 4# PKKO


    很謝謝大大的幫忙~我不知道陣列大小範圍不是陣列的上下限，而是陣列的內容

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)