
No.4ベストアンサー
- 回答日時:
またまた登場、onlyromです。
>duble型と宣言しているのに、また#付きとは。
>この場合は#なくても同じということに・・・?
そうです、#はなくてもいいです。
先の回答の
Const K As Double = 5000# '#はあっても無くてもいい
と同じことです。
要するに
■値を代入するだけ■なら、#はあってもなくてもいいわけですが、
先の回答の例のように計算に使ってる場合は、
#があるないかが重要になってくるわけです。
また、定数をそのまま使う場合は、
定数に#を付けることで宣言部分を見なくても
左辺の変数の型がDouble型というのが分かるというメリットはあるわけですが。。
ただ、これも変数の付け方を定石どおりやれば
変数の型もその変数名を見れば一目で分かります。
先の回答のように、
整数だったら、integerの頭3桁を取り、intData
倍精度だったら、doubleですから、dblData
とすれば変数名を見ただけで変数の型は分かりますよね。
ちょとだらだらとした回答になりました。(^^;;;
少し時間が開いてしまいました。
なるほどです。。
私が見ているソースはまさに計算で使用されていますので、
また少し考えます。
それにしても質問の本文に書きましたが、
'_____________________________________
if kakudo < 0 then
if kakudo <= 1# then
kai = 180 + kakudo
else
kai = 180
end if
else
kai = 0
end if
'_____________________________________
これの式はメチャメチャですが、if文の条件はそのままなのです。
一つ目のif文だけで2つ目のif文はいらないような気がしてしまいます・・・
#が付く事で何かif文の条件が変わるのかと思っていましたが・・・
難しいですね・・・
No.5
- 回答日時:
またまたまた登場、onlyromです。
当方の回答は、そのコードが正しい云々とは関係なく、
質問のタイトルにある、「条件文にある#の意味」その一点についてです。
コードの正誤は質問者の担当?ということで敢えてそこには言及しませんでした。。。(^^;;;
では質問のコードについて。
仰るように間違ったコードですね。
実際は次のようなことだと推測されます。
一行目の
if kakudo ■< 0■ then
この、<0 は、 >0 のタイプミス(よく言えば)でしょう。
'--------------------------------------------------
If kakudo > 0 then
If kakudo <= 1 then
kai = 180 + kakudo
Else
kai = 180
End If
Else
kai = 0
End if
'----------------------------------------------
kakudoが
■0より大きくて1以下■0<kakudo<=1
・・・・kaiに、kakudo+180を代入
■1より大■1<kakudo
・・・・kaiに、180を代入
■0以下■kakudo<=0
・・・・kaiに、0を代入
尚、IF文でも、#はあってもなくても可です。
それにしても
>#が付く事で何かif文の条件が変わるのかと思っていましたが
ここが質問の要点だとは想像もしませんでした。
道理でどうも論点がずれているような、
しっくりこないような気がしてたのですが、
それが原因だったのですねぃ。(^^;;;
最後の方は私の仕事も絡んでしまいました・・
申し訳ないです。
それにしてもこれだけ親切にご教示いただいたので、
だんだんと解明できそうな気がしてきました。
長々とお付き合い頂きありがとうございました。
またすぐに壁に当たるかもですが・・・
No.3
- 回答日時:
回答2、onlyromです。
回答1さんがお忙しいようなので。。。
>ここで使用している1はdouble型ですよという意味?
そうです。
なぜ、定数に#などつけるかというと
次の例を試してみればはっきり理解できるはずです。
'-------------------------------------
Private Sub Command1_Click()
Dim intData As Integer
Dim dblData As Double
intData = 30000
dblData = intData + 5000
MsgBox dblData
End Sub
'-------------------------------------
上記では定数5000に、#が付いてないので
dblData = intData + 5000
ここで、オーバーフローのエラーになります。
なぜなら、intDataも5000も整数ですから
計算結果35000は整数の上限32767を超えるからです
で、それを避けるために5000に#を付けDoubleにすると
計算結果はDobuleの範囲内ということで上手くいくわけです。
ただ、コード内に定数を直接使うことはあまりないと思われます。
上記のようなことに常に注意しないといけないからです。
で、どうするかというと
'-------------------------------------------
Private Sub Command1_Click()
Dim intData As Integer
Dim dblData As Double
Const K As Double = 5000# '#はあっても無くてもいい
intData = 30000
dblData = intData + K
MsgBox dblData
End Sub
'-------------------------------------------
と定数5000を予めDoubleの変数に入れておき、
計算などのときはその変数を使うのが普通です。
この回答への補足
早速の回答感謝です。
しかも例があって分かりやすいこと!
理解できてきました。
その後ソースを読み進んでいくと、更に謎な部分が出てきました。
'_______________________________________________
Dim Data As Double
Data = 0#
'________________________________________________
duble型と宣言しているのに、また#付きとは。
この場合は#なくても同じということに・・・?
No.2
- 回答日時:
No.1
- 回答日時:
ここで使用されている「#」は、型宣言文字です
サフィックスと称されます
なので、
1# は、 Double型の1です
VB6の型宣言文字には、他にも「!(Single)」「$(String)」等があります
ぐぐってみるのもいいでしょう
コードのほうは・・・
この回答への補足
早速の回答ありがとうございます。
すみませんもう少し御教示ください。
1というdouble型の変数を宣言したということでしょうか?
それともここで使用している1はdouble型ですよという意味・・・ 同じこと?
混乱してきました。。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
VBの質問#if 0 then ってどう言う意味?
Excel(エクセル)
-
VBAのプログラムで、DIAG = 1# / A(L, L) や R(
その他(プログラミング・Web制作)
-
VB6.0で #の意味
Visual Basic(VBA)
-
4
VBの「As String * 128」とは?
Visual Basic(VBA)
-
5
VBでグローバル変数を宣言するには
Visual Basic(VBA)
-
6
条件付きコンパイル: #IF 1 Then と #IF 0 Then
Visual Basic(VBA)
-
7
配列を関数に渡す方法
Visual Basic(VBA)
-
8
VB6.0の「vbFromUnicode」はVB.NETではどれに相当しますか?
Visual Basic(VBA)
-
9
frxファイルの役目
Visual Basic(VBA)
-
10
Chr(13)とChr(10)の違いは?
PowerPoint(パワーポイント)
-
11
VBのフォームモジュールと標準モジュールの使い分け
Visual Basic(VBA)
-
12
Form_Load と Form_Activate のタイミング
Visual Basic(VBA)
-
13
VB6とVB.NETでNullの扱いが違う?
Visual Basic(VBA)
-
14
モーダルフォームとモードレスフォーム
Visual Basic(VBA)
-
15
VB6で、長い時間かかる処理実行中の表示の工夫について
Visual Basic(VBA)
-
16
VBでファイルが開かれているかどうかを確認したい
Visual Basic(VBA)
-
17
VBプログラムの終了
Visual Basic(VBA)
-
18
3次元配列の記述
Visual Basic(VBA)
-
19
OCXって何ですか?
Visual Basic(VBA)
-
20
モジュールとクラスの違いってなんなんですか?
Visual Basic(VBA)
関連するQ&A
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
VBA 計算式
-
5
EXCEL/VBA 変数の値をクリップ...
-
6
i++と++i ってどう違うのですか?
-
7
int→unsigned int キャスト
-
8
インクリメント演算子の前置(+...
-
9
コマンドプロンプト バッチ|結...
-
10
VB6.0での条件文にある#の意味
-
11
VB.net
-
12
変数
-
13
jsp~jspにhiddenを使って変数...
-
14
【VBA】複合代入演算子
-
15
processing エラーで、 "cannot...
-
16
「%」を使って、偶数か奇数かを...
-
17
javaのObject型配列について
-
18
JavaScript言語のことで・・
-
19
2進数→10進数への変換 また...
-
20
Excel VBAでイコール二回使えま...
おすすめ情報