HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS


VB.NET 2003の開発でお困りのことはありませんか?
そんな悩みは当サイトで解決!!

HOME > VB.NET 2003 Tips > コントロール > StatusBar Tips メニュー

05.パネルにアイコンを表示する

UPDATE:2006/06/24 

<< 前のTips  次のTips >>

 

 パネルにアイコンを表示するには、StatusBarPanelのIconプロパティを使用します。

 
サンプル
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim stbPnl1 As New StatusBarPanel
    Dim stbPnl2 As New StatusBarPanel
    Dim stbPnl3 As New StatusBarPanel

    '各パネルに表示するテキストを指定
    stbPnl1.Text = "ここにメッセージを表示"
    stbPnl2.Text = "ホスト名:" & System.Net.Dns.GetHostName
    stbPnl3.Text = DateTime.Now.ToShortDateString

    'パネルにアイコンを表示(引数にはアイコンのあるパスを正しく設定してください)
    Dim ico As New System.Drawing.Icon("App.ico")
    stbPnl1.Icon = ico

    'ステータスバーにパネルを追加
    StatusBar1.Panels.Add(stbPnl1)
    StatusBar1.Panels.Add(stbPnl2)
    StatusBar1.Panels.Add(stbPnl3)

    'パネルを表示する
    StatusBar1.ShowPanels = True
End Sub

 

<< 前のTips  次のTips >>