---

フォームのスクバーを点滅させる

.NET でも、タスクバーの点滅をさせることが可能です。 この機能を使えば、簡単に、 バックグラウンドでの処理などをタスクバーで お知らせするといったことが実現します。 フォームに次の様なコードを記述します -----------VB.NETコーディングここから------------------- １．フォームに、ボタンコントロールを配置します。     下記は、デフォルトのオブジェクトの名前と配置を示しています。               ┏━━━━┓               ┃Button1 ┃               ┗━━━━┛ ２．ボタンコントロールの     Button1 text プロパティに「点滅」と記述します。 　　※説明用のためです。必須ではありません。               ┏━━━━┓               ┃ 点 滅  ┃               ┗━━━━┛ ３．フォームで右クリックして、「コードの表示」を 　　選び、コード編集画面にします。 ４．フォームの宣言部に、次のコードを記述します。     Imports System.Runtime.InteropServices ５．さらに、　Public Class Form1　内に、 　　次のコードを記述します。    '構造体の宣言     Private Structure FLASHINFO         Dim cbsize As Integer         Dim hwnd As IntPtr         Dim dwFlags As Integer         Dim uCount As Integer         Dim dwTimeout As Integer     End Structure     Const FLASH_CAPTION = &H1     Const FLASH_TRAY = &H2     Const FLASH_ALL = (FLASH_CAPTION Or FLASH_TRAY)     'APIの宣言です。WINNT4.0では使用できない     Private Declare Function FlashWindowEx Lib "user32.dll" _     (ByRef pfwi As FLASHINFO) As Integer     Private Sub Button1_Click(ByVal sender As System.Object, _     ByVal e As System.EventArgs) Handles Button1.Click         Dim flashinfo As FLASHINFO         With flashinfo             .cbsize = Marshal.SizeOf(flashinfo)             .hwnd = Me.Handle             .dwFlags = FLASH_ALL             'フラッシュの回数を指定しています             'この場合は、３回です。             .uCount = 3             .dwTimeout = 0         End With         'フラッシュします         FlashWindowEx(flashinfo)     End Sub ６．ビルドして実行します。 ７．フォームに表示された     「点滅」ボタンを押すと、タスクバーが３回点滅します。 -----------VB.NETコーディングここまで------------------- 上記をカスタマイズして、点滅回数を変更可能です。

---

---

　

Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。