none
Msgbox 控件能不能用代码实现延时后再消失 RRS feed

答案

  • 这样试试:

    Imports System.Threading
    Public Class Form1
        Inherits System.Windows.Forms.Form

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2()
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class
    周雪峰
    2009年3月6日 13:19
    版主
  • 周雪峰 说:

    这样试试:

    Imports System.Threading
    Public Class Form1
        Inherits System.Windows.Forms.Form

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2()
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class
    周雪峰



     谢谢
    visual studio 2008
    • 已标记为答案 liunain021 2009年3月7日 1:16
    2009年3月7日 1:15

全部回复

  • msgbox 不可以 
    可以考虑自己写一个form  自己10s后消失


    就算首页不能显示30天内排行榜 回答总数也快接近top10了 5555
    努力奋斗 重回首页排行榜!!! 55555
    有原则的回答问题: 不懂的不去装懂,别人回答得很完整的,没有需要补充的不去蹭分。
    2009年3月3日 9:01
  • 可不可以写给我看看
    visual studio 2008
    2009年3月3日 9:36
  •  这样写试试:
                Form2 form2 = new Form2();
                form2.Show();
                form2.Update();
                Thread.Sleep(10000);
                form2.Close();

    周雪峰
    2009年3月3日 13:01
    版主
  • 上面是C#,这个是VB.NET写的
     Dim form2 As New Form2()
    form2.Show()
    form2.Update()
    Thread.Sleep(10000)
    form2.Close()

     
    周雪峰
    2009年3月3日 13:10
    版主
  • 周雪峰 说:

    上面是C#,这个是VB.NET写的
     Dim form2 As New Form2()
    form2.Show()
    form2.Update()
    Thread.Sleep(10000)
    form2.Close()

     
    周雪峰


        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form
            form2.Show()
            form2.Update()
            form2.Sleep(10000)
            form2.Close()
        End Sub

    form2.Sleep(10000)有问题,sleep不时Form的成员;
    另外只能是Dim form2 As New Form,不能输入成Dim form2 As New Form()

    visual studio 2008
    2009年3月3日 13:22
  • 我写的是Thread.Sleep(10000)
    你怎么写的是form2.Sleep(10000)啊!那样当然不行了! 

    周雪峰
    2009年3月4日 7:10
    版主
  • 周雪峰 说:

    我写的是Thread.Sleep(10000)
    你怎么写的是form2.Sleep(10000)啊!那样当然不行了! 


    周雪峰



     Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class

    不好意思,是这样吗?没走通啊。我的事vb2003
    visual studio 2003
    2009年3月4日 8:08
  • 首先,请检查你是否添加了Form2窗体!
    其次,请检查是否添加了System.Threading命名空间!
    如果都不是的话,请将编译器错误告诉我,我们再讨论啊! 

    周雪峰
    2009年3月4日 8:49
    版主


  • 这个非常好,虽然我不懂C++.


    有没有人弄过VB.ET的


    visual studio 2008
    2009年3月4日 9:04
  •  有没有vb.net的例子啊?
    visual studio 2008
    2009年3月5日 14:45
  • 周雪峰 说:

    我写的是Thread.Sleep(10000)
    你怎么写的是form2.Sleep(10000)啊!那样当然不行了! 


    周雪峰



    不好意思,回复晚了。是不是下面,这样弄?Form2已经添加。

    System.Threading
    Public Class Form1
        Inherits System.Windows.Forms.Form

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class
    System.Threading和Thread.Sleep(10000)都有问题。System需要声明,Thread未声明
    只能是Dim form2 As New Form2
    不能是Dim form2 As New Form2()

    我要做的是Msgbox控件能不能延时后消失,跟form 没有关系吧?


    visual studio 2008
    2009年3月5日 15:01
  • 这个控件不能延后消失,只有用form模拟! 
    周雪峰
    2009年3月6日 6:59
    版主
  • 命名空间需要用imports关键字 
    周雪峰
    2009年3月6日 7:05
    版主
  • 周雪峰 说:

    命名空间需要用imports关键字 


    周雪峰



    Imports.System.Threading 有问题

    Thread.Sleep(10000)  有问题

    不好意思,还是不行
    你成功了就贴个代码给我看看
    visual studio 2008
    2009年3月6日 9:04
  • 这样试试:

    Imports System.Threading
    Public Class Form1
        Inherits System.Windows.Forms.Form

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2()
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class
    周雪峰
    2009年3月6日 13:19
    版主
  • 周雪峰 说:

    这样试试:

    Imports System.Threading
    Public Class Form1
        Inherits System.Windows.Forms.Form

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim form2 As New Form2()
            form2.Show()
            form2.Update()
            Thread.Sleep(10000)
            form2.Close()
        End Sub
    End Class
    周雪峰



     谢谢
    visual studio 2008
    • 已标记为答案 liunain021 2009年3月7日 1:16
    2009年3月7日 1:15