VB初心者友の会 - 超初心者専用Q&A掲示板過去ログ

> a="FFFFFFFF"として
> 
> '必ず先頭に"0"付ける→ 0FFFFFFFF
> a = "0" & a
> n = CDbl("&h" & a)
> だと nに−１が入ってしまいます。

んー、というか、ＦＦＦＦＦＦＦＦは−１だからこれで正常です（＾＾；）


> #−１を回避するためにわざと先頭に０を付けたのですが
> −１を出さないためにはどうすればよいでしょうか？

debug.Print &hFFFFFFFF& and &h0000FFFF&

を実行してみましょう。

>> a="FFFFFFFF"として
>> 
>> '必ず先頭に"0"付ける→ 0FFFFFFFF
>> a = "0" & a
>> n = CDbl("&h" & a)

>debug.Print &hFFFFFFFF& and &h0000FFFF&

いままで aをLongまたはDouble（先頭に０をつけるため）
に変換してから ANDをしていました。
直接 &hをつけて ANDができるということですね？

n値は 最後に必ずLongかDoubleに変換しなきゃ
だめだったのですが（そのあと比較があるため）
どうやら仕様変更になりそうです。
ホトト。

ぼのさんありがとうございました。_(._.)_

> >debug.Print &hFFFFFFFF& and &h0000FFFF&
> いままで aをLongまたはDouble（先頭に０をつけるため）
> に変換してから ANDをしていました。
> 直接 &hをつけて ANDができるということですね？

最後に＆が有るか無いかでも結果は変わります（＾＾；）

 &hFFFFFFFF& and &h0000FFFF&　→　６５５３５
 &hFFFFFFFF  and &h0000FFFF 　→　−１

ご注意あれ。

おはようございます。

> 最後に＆が有るか無いかでも結果は変わります（＾＾；）
>  &hFFFFFFFF& and &h0000FFFF&　→　６５５３５
>  &hFFFFFFFF  and &h0000FFFF 　→　−１

ヘルプで探しましたが、キーワード検索できませんでした。
申し訳有りませんがご説明いただけませんでしょうか？(T_T)

> おはようございます。
> 
> > 最後に＆が有るか無いかでも結果は変わります（＾＾；）
> >  &hFFFFFFFF& and &h0000FFFF&　→　６５５３５
> >  &hFFFFFFFF  and &h0000FFFF 　→　−１
> 
> ヘルプで探しましたが、キーワード検索できませんでした。
> 申し訳有りませんがご説明いただけませんでしょうか？(T_T)


後ろの&は型宣言文字です。
十六進数標記での省略した場合、８桁以下は整数型と見なされます。

&hFFFFFFFF&   → 長整数型(Long) → 65536
&hFFFFFFFF    → 整数型(Integer) → -1


蛇足ですが、その他に
% 整数型
@ 通貨型
$ 文字列型
! 単精度浮動小数点数型
# 倍精度浮動小数点数型
となっています。

またまたおはようございます。

> > > 最後に＆が有るか無いかでも結果は変わります（＾＾；）
> > >  &hFFFFFFFF& and &h0000FFFF&　→　６５５３５
> > >  &hFFFFFFFF  and &h0000FFFF 　→　−１
> 後ろの&は型宣言文字です。
> 十六進数標記での省略した場合、８桁以下は整数型と見なされます。
ありがとうございます。知りませんでした(^^ゞ

> &hFFFFFFFF&   → 長整数型(Long) → 65536
> &hFFFFFFFF    → 整数型(Integer) → -1
なるほど・・・・非常にわかりやすいです。

で・・・・ 今はなんとかその標記はわかったのですが、
構文エラー（型が違います）とでてしまいます。

a Aｓ String
n As Long

aはStringで "FFFFFFFF"と入ってるとします。
これを 上の4桁を消すために nに代入して
AND FFFFをしたいのですが・・・・・

とにかく &hFFFFFFFF&   をですね・・・
FFFFFFFFは aというStringに入ってるときの書き方がわかりませんっ。
こんぐらいは自分でわかると思ってたんですけど、、、1日たった今でもわかりません、(T_T)
#説明がへたくそですいません。

これでいけると思います。
n = CLng("&h" & a)

ちなみに、CLngで明示的にLong型に変更しているので型指定文字はいりません。

> これでいけると思います。
> n = CLng("&h" & a)
わかりました。ありがとうございます。

> ちなみに、CLngで明示的にLong型に変更しているので型指定文字はいりません。
・・・・・うむむ。

質問を変えますです。

a As String
b As String
n As Long

aには FFFFFFFFの文字列が入っています。
bには FFFFの文字列が入っています。

aの上４ケタを消したい場合は、
aに bの値の ANDをしてあげたいのです。
ＡＮＤして出た答えは さらに aに入れてあげます。

どうすればいいのでしょうか・・・・
と質問したいところですが、ちょっとがんばって考えてますが

 わからない所は
１, n = CLng("&h" & a) And CLng("&h" & a)はエラー

2.
> &hFFFFFFFF&   → 長整数型(Long) → 65536
> &hFFFFFFFF    → 整数型(Integer) → -1
では aを−１にしないための構文がわからない

なんでもスイマセン。
よろしくお願いいたします。

> 
> > これでいけると思います。
> > n = CLng("&h" & a)
> わかりました。ありがとうございます。
> 
> > ちなみに、CLngで明示的にLong型に変更しているので型指定文字はいりません。
> ・・・・・うむむ。
> 
> 質問を変えますです。
> 
> a As String
> b As String
> n As Long
> 
> aには FFFFFFFFの文字列が入っています。
> bには FFFFの文字列が入っています。
> 
> aの上４ケタを消したい場合は、
> aに bの値の ANDをしてあげたいのです。
> ＡＮＤして出た答えは さらに aに入れてあげます。
> 
> どうすればいいのでしょうか・・・・
> と質問したいところですが、ちょっとがんばって考えてますが
> 
>  わからない所は
> １, n = CLng("&h" & a) And CLng("&h" & a)はエラー
> 
> 2.
> > &hFFFFFFFF&   → 長整数型(Long) → 65536
> > &hFFFFFFFF    → 整数型(Integer) → -1
> では aを−１にしないための構文がわからない
> 
> なんでもスイマセン。
> よろしくお願いいたします。
> 


ちゃはは、よく見たら F が８個並んでいるのね？御免なさい勘違いしていました。
&hFFFFFFFF は長整数型(Long)で -1 です。

整数型(Integer)は &h0〜&hFFFF でした。
御免なさい。m(__)m

> 
> ちゃはは、よく見たら F が８個並んでいるのね？御免なさい勘違いしていました。
> &hFFFFFFFF は長整数型(Long)で -1 です。
> 
> 整数型(Integer)は &h0〜&hFFFF でした。
> 御免なさい。m(__)m

いえいえ わたしもよくみてませんでした
ごめんなさいっす。

でもいまだによくわかりません。
FFFFFFFFを ＆FFFFした結果はどうだせばいいのでしょ？？(T_T)

> 
> ちゃはは、よく見たら F が８個並んでいるのね？御免なさい勘違いしていました。
> &hFFFFFFFF は長整数型(Long)で -1 です。
> 
> 整数型(Integer)は &h0〜&hFFFF でした。
> 御免なさい。m(__)m

いえいえ わたしもよくみてませんでした
ごめんなさいっす。

でもいまだによくわかりません。
FFFFFFFFを ＆FFFFした結果はどうだせばいいのでしょ？？(T_T)

> でもいまだによくわかりません。
> FFFFFFFFを ＆FFFFした結果はどうだせばいいのでしょ？？(T_T)
Debug.Print Hex(CLng("&hFFFFFFFF") And CLng("&hFFFF"))

Hex関数で16進数に変換してあげればいいと思いますよ。

えと・・・
> Hex関数で16進数に変換してあげればいいと思いますよ。
ありがとうございます。
解決いたしました。

結果は
n As Variant： a As String
a="FFFF"
n="FFFFFFFF"
結果をまたnに代入してあげたかったので・・・

n = CStr(Hex(CLng("&h" & n) And CLng("&h" & a)))
でnは"FFFF"になりました。
#Variantでよかったのかな？とちょっと不安ですが。

お騒がせしてスミマセン。

今、一番元の質問を見てみたのですが・・・(^^;)
もしかして、下4桁を取りたいだけであれば、これじゃだめなんでしょうか？(^^;)
strRet = Right$("0000" & s,4)

> n = CStr(Hex(CLng("&h" & n) And CLng("&h" & a)))
> でnは"FFFF"になりました。
> #Variantでよかったのかな？とちょっと不安ですが。
CStrで文字型にしてるわけですから、String型でかまわないと思いますよ。

# ってゆーか、Hex$を使えばわざわざCStrで型変換する必要もない(^^;;