コンボボックスとリストボックスの作り方

タグの編集
投稿者 kimuratomtom  (小学生) 投稿日時 2009/2/8 06:16:40
初めまして kimuratomtomです。vb2008始めて1か月になります。
リストボックスとコンボボックスの使い方について質問ですが
リストボックスに10人の名前があり、コンボボックスのコレクションは1点~10点でそれが5個あります。リストボックスから一人選択してコンボボックス5個 点数を選択して 点数SETというボタンを押すとgoukei変数(int型)に格納されるようにしたいです
自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
教えてください。読みにくい説明文ですがよろしくお願いします
投稿者 neptune  (社会人) 投稿日時 2009/2/8 06:57:07
こんにちは


基礎をすっ飛ばして、いきなりは自分の思うようには作れません。

>自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
>教えてください。
このサイトでは、入門講座、初級講座を用意してくださっていますから、
そこを勉強してはどうですか?
http://homepage1.nifty.com/rucio/main/main.htm
ご希望の事は全て書かれています。

先ずは、読んでみて、わからない所があれば、続けて質問しては如何?


1冊参考書を購入するのも手ですよ。

又、Help(MSDN)にもサンプルソースは沢山あります。
Helpを見るのは非常に大切な能力です。
投稿者 シャチョさん  (社会人) 投稿日時 2009/2/10 22:56:35
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ListBox1.Items.AddRange(New String() {"Aくん", "Bくん", "Cくん", "Dくん", "Eくん", "Fくん", "Gくん", "Oくん", "Pくん", "Qくん"})
        ComboBox1.Items.AddRange(New String() {1, 2, 3, 4, 5})
        ComboBox2.Items.AddRange(New String() {1, 2, 3, 4, 5})
        ComboBox3.Items.AddRange(New String() {1, 2, 3, 4, 5})
        ComboBox4.Items.AddRange(New String() {1, 2, 3, 4, 5})
        ComboBox5.Items.AddRange(New String() {1, 2, 3, 4, 5})
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim goukei As Integer
        goukei = ComboBox1.SelectedItem
        goukei += ComboBox2.SelectedItem
        goukei += ComboBox3.SelectedItem
        goukei += ComboBox4.SelectedItem
        goukei += ComboBox5.SelectedItem
        TextBox1.Text = goukei
    End Sub

初心者の私ですが、これでどうでしょう。
自分でプログラムを作れると楽しいですよ。
いろいろVisuaBasicの本を買いましたが、このサイトが一番ためになりました。
このプログラムもこのサイトからコピペで作りました。Items.AddRange(New String() {1, 2, 3, 4, 5})で整数を代入してしてるのになぜ"New String()"なのかわかったら教えてください。
投稿者 シャチョさん  (社会人) 投稿日時 2009/2/10 22:59:00
すみません。コンボボックスが1から5までしか代入してませんでした。10まで代入しておいてください。