投稿日 | : 2003/09/04(Thu) 15:03 |
投稿者 | : 相川 |
URL | : |
タイトル | : チェックボックスの制御 |
お聞きしたいことがあります。
チェックボックスをチェックしている時としていない時で、
テキストボックスのEnabledとBackColorの制御をしています。
今は固定で値を打ち込んで動作させているのですが
もう少し汎用的にソースを書き直したいのですが
なかなかうまくいきません。
ちなみに固定で書いたソースはこんな感じです。
If chk_銀行コード.Value = vbChecked Then
''銀行&支店コード入力可
tbx_銀行コード.Enabled = True
tbx_銀行コード.BackColor = &H80000005
tbx_本支店コード.Enabled = True
tbx_本支店コード.BackColor = &H80000005
tbx_カナ銀行名.Enabled = False
tbx_カナ銀行名.BackColor = &H8000000F
tbx_カナ支店名.Enabled = False
tbx_カナ支店名.BackColor = &H8000000F
Else
''銀行&支店名入力可
tbx_銀行コード.Enabled = False
tbx_銀行コード.BackColor = &H8000000F
tbx_本支店コード.Enabled = False
tbx_本支店コード.BackColor = &H8000000F
tbx_カナ銀行名.Enabled = True
tbx_カナ銀行名.BackColor = &H80000005
tbx_カナ支店名.Enabled = True
tbx_カナ支店名.BackColor = &H80000005
End If
よい知恵があったらどなたか教えていただけないでしょうか?