如何再次从我的表单中显示消失的图标?

时间:2013-06-27 09:03:37

标签: vb.net icons

我在表单加载事件中使用此代码进行表单显示但在表单的表单加载图标消失后我想显示我的图标请帮助我 这是代码:

Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None 'Turning off border
Me.SetBounds(meleft, metop, Me.Width, MinimumSize.Height) 'setting the loaction and the size of the  form

    For i As Integer = 0 To meheight Step 20
        If (Me.Height < meheight) Then
            Me.Top = Me.Top - 20
            Me.Height = Me.Height + 20

            Me.Refresh()

            For FadeCount = 40 To 40 Step 20
                Me.Opacity = FadeCount / 100

                Threading.Thread.Sleep(10)
            Next
        Else
            Exit For
        End If
    Next

    Me.Height = meheight
    Me.Top = (msize(1, 1) - Me.Height) / 2 + msize(1, 3)
    Me.Opacity = 99
    Me.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle

2 个答案:

答案 0 :(得分:0)

在您宣布的代码开头:

Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None

这使得您的边框/图标不可见。

答案 1 :(得分:0)

在Form1属性中 - &gt;窗口样式:设置ControlBox = True。