投稿日	： 2003/03/30(Sun) 20:57
投稿者	： 花ちゃん
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^2: 実行画面を(一部コード訂正）

   Call keybd_event(VK_SNAPSHOT, 1, 0, 0)
   キーを押したら
　 次の解放の処理を必ずして下さい。（押したままになっています）
   Call keybd_event(VK_SNAPSHOT, 1, KEYEVENTF_KEYUP, 0)

   VBでは変数名等にあまり漢字は使わない方がいいかと思います。

投稿中の下記コードに誤りがありました。訂正します。
　　誤り
　　'スクリーン全体をクリップボードにコピー
    Call keybd_event(VK_SNAPSHOT, 0, 0, 0)
    Call keybd_event(VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0)
　　正解
　　'スクリーン全体をクリップボードにコピー
    Call keybd_event(VK_SNAPSHOT, 1, 0, 0)
    Call keybd_event(VK_SNAPSHOT, 1, KEYEVENTF_KEYUP, 0)

  又、ピクチャボックスをかえさずに直接クリップボードから保存できるようです。

    MyFileName = App.Path & "\" & Format$(Now, "yymmddhhmmss") & ".BMP"
    '表示データーをビットマップ形式のデーターで保存
    Set PicData = Clipboard.GetData
    Call SavePicture(PicData, MyFileName)
　

★ - 実行画面をファイルに保存 - ＨＢ 03/30-15:55No.3317
• Re: 実行画面をファイルに保存 - 花ちゃん 03/30-16:34 No.3318
• Re: 実行画面を保存(簡単なサンプル） - 花ちゃん 03/30-17:13 No.3319
  • Re^2: 実行画面を保存(簡単なサンプル） - Starfish 04/01-00:57 No.3342
    • Re^3: 実行画面を保存(簡単なサンプル） - 花ちゃん 04/01-02:19 No.3345
• Re: 実行画面を・・・（完成しました(^^) - ＨＢ 03/30-20:33 No.3325
  • Re^2: 実行画面を(一部コード訂正） - 花ちゃん 03/30-20:57 No.3326
  • Re^2: 実行画面を・・・（完成しました(^^) - Starfish 03/31-00:18 No.3327
    • Re^3: 実行画面を・・・（完成しました(^^) - 花ちゃん 03/31-15:33 No.3332
    • Re^3: 実行画面を・・・（完成しました(^^) - ＨＢ 03/31-21:06 No.3337
      • Re^4: 実行画面を・・・（完成しました(^^) - 花ちゃん 03/31-21:43 No.3339
        • Re^5: 実行画面を・・・（完成しました(^^) - Starfish 04/01-01:04 No.3343
          • Re^6: 実行画面を・・・（完成しました(^^) - 花ちゃん 04/01-01:46 No.3344
            • Re^7: 実行画面を・・・（完成しました(^^) - ＨＢ 04/01-10:35 No.3347