- ベストアンサー
VB2005 ランダムにテキスト出力
naganaga_001の回答
- naganaga_001
- ベストアンサー率71% (172/242)
お世話になります。 > 「りんご」以下の文を格納する方法はどのようにしたらよいのでしょうか? 大きなデータでなく、かつ固定であれば 下記ソースのように List(Of T) (ジェネリックなどのコレクション)でよいと思います。 http://www.atmarkit.co.jp/fdotnet/special/generics01/generics01_01.html ランダムの部分は、System.Random クラスを使います。 http://msdn2.microsoft.com/ja-jp/library/system.random(VS.80).aspx Public Class Form8 Private m_collection As List(Of String) = New List(Of String) Private Sub Form8_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me.m_collection .Add("が食べたい") .Add("が好きだ") .Add("は腐っている") End With End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim fruit As String = Me.TextBox1.Text If fruit.Trim = String.Empty Then Return If fruit.Contains(","c) Then Dim tmpArr As String() = fruit.Split(","c) fruit = String.Empty For index As Integer = 0 To tmpArr.Length - 1 If Not index = 0 Then fruit += "か" fruit += tmpArr(index) Next End If Dim rnd As Random = New Random() Dim ret As Integer = rnd.Next(0, Me.m_collection.Count) Me.TextBox2.Text = fruit + Me.m_collection(ret) End Sub End Class
関連するQ&A
- ランダムでテキストを表示
ボタンをクリックしたらランダムでテキスト(一行のもの)を表示、これを複数設置したいです。 一つのみならぐぐればすぐでてきますが、同じページに複数設置する方法がわかりません。 できればテキストは別タブに表示ではなく、同じページのテキストボックスに表示されるものがいいです。 教えてください。
- 締切済み
- HTML
- Accessで自動に番号を振る方法
AccessのマクロやVBAにお詳しい方、教えてください。 現在、Access2010を使っています。 たとえば、テーブル1が、 種別 番号 りんご 1 みかん 1 りんご 2 メロン 1 みかん 2 メロン 2 メロン 3 とあります。 フォーム1には、種別と番号のテキストボックスがあります。 新規データ入力で、「種別」テキストボックスに「みかん」と入力し、「番号」テキストボックスをダブルクリックしたとき、「みかん」の番号の最大値の次の番号「3」が自動的に振られるようにしたいのですが、どうしたらいいでしょうか。 なお、 1.「種別」テキストボックスが空欄の場合 または、 2.「番号」テキストボックスに既に数値が入っている場合 は、ダブルクリックしても番号が振られないようにもしたいです。
- 締切済み
- オフィス系ソフト
- VBでコンボボックスとテキストボックスの連係
VBでフォームにデータコンボボックスとテキストボックスを一つづつ作り、データコンボボックスで値を選択し、その値に対する値をテキストボックスに表示させたいんですがどうすればいいでしょうか? データコンボボックスで選択する元になるテーブルは ID | 商品 1 | みかん 2 | ばなな 3 | りんご と、上記のような形のテーブルをもちいています。 例えばデータコンボボックスで「1」を選択した場合テキストボックスに「みかん」と表示させたいです。
- ベストアンサー
- Visual Basic
- テキストボックスに関して質問です
ページ間でのテキストボックスからテキストボックスへの文章の移行って可能でしょうか? tezt1.htmlってページにある 名前⇒<INPUT TYPE="text" NAME="name1"> 住所⇒<INPUT TYPE="text" NAME="adres1"> のテキストボックスに入力された文章を 入力ボタン <INPUT type="button" value="入力" onClick="・・・・・"> を押すと、下に用意してあるテキストボックス(別ページ)に入力した値が入るようにしたいのです。 tezt2.htmlの 名前⇒<INPUT TYPE="text" NAME="name2"> 住所⇒<INPUT TYPE="text" NAME="adres2"> 事情が有り一つのページで行えません。 フレームわけしたページで移行して使用したいのですが… 質問し方が悪くて大変申し訳有りません。宜しくお願いします。
- ベストアンサー
- HTML
- エクセル excel 機能 ソート テキスト出力
表計算のためエクセルの使用を考えています。 エクセルはこれまで使ったことがなく、どのようなものか分からず質問させて頂きます。 セルごとにランダムに入力した数値を小さい順に並べ替えてテキストとして出力する機能はありますでしょうか? 例えば0~100までの数字をセルごとにランダムに入力します。 そのランダムな数字を大きさ順に並べ替えたものを、例えばテキストデータとしてメモ帳などに貼り付ける形で出力させたいです。 このような機能はありますでしょうか? 教えて下さい、宜しくお願いします。
- ベストアンサー
- Excel(エクセル)
- 複数の文章グループからランダムで文章を抽出する方法
ソフトやプログラムで実現できる方法があれば詳しく教えて頂けると嬉しいです。 プログラムに関しては初心者です。(Visual Studio2010を所持していますが、まったく使用していません) 具体的には、 ---------------------------------- A,B,C,D・・・・というグループの中に、 それぞれn個の異なる文章が入っており、 n個の中からランダムで1つずつ文章を抽出し、 抽出した文章をランダムで並べ替えてから書きだす。 ---------------------------------- という事が出来る方法が知りたいです。 具体的には、 Aに、「りんごです。」「みかんです。」 Bに、「にんじんです。」「キャベツです。」 と言う文章が入っている場合の実行結果が、 ----------------- ・りんごです。にんじんです。 or ・みかんです。キャベツです。 or ・キャベツです。りんごです。 or ・にんじんです。みかんです。 ・・・・ ----------------- のように出力される方法です。 orで例をいくつかあげましたが実行するたびに1つの文章の組み合わせが完成するようにしたいです。 もし、このようなことができるソフトや、プログラムを作成しての解決方法があれば教えて頂けると幸いです。
- ベストアンサー
- その他(プログラミング・開発)
- テキストボックスの値を出力
Visual Basic 2010 Express windows7 Pro テキストボックスに入力された数字をテキストファイルに出力したいのですが、 「4.0」や「04」だと出力されるのですが、「4」だと出力されないのは何故でしょうか? Shell("cmd /c @echo " & TextBox1.Text & ">> aaa.txt", AppWinStyle.Hide, True)
- ベストアンサー
- Visual Basic
- テキストボックスとセレクトボックスの選択肢の連携
この度はお世話になります。 1個のテキストボックスに入力された文字列により、その後の1個の セレクトメニューの選択肢を変更することってできるのでしょうか? 具体的には以下のような動作です。 ・デフォルトではテキストボックスに文字列が入力された場合は、 その後のセレクトボックスには「トマト、きゅうり、ほうれんそう」 の選択肢が入る。 ・テキストボックスに「あいうえお」と入力された時のみ、その後の セレクトボックスが「りんご、みかん、ぶどう」の選択肢に変わる。 ・テキストボックスに「かきくけこ」と入力された時のみ、その後の セレクトボックスに「あじ、さば、かつお」の選択肢に変わる。 こんな感じですが、よろしくお願い致します。 当方、只今javascriptを勉強しており、条件式に苦戦しております。 サンプルプログラムを見せていただけるとありがたく思います。
- ベストアンサー
- JavaScript
- VBのフォーカスの移動について教えてください
はじめたばかりの初心者ですが、よろしくお願いします。 商品名の一覧のリストボックスを表示し、商品コードを入力するテキストボックスと商品名を表示させるラベルをそれぞれ三つづつ用意し、テキストボックスへ商品コードの入力、またはリストボックスの商品名のクリックでラベルに商品名を表示するようにしたいのですが、まず最初にテキストボックス1にフォーカスを移します。そしてそこでリストボックスの商品名をクリックすると、そこにフォーカスが移ってしまいます。 リストボックスをクリックしたあと、自動的に元のテキストボックス1 (元のフォーカスがテキストボックス2にあったときにはテキストボックス2に) にフォーカスを戻すにはどのようにすればいいのでしょうか。 サンプルコードで教えて頂けたら有難いのですが。
- ベストアンサー
- Visual Basic
- VB2010 テキスト書き出し位置
VisualBasic初心者です。 VB2010でフォームでフォームから複数のTextBoxに入力したものを Buttonクリックイベントでテキストファイルに書き込みを行おうと思っています。 その際、テキストファイルへの書き込み位置を指定したいと思っています。 TextBox1の内容はテキストファイルの1文字目から10文字目 TextBox2の内容は11文字目から20文字目という感じにしたいです。 現在下記のプログラムです。 どなたかご教授ください。 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click Dim write_data As New System.IO.StreamWriter("C:\test.txt", False, _ System.Text.Encoding.Default) write_data.Write(Textbox1.text) write_data.Close() End Sub
- ベストアンサー
- Visual Basic
補足
コードまで提示していただき、ありがとうございます!! リンク先も大変勉強になりました。 コード中に(","c)とありますが、「c」はどういった働きをしているのでしょうか? 当方が質問させていただいた内容やご提示いただいたコードでは、カンマはひとつの場合でしたが、カンマがふたつになった場合はElseIfを追加し、("," & ","c)と記入すればよろしいのでしょうか? さらに質問するかたちになり申し訳ございません。 宜しくお願いいたします。