标题：如何提取字典数据最大值

1楼

ZJZK2018 发表于：2023/10/23 10:59:00

Dim zd As New Dictionary(Of Integer, String)

如何提取字典Key的最大值，Key中有：5，2，8，1，15，4有N个数

2楼

有点蓝 发表于：2023/10/23 11:20:00

Dim max As Integer = 0

For Each i As Integer In zd.Keys

If i > max Then

max = i

End If

MsgBox(max)

3楼

y2287958 发表于：2023/10/23 11:38:00

Output .Show (zd.Keys .max)

4楼

ZJZK2018 发表于：2023/10/23 13:10:00

不好意思，最小值如何求？？

5楼

有点蓝 发表于：2023/10/23 14:11:00

min

共5 条记录, 每页显示 10 条, 页签: [1]