none
请教,在状态栏“绘文字”失败 RRS feed

  • 问题

  • 在formLoad事件中添加代码:

    Code Snippet

    '在状态栏上绘文字
       Dim strGra As Graphics = Me.sbrMyStatusStrip.CreateGraphics
       strGra.DrawString("No Image loaded.", Me.Font, Brushes.Black, 0, 0)

     

    程序运行后,状态栏没有文字,将状态栏的背景图片取消也一样

     

     

    2008年2月12日 0:23

答案

  • Code Snippet

     

    Private Sub sbrMyStatusStrip_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles sbrMyStatusStrip.Paint
            Dim strGra As Graphics = e.Graphics
            strGra.DrawString("No Image loaded.", Me.Font, Brushes.Black, 0, 0)
        End Sub

     

     

     

    2008年2月12日 1:03
    版主

全部回复

  • Code Snippet

     

    Private Sub sbrMyStatusStrip_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles sbrMyStatusStrip.Paint
            Dim strGra As Graphics = e.Graphics
            strGra.DrawString("No Image loaded.", Me.Font, Brushes.Black, 0, 0)
        End Sub

     

     

     

    2008年2月12日 1:03
    版主
  • 原来如此,谢谢前辈 >_<

    还有,这段代码的位置太疯狂了

     

    我原来以为只有窗体才有paint事件(参考书只讲了窗体paint),原来StatusBar也有(鄙视我的无知吧)

     

     

    2008年2月12日 8:07