Application 类

定义

public ref class Application sealed

public sealed class Application

type Application = class

Public NotInheritable Class Application

继承

Object

Application

示例

下面的代码示例列出窗体上列表框中的数字。 每次单击 button1时，应用程序都会向列表中添加另一个数字。

方法 Main 调用 Run 以启动应用程序，这将创建窗体 listBox1 和 button1。 当用户单击 button1时， button1_Click 方法将显示 。MessageBox 如果用户单击 No ， MessageBox该方法会将 button1_Click 一个数字添加到列表中。 如果用户单击 Yes，应用程序将调用 Exit 以处理队列中的所有剩余消息，然后退出。

public ref class Form1: public System::Windows::Forms::Form
{
private:
   Button^ button1;
   ListBox^ listBox1;

public:
   Form1()
   {
      button1 = gcnew Button;
      button1->Left = 200;
      button1->Text =  "Exit";
      button1->Click += gcnew EventHandler( this, &Form1::button1_Click );
      listBox1 = gcnew ListBox;
      this->Controls->Add( button1 );
      this->Controls->Add( listBox1 );
   }

private:
   void Form1::button1_Click( Object^ /*sender*/, EventArgs^ /*e*/ )
   {
      int count = 1;
      
      // Check to see whether the user wants to exit 
      // the application. If not, add a number to the list box.
      while ( MessageBox::Show(  "Exit application?",  "", MessageBoxButtons::YesNo ) == ::DialogResult::No )
      {
         listBox1->Items->Add( count );
         count += 1;
      }

      
      // The user wants to exit the application. 
      // Close everything down.
      Application::Exit();
   }

};

int main()
{
   
   // Starts the application.
   Application::Run( gcnew Form1 );
}

public class Form1 : Form
{
    [STAThread]
    public static void Main()
    {
        // Start the application.
        Application.Run(new Form1());
    }

    private Button button1;
    private ListBox listBox1;

    public Form1()
    {
        button1 = new Button();
        button1.Left = 200;
        button1.Text = "Exit";
        button1.Click += new EventHandler(button1_Click);

        listBox1 = new ListBox();
        this.Controls.Add(button1);
        this.Controls.Add(listBox1);
    }

    private void button1_Click(object sender, System.EventArgs e)
    {
        int count = 1;
        // Check to see whether the user wants to exit the application.
        // If not, add a number to the list box.
        while (MessageBox.Show("Exit application?", "",
            MessageBoxButtons.YesNo)==DialogResult.No)
        {
            listBox1.Items.Add(count);
            count += 1;
        }

        // The user wants to exit the application.
        // Close everything down.
        Application.Exit();
    }
}

Public Class Form1 
    Inherits Form

    <STAThread()> _
     Shared Sub Main()
        ' Start the application.
        Application.Run(New Form1)
    End Sub

    Private WithEvents button1 As Button
    Private WithEvents listBox1 As ListBox

    Public Sub New()
        button1 = New Button
        button1.Left = 200
        button1.Text = "Exit"

        listBox1 = New ListBox
        Me.Controls.Add(button1)
        Me.Controls.Add(listBox1)
    End Sub

    Private Sub button1_Click(ByVal sender As Object, _
        ByVal e As System.EventArgs) Handles button1.Click
        Dim count As Integer = 1
        ' Check to see whether the user wants to exit the application.
        ' If not, add a number to the list box.
        While (MessageBox.Show("Exit application?", "", _
            MessageBoxButtons.YesNo) = DialogResult.No)

            listBox1.Items.Add(count)
            count += 1

        End While

        ' The user wants to exit the application. 
        ' Close everything down.
        Application.Exit()
    End Sub

End Class

注解

类 Application 具有启动和停止应用程序和线程以及处理 Windows 消息的方法，如下所示：

• Run 在当前线程上启动应用程序消息循环，并选择性地使窗体可见。

• Exit 或 ExitThread 停止消息循环。

• DoEvents 在程序循环时处理消息。

• AddMessageFilter 将消息筛选器添加到应用程序消息泵以监视 Windows 消息。

• IMessageFilter 允许在调用事件处理程序之前停止引发事件或执行特殊操作。

此类具有 CurrentCulture 和 CurrentInputLanguage 属性，用于获取或设置当前线程的区域性信息。

无法创建此类的实例。

属性

方法

事件

适用于