|
▼ichinose さん:
ありがとうございます。うまく動きました。
とても感謝です!
>▼初歩的な質問 さん:
>こんばんは。
>
>>ユーザーフォームで配置するテキストボックスやチェックボックスで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コレクションを使ってコントロールを
>操作して下さい。
|
|