コンボボックスとリストボックスの作り方 への返答
投稿で使用できる特殊コードの説明。(別タブで開きます。)
以下の返答は逆順(新しい順)に並んでいます。
投稿者 シャチョさん  (社会人)
投稿日時
2009/2/10 22:59:00
すみません。コンボボックスが1から5までしか代入してませんでした。10まで代入しておいてください。
投稿者 シャチョさん  (社会人)
投稿日時
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()"なのかわかったら教えてください。
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()"なのかわかったら教えてください。
投稿者 neptune  (社会人)
投稿日時
2009/2/8 06:57:07
こんにちは
基礎をすっ飛ばして、いきなりは自分の思うようには作れません。
>自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
>教えてください。
このサイトでは、入門講座、初級講座を用意してくださっていますから、
そこを勉強してはどうですか?
http://homepage1.nifty.com/rucio/main/main.htm
ご希望の事は全て書かれています。
先ずは、読んでみて、わからない所があれば、続けて質問しては如何?
1冊参考書を購入するのも手ですよ。
又、Help(MSDN)にもサンプルソースは沢山あります。
Helpを見るのは非常に大切な能力です。
基礎をすっ飛ばして、いきなりは自分の思うようには作れません。
>自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
>教えてください。
このサイトでは、入門講座、初級講座を用意してくださっていますから、
そこを勉強してはどうですか?
http://homepage1.nifty.com/rucio/main/main.htm
ご希望の事は全て書かれています。
先ずは、読んでみて、わからない所があれば、続けて質問しては如何?
1冊参考書を購入するのも手ですよ。
又、Help(MSDN)にもサンプルソースは沢山あります。
Helpを見るのは非常に大切な能力です。
投稿者 kimuratomtom  (小学生)
投稿日時
2009/2/8 06:16:40
初めまして kimuratomtomです。vb2008始めて1か月になります。
リストボックスとコンボボックスの使い方について質問ですが
リストボックスに10人の名前があり、コンボボックスのコレクションは1点~10点でそれが5個あります。リストボックスから一人選択してコンボボックス5個 点数を選択して 点数SETというボタンを押すとgoukei変数(int型)に格納されるようにしたいです
自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
教えてください。読みにくい説明文ですがよろしくお願いします
リストボックスとコンボボックスの使い方について質問ですが
リストボックスに10人の名前があり、コンボボックスのコレクションは1点~10点でそれが5個あります。リストボックスから一人選択してコンボボックス5個 点数を選択して 点数SETというボタンを押すとgoukei変数(int型)に格納されるようにしたいです
自分でも検索したりして調べましたが 見つからず 周りでも聞ける人がいないので是非とも
教えてください。読みにくい説明文ですがよろしくお願いします