　　
質問掲示板は移転しました。新掲示板はこちら。

質問　(回答受付中)

[artisocモデル] エージェントの取得について

質問者: kimさん , 質問日時: 2019/06/05 18:20

エージェント集合型変数の中にあるagtから、必ずランダムに一つのエージェントを取り出す方法を教えてください。
以下の方法で行っても、頻繁に取得に失敗（戻り値-1）で帰ってきてしまいます。

Dim RandomDefault As Agt
Random = GetAgt(AllPointAgtSet, Int(Rnd() * countagtset(AllPointAgtSet)))

▼ 全ての回答

コード自体は間違っていないように見えるので、AllPointAgtSetの中が空なのでは？ if countagtset(AllPointAgtSet) > 0 then Random = GetAgt(AllPointAgtSet, Int(Rnd() * countagtset(AllPointAgtSet))) end if などとすれば回避できるでしょう。（もちろん空だった場合エージェントの取得はできません）
回答者: tomo12 さん , 回答日時: 2019/06/05 18:27

質問 (回答受付中)

▼ 全ての回答

質問　(回答受付中)