■95457 |
Re[5]: 行ごとに乱数で0、1を指定して二次配列を作る方法について(続 |
□投稿者/ shu -(2020/08/03(Mon) 07:52:02)
| ■No95456 (サイカク さん) に返信
> 解決済みとしておきます。
> 皆さんご協力ありがとうございました!
解決済のようですがLINQを利用した方法として
VBで結果がジャグ配列ですが以下のように書くことも出来ます。
Dim ary = {0, 1, 0, 1, 0, 0}
Dim rnd As New Random()
Dim ary2 = (From i In Enumerable.Range(0, 6)
Select (From r In ary Order By rnd.Next(100)).ToArray()).ToArray()
|
|