• ベストアンサー

ランダムに、、

picture1.picture  にランダムに絵(a.bmp b.bmp)を50%50%の確立で表示させるにはどうすればよいでしょうか? また、30%70%の場合はさせるにはどうすればよいでしょうか??

質問者が選んだベストアンサー

  • ベストアンサー
  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.2

3パターン以上に分けるのであればSelect Caseがいいと思いますが、2パターンであればIfでいいのでは? If Int(Rnd*10) < 5 Then picture1.picture=load(a) Else picture1.picture=load(b) End If

yasuosan
質問者

お礼

なるほど。こちらのほうが簡単ですね。 有難うございます。

その他の回答 (1)

  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.1

Rnd関数で乱数を発生させます。 発生する乱数は0~1の範囲の小数なのでこれを10倍し、Int関数で整数部を取得します。 で、結果が0~4、5~9で処理を分ければOKです。 3:7なら0~2、3~9という具合に。

yasuosan
質問者

補足

ということは select case Int(Rnd*10) case 1 picture1.picture=load(a)case 1 case 2 picture1.picture=load(b) end select でよろしいのでしょうか? うちにvbがないので確かめられません.

関連するQ&A

  • 絞り込んでランダム表示

    PHPでランダムに文章を表示するようにしたいのですが、以下のような場合はどのようにしたらよいでしょうか? ちなみにSQLを使わずにしようと思っています 1 A text1 2 A × 3 B text2 4 B text3 5 A text4 まず、このようなデータがあるとして、「A」という条件で絞込みます 1 A text1 2 A × 5 A text4 次に絞り込んだ中から「×(未記入)」のモノを除きます 1 A text1 5 A text4 最終的にここからランダムでどちらか1件のみを表示するようにします という流れを作りたいのですが、最後の絞り込んだ条件からランダムに表示する方法が思いつかず悩んでおります どのようにすれば、出来ますでしょうか?

    • ベストアンサー
    • PHP
  • 乱数がうまくランダムされない

    コマンドボタンを押すごとに画像をランダムに表示したいのですが 決まった順番で表示されてしまいます。 (画像はMy Picturesに440個入っています。) Sub ボタン_Click() Dim i As Long '画像をランダムに表示 i = Int((440 - 1 + 1) * Rnd + 1) Forms("フォーム1").ボタン.Picture = "D:\My Documents\My Pictures\画像" & i & ".ico" Debug.Print i End Sub コマンドボタンを何回かクリックし 上記のコート゛を実行してイミディエイトウインドウで確認すると 311 235 255 128 133 341 7 335 359 となります。 何回やってもこの順番です。 なんの規則かわかりません。 確かにランダムなのですが 本当にランダムにするのはどうすればいいでしょうか? 「i = Int((440 - 1 + 1) * Rnd + 1)」 ここに原因があると思うのですが どうすればいいでしょう? よろしくお願いします。

  • エクセルのランダム抽出について・・・

    エクセルのランダム抽出に付いて教えてください。 A列に1000人の名前が並んでいます。 これをB列に5~8名程度をランダムに表示させるやり方が 知りたいです。 できたらボタンをつけてそれを押すたびにB列の表示が ランダムに変わるやり方がわかると大変助かります。 もしごぞんじのかたがおりましたらぜひともご教授 くださいませm(__)m

  • EXCELで確立のランダム表示を教えてください

    (1)が出る確率40% (2)が出る確率30% (3)が出る確立20% (4)が出る確率10% 上記の確立でセルに(1)~(4)をランダムで表示させるには、どの様にすればよろしいでしょうか教えてください

  • 画像のランダム表示

    VB6.0を使用しているのですが、8枚の画像をランダムに2秒間ずつピクチャーボックスに表示するのはどうしたらよいのでしょうか。初心者なのでよろしくお願い致します。

  • ランダムに、リンクコードを貼り付けたい

    たとえば、Aというページから、B、C、Dという3つのページのうち、ランダムに1つのページにジャンプするようなコードがあれば、教えていただけませんか? Aを開くと、ときには、“Bはこちら”や、またあるときには、“Dはこちら”という表示はできませんか?

    • ベストアンサー
    • HTML
  • ジャンル別にランダム画像を表示させるスクリプト

    タイトルの通り、ジャンル別にランダム画像を表示させるスクリプトを探しています。 イメージとしては、ジャンルAにはA1.jpg, A2.jpg, A3.jpg...のうち一つをランダム表示。 ジャンルBにはB1.jpg,B2.jpg,B3.jpg.....のうち一つをランダムで表示。 などなど複数のジャンルにおいて、画像をランダムに、1ページで表示させたいと考えています。(添付画像ご参照ください) "javascript 複数 ランダム 表示"などのキーワードで探したところ、 「複数の画像を重複せずに表示する」などのようなスクリプトでしたので、 新たに質問させていただきました。 PHPでも構いません。 もし知ってらっしゃる方がいましたらよろしくお願いいたします。

  • javascript ランダム表示

    2回目になります。前回はお世話になりました。 忙しなく、気は引けるのですが、是非教えてもらいたいことがあり質問させていただきます。 やりたいことは、画像が6枚、6枚とあって 上下に2組ずつ表示させます。ただしランダムとはいえ、画像の組み合わせは決まっており、A+B C+D というのは固定という前提で。 画面のイメージとしては 上 画像A + 画像B 下 画像C + 画像D これを、一定時間ごとに  上 画像E + 画像F → 画像A + 画像B(ランダム) 下 画像G + 画像H → 画像I + 画像J (ランダム) E+FとかC+Dは固定ですが、上下で時間ごとに切り替わった時に表示される画像はランダムにしたいのです。A+BやL+Mなどどちらかでるかはランダムといった感じ。 順番どおり、表示させるのは成功したのですが、こちらも是非表現したく、質問させてもらいました。どうか宜しくお願いします。

  • ランダムリンク(ランダム表示)の作成について

    初めて質問させていただきます。 自分のサイトにランダムリンク(ランダム表示)を設置しようと思いいろいろと調べてみたものの、 自分が必要としているものが見つかりませんでした。 以下が自分の希望するランダムリンクの形です。 (1)サイトのソース表示を見た場合、<a href="○○">××</a>のようなリンク形式で表示したい。 ⇒<script type ~></script> というふうに表示されないもの (2)テキストファイルなど、外部にリンク先のタグを挿入しておき、その中からランダムに表示されるようにしたい。 (3)phpで作成されたフリー配布されているものを使用させていただいたところ、うまく動かすことができませんでした。 ですので、php以外の形式のランダムリンクを希望いたします。 これらの条件にあてはまるランダムリンクの仕組み、サンプル、方法などをご存知の方はいらっしゃいませんでしょうか?? お手数ですが、よろしくお願いいたします。

    • 締切済み
    • CGI
  • ランダムに表示した値を固定させたい

    =VLOOKUP(ROUNDUP(RAND()*27,0),A:B,2,FALSE) 現在A2に1~27の数字を記述し、B2に27個の値を記述しています。 これをH1~順にランダム表示させるため、 上記の式で、ランダムに表示をさせたのですが、 操作する度にH1の値が変化してしまいます。 この数式をどうすれば、H1の値を完全に固定することができますか? ランダム表示は必要なのですが、値は固定させたいです。