■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#2191-0正解したら表示されないようにするには・・たろぴ2002-05-13(月) 20:04
     #2194-0RE#2191:正解したら表示されないようにするには・・藤代千尋2002-05-14(火) 02:11
     #2199-0RE#2191:正解したら表示されないようにするには・・せつら2002-05-14(火) 17:13
     #2200-0RE#2199:正解したら表示されないようにするには・・たろぴ2002-05-15(水) 02:54
#2191-0
正解したら表示されないようにするには・・
電子単語帳をつくりたいんですがどうしてもうまく行かないところがあります。
仕組み的に正解したものは単語帳のなかから消えていき正解するまで繰り返し表示させるプログラムを
作りたいんですがどうしても正解したら消すためのプログラムが思いつきません。
また、配列変数をランダムにならべかえる方法もうまくいきません。
詳しい方教えてください、お願いします。
#2194-0
RE#2191:正解したら表示されないようにするには・・
> 電子単語帳をつくりたいんですがどうしてもうまく行かないところがあります。
> 仕組み的に正解したものは単語帳のなかから消えていき正解するまで繰り返し表示させるプログラムを
> 作りたいんですがどうしても正解したら消すためのプログラムが思いつきません。
> また、配列変数をランダムにならべかえる方法もうまくいきません。
> 詳しい方教えてください、お願いします。

今、どのようにしているのか分からないので、答えにくいです。(^_^;)

単語が配列に入っているなら、同じ要素数の boolean のフラグ用配列を用意し、正解したら
True として、以後表示しないようにします。
#単語の表示は、ランダムに並べたものを先頭から表示するとします。すると、先頭から見て
 いって、フラグ配列が True でないものを表示します。

ランダムに並べ替えるには、シャッフルを使います。適当に選んだ 2つの単語を入れ替えることを、
単語の数だけ繰り返せば、ほぼランダムになります。「適当に選ぶ」には、Rnd 関数を使います。
#2199-0
RE#2191:正解したら表示されないようにするには・・
ListBox を使うのなんて、どうでしょうか?

Private Sub Command1_Click()
    Dim cw As String
    Dim iw As Integer

    Randomize

    With List1
        .Clear

        Open "c:\aaa.txt" For Input As #1
        While EOF(1) = 0
            Line Input #1, cw
            iw = Int(Rnd * .ListCount)
            .AddItem cw, iw
        Wend
        Close #1
    End With
End Sub

とりあえず、ファイルから読み込む例です。 おそらくデータはデータベース上に存在するのでしょう
けど、考え方は同じですよね。

正解したなら消す、というのも、ListBox なら RemoveItem メソッドで一発ですよ。
#2200-0
RE#2199:正解したら表示されないようにするには・・
なるほど。
早速試してみたいと思います!!
藤代千尋さん、せつらさん 
ありがとうございます!

このページと関連する記事:
#2749-3お願いします!!2001-12-12(水) 13:59
#10059-0問題部を別にしたテスト2000-07-29(土) 18:08
#7250-0乱数2000-04-09(日) 18:03
#492-2クイズを作りたいんですが2003-12-16(火) 13:25
#11052-0ランダムに問題表示2000-09-01(金) 15:51
#941-0三択問題1999-08-18(水) 17:30
#15872-0せつらさん いつもありがとうございます。2001-04-28(土) 03:02
#17426-0リストボックスの項目をランダムに順番を入れ換える。2001-08-26(日) 21:28
#28614-0続・ファイル内の文字列を置換したい。2002-05-10(金) 14:57
#13554-0ランダムな数字を重複なく配列に格納していく方法2000-12-20(水) 14:47
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)