コンボボックス中の語句のリンク

質問

最近、Visual Basicを必要性に駆られ初心者ですが作成しています。

フォームを作りコンボボックス等を配置したとこまでは良かったのですが、やはり行き詰ってしまいました。

質問は、コンボボックスで選んだ物をラベルかテキストボックスにリンクというか反映させるにはどうすればいいのでしょうか？

Dim St As String
自分なりに、Sｔに代入させるのかと思って式を作りましたがエラーとなりました。この考え間違ってますか？

初歩の初歩的な質問ですみません。宜しくお願いします。

回答No.1

n-jun · ベストアンサー

フォーム１にテキストボックス１とコンボボックス１を配置します。

'フォーム１を開く時にコンボボックス１に値をセット
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
　　ComboBox1.Items.Add("みかん")
　　ComboBox1.Items.Add("りんご")
　　ComboBox1.Items.Add("すいか")
End Sub

'コンボボックス１で値を選択するとテキストボックス１に表示される
Private Sub ComboBox1_SelectedValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedValueChanged
　　TextBox1.Text = ComboBox1.Text
End Sub

こんなのでもそれっぽく出来ます。
あとはエラーの起きるコードを提示した方が、具体的な回答も得られるかと。