Excel VBA質問箱 IV

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

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


10535 / 76734 ←次へ | 前へ→

【71745】Re:Ptrsafeについて
発言  UO3  - 12/4/5(木) 13:27 -

引用なし
パスワード
   ▼亜矢 さん:

私は64ビットではないので、実際に確かめるスベはないのですが
赤く光ったものは
Private Declare Ptrsafe Function・・・
ですよね。

で、この PtrSafe というキーワードは、64ビットPCには定義されているわけですが
32ビットPCには定義されていないのでは?

ですけど、とおりすぎさんがおっしゃるとおりなんですよ。
このコードを打ち込んだ32ビットマシーンで実行する時には、赤く光った
コードは、実際には生成されませんから。

実際に生成される Private Declare Function・・・のほうで実行されますので問題はありません。
ただし、もし実行されるなら ということですよ。
Private Declare Function・・・そのものに間違いがあれば別。

手元の32ビットPCで以下のコードを書いてみました。
当然、コードは赤く光るのですが、そのコードは実行時には生成されていませんので
実行すれば、ちゃんとメッセージが表示されます。

Sub Test()
#If Win32 Then
  MsgBox "Goos Day!"
#Else
  Declare PtrSafe Function ありえないAPI()
#End If
End Sub

9 hits

【71737】Ptrsafeについて 亜矢 12/4/4(水) 19:51 質問
【71738】Re:Ptrsafeについて とおりすぎ 12/4/4(水) 22:35 回答
【71739】Re:Ptrsafeについて 亜矢 12/4/5(木) 4:36 質問
【71740】Re:Ptrsafeについて UO3 12/4/5(木) 5:42 発言
【71741】Re:Ptrsafeについて 亜矢 12/4/5(木) 8:09 質問
【71742】Re:Ptrsafeについて とおりすぎ 12/4/5(木) 9:11 回答
【71745】Re:Ptrsafeについて UO3 12/4/5(木) 13:27 発言
【71748】Re:Ptrsafeについて 亜矢 12/4/5(木) 15:42 お礼
【71815】Re:Ptrsafeについて 亜矢 12/4/11(水) 17:17 お礼

10535 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free