VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 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

よい知恵があったらどなたか教えていただけないでしょうか?


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -