次の VB6 コードを作成し、フォームにCombo1
(リストボックス) とCommand3
(ボタン) の 2 つのコントロールを作成しました。
リストからアイテムを選択するとCombo1
、文字列がフォーム スコープ変数に割り当てparam
られ、メッセージ ボックスに表示されてから閉じられます。
しかし、ボタンをクリックしCommand3
て同じparam
変数をメッセージ ボックスに表示しようとすると、値が保存されません。
これが私のコードです:
Dim param As String
Sub Form_load()
Combo1.AddItem "linux ver"
Combo1.AddItem "linux ver"
End Sub
Sub Combo1_Click()
If Combo1.ListIndex = 0 Then
param = "linux 5.1"
MsgBox param
End If
If Combo1.ListIndex = 1 Then
param = "linux 5.5"
MsgBox param
End If
End Sub
Sub Command3_Click()
MsgBox "param" & param
End Sub
私は何を間違っていますか?