こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

テキストボックスの表示について

visual basic2010を使用しています。


コンボボックスAの選択が1~4だった時、コンボボックスB、C、Dの選択された結果を、ボタンクリックを経てテキストボックスに表示させるにはどうすればいいでしょうか?


If ComboBox1.Text = "1" Then
TextBox1.Text = (ComboBox2.Text)
TextBox1.Text = (ComboBox3.Text)
TextBox1.Text = (ComboBox4.Text)
ElseIf ComboBox1.Text = "2" Then
TextBox2.Text = (ComboBox2.Text)
TextBox2.Text = (ComboBox3.Text)
TextBox2.Text = (ComboBox4.Text)
ElseIf ComboBox1.Text = "3" Then
TextBox3.Text = (ComboBox2.Text)
TextBox3.Text = (ComboBox3.Text)
TextBox3.Text = (ComboBox4.Text)
Else
TextBox4.Text = (ComboBox2.Text)
TextBox4.Text = (ComboBox3.Text)
TextBox4.Text = (ComboBox4.Text)
End If


実行した結果、ComboBox4のみの結果がテキストボックスに表示されてしまいました。




'変数を使った場合

If ComboBox2.Text = "1" Then
Dim st As String

st = (ComboBox3.Text),(ComboBox4.Text),(ComboBox5.Text)

textbox1.Text = st

ElseIf ~~~~~~~~~~^

こちらは「ステートメントの終わりを指定してください」と出て動作しませんでした。



以上、宜しくお願い致します。

投稿日時 - 2013-11-12 19:21:08

QNo.8344717

すぐに回答ほしいです

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

改行して表示するなら

CType(Me.Controls("TextBox" + ComboBox1.Text), TextBox).Text = _
ComboBox2.Text + vbCrLf + ComboBox3.Text + vbCrLf + ComboBox4.Text

改行せずに表示するなら

CType(Me.Controls("TextBox" + ComboBox1.Text), TextBox).Text = _
ComboBox2.Text + ComboBox3.Text + ComboBox4.Text

こんな感じですかね?
⇒If文は不要です。

投稿日時 - 2013-11-12 20:42:37

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問