掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マウスを動かしていないとき、マウスカーソルを消すには？ (ID:100261)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
自フォームの上だけで良いのであれば、これで如何でしょう。 ＜隠す場合＞ Me.MousePointer = vbCustom Me.MouseIcon = [透明なカーソル] ＜戻す場合＞ Me.MousePointer = vbDefault [透明なカーソル]は、アイコンエディタ等で作成してください。 プログラムで作成するのであれば、こんな感じ。 Me.ScaleMode = vbPixels With Me.Picture1 .Visible = False .BorderStyle = 0 .Move 0, 0, 32, 32 .AutoRedraw = True .BackColor = vbBlack End With Me.ImageList1.MaskColor = vbBlack Me.ImageList1.UseMaskColor = True Dim LI As ListImage With Me.ImageList1.ListImages .Clear Set LI = .Add(Picture:=Me.Picture1.Image) End With SavePicture LI.ExtractIcon(), "C:\SAMPLE.CUR" あるいは、ShowCursor API を使うという手法もあります。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.