Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1083 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8828】各クラスモジュール共通の定数について ぼっこ 06/11/24(金) 22:07 質問[未読]
【8830】Re:各クラスモジュール共通の定数について 飛ばない豚 06/11/25(土) 12:53 発言[未読]
【8840】Re:各クラスモジュール共通の定数について ぼっこ 06/11/28(火) 15:54 発言[未読]
【8843】Re:各クラスモジュール共通の定数について 飛ばない豚 06/11/28(火) 16:41 回答[未読]
【8846】Re:各クラスモジュール共通の定数について ぼっこ 06/11/28(火) 18:17 発言[未読]
【8848】Re:各クラスモジュール共通の定数について ぼっこ 06/11/28(火) 18:50 お礼[未読]
【8828】各クラスモジュール共通の定数について
質問  ぼっこ  - 06/11/24(金) 22:07 -
引用なし
パスワード
   各クラスモジュールで利用したい共通の定数を
標準モジュールの宣言部分に記述したのですが、
利用できません。
各クラス毎に宣言する必要があるのでしょうか？

初歩的な質問で申し訳ありません。
【8830】Re:各クラスモジュール共通の定数について
発言  飛ばない豚  - 06/11/25(土) 12:53 -
引用なし
パスワード
   ▼ぼっこ さん：

>標準モジュールの宣言部分に記述したのですが、
>利用できません。

どのように記述したのでしょうか？
【8840】Re:各クラスモジュール共通の定数について
発言  ぼっこ  - 06/11/28(火) 15:54 -
引用なし
パスワード
   ▼飛ばない豚 さん：

返信ありがとうございます。
抜粋ですが、以下のように記述しました。

初心者の為、基本がわかってないです。
よろしくお願いします。


Option Compare Database
　　
　　Const color_Gry = 12632256
　　Const color_Blk = 0
　　Const color_Red = 255

Public Function F_Login(name As String, pwd As String, Optional autho As String) As Integer
　：
　：
　：
End Function
【8843】Re:各クラスモジュール共通の定数について
回答  飛ばない豚  - 06/11/28(火) 16:41 -
引用なし
パスワード
   ▼ぼっこ さん：
>　　
> 　　Const color_Gry = 12632256
> 　　Const color_Blk = 0
> 　　Const color_Red = 255
>

Public Const color_Gry = 12632256
Public Const color_Blk = 0
Public Const color_Red = 255

としてみて下さい。
【8846】Re:各クラスモジュール共通の定数について
発言  ぼっこ  - 06/11/28(火) 18:17 -
引用なし
パスワード
   ▼飛ばない豚 さん：

やってみましたが、各クラスでこの定数を使うと
色を認識せず、全て黒(0)の表示になってしまいます。（泣）
【8848】Re:各クラスモジュール共通の定数について
お礼  ぼっこ  - 06/11/28(火) 18:50 -
引用なし
パスワード
   ▼飛ばない豚 さん：

すいません、ロジックのコーディングミスでした。
ごめんなさい。

飛ばない豚さんの記述通りで、問題ありませんでした。

ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1083 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1081095
(SS)C-BOARD v3.8 is Free