ab.com コミュニティ

てふろん

またまた、てふろんです。
まぁ、私の言ってることは揚げ足とりなので、あんまり気にしないで下さい。

Char → Long の上位変換を論理演算で表現しようとするとこんな感じなのかな？

Dim a As Long
Dim b As Char
b = -2
a = &HFFFFFFFF Xor Not b

*追記
上でいけるかと思いましたが、
Not b の結果がLong型になってないと成立しない計算ですね。

テストでは成功したので、書きこみしたのですが、
Not b の結果はChar型なんだけど、それをまた上位変換させてるだけですね。
なんかお馬鹿な書きこみしてすみませんでした。

てふろん

こんにちは、てふろんです。もともとの質問とは違いますが、ちょっと気になったのでレスします。全文引用だと長いので一部だけ取り出しての引用にさせていただきました。 > 前から思ってたんですけど、結局入るデータは変わらないんですよね？As演算子使っても。 > というか型変換ってビット演算で出来てるんでしょうかね。 As演算子と論理演算子では結果は違うと思いますよ。 Dim a As Long a = ( -1 As Byte ) a = ( -1 As Char ) 上はたしかに&HFFを論理積した値と同じになりますが、下はリテラル値と同じ-1を指しています。 Byteにおける&...

てふろん

こんにちは、てふろんです。 RealChildWindowFromPoint の第二引数は POINT構造体の値渡しかと。よって Int64 か QWord に置き換えてあげる必要があるような気がします。 > Dim fnRealWndFromPoint As *Function(ByVal hwndParent As HWND,ptParentClientCoords As QWord) As HWND このように関数ポインタを定義し、 > Dim uHitTest As Qword > uHitTest = ptHitTest.x or ( ptHitTest.y << 32 ) > ...

ab.com コミュニティ

検索結果 3 件

Re: コンボボックスの編集で苦戦しています

Re: コンボボックスの編集で苦戦しています