|
▼初歩的な質問 さん:
こんばんは。
>ユーザーフォームで配置するテキストボックスやチェックボックスでFor〜Next文を作成する際にどのようにすれでよろしいのでしょうか?
>例えば以下のような例文です。
> If TextBox1 = enpty Then
> Else
> CheckBox1 = True
> End If
> If TextBox2 = enpty Then
> Else
> CheckBox2 = True
> End If
> If TextBox3 = enpty Then
> Else
> CheckBox3 = True
>
>このような文があったとして、これをFor文を使用して以下のようにしたのですがどうもうまくいきません。
>
> Dim X As integer
> For X = 1 to 3
> If TextBoxX = enpty Then
> Else
> CheckBoxX = True
> Next X
Dim g0 As Long
For g0 = 1 To 3
If Controls("textbox" & g0).Value = "" Then
Controls("checkbox" & g0).Value = True
End If
Next g0
というようにControlsコレクションを使ってコントロールを
操作して下さい。
|
|