我有一个类型列表System.IO.FileInfo,我想随机列表.我以为我记得看到过list.randomize()一会儿的东西,但我找不到我可能已经看到的地方.
我第一次尝试这个功能让我有了这个功能:
Private Shared Sub GetRandom(ByVal oMax As Integer, ByRef currentVals As List(Of Integer))
Dim oRand As New Random(Now.Millisecond)
Dim oTemp As Integer = -1
Do Until currentVals.Count = IMG_COUNT
oTemp = oRand.Next(1, oMax)
If Not currentVals.Contains(oTemp) Then currentVals.Add(oTemp)
Loop
End Sub
Run Code Online (Sandbox Code Playgroud)
我发送它想要它迭代到的最大值,并且我想要随机化内容的列表的引用.该变量IMG_COUNT在脚本中设置得更远,指定我想要显示多少随机图像.
谢谢你们,我很感激:D