文字をランダムに表示させるには (ID:106057)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 １つの方法として以下のようなやり方があるとおもいます。 ロジック等詳細には書きませんが、参考までに。 1．文章を配列に格納する たとえば外部ファイルから１行ずつテキスト取得し 配列変数などに順次格納していく Dim 配列名() as string cnt=0 Do until(0) テキスト取得 if テキストがあれば cnt=cnt+1 Redim Preserve 配列名(cnt) 配列名(cnt)=テキスト else exit do end if loop ２．配列番号の範囲内で乱数を生成する int(rnd(1)*最大値)+1 で1〜最大値の範囲の乱数生成 ３．その乱数の値で配列からテキストデータを取り出す text = 配列名(乱数値) ４．取り出したテキストを表示する ５．コマンドボタンが押されたらまた２〜４の繰り返し。 だいぶおおまかですが、こんなかんじでできると思います。 初心者ということなのであとはいろいろ調べながら頑張ってみてください。