VB6 動的追加コントロールの値変更
お世話になります。VB6初心者です。
動的追加コントロールの値変更で困っています。
Form3にFrame1をコントロール配列で１つ置いています。
ループ処理でFrame1をループ分LOADし、そのフレームの上にチェックボックスを動的に追加していく処理をしています。この動的に追加したチェックボックスの値の変更ができません。
ちなみに値やキャプションの取得はできます。
どなたかご教授願います。
Private Sub Command1_Click()
Dim CHKbox(4) As VB.CheckBox
Dim i As Integer
For i = 1 To 4
Load Form3.Frame1(i)
With Form3.Frame1(i)
.Top = Form3.Frame1(i - 1).Top + 450
.Visible = True
.Caption = "フレーム" & i
End With
Set CHKbox(i) = Controls.Add("VB.Checkbox", "CHKbox" & i, Form3.Frame1(i))
With CHKbox(i)
.Move 2000, 200, 1300, 180
.Visible = True
.Caption = "チェック" & i
End With
Next
MsgBox CHKbox(1).Value ｀値の取得は可能ですが
CHKbox(1).Value = True ｀値の変更ができません
End Sub
お礼
回答ありがとうございました Panelにはタイトル的な文字が入れられず困っていましたが GroupBoxはTextのプロパティがあり、希望通りに作成できました。