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 。 如果使用者按一下 NoMessageBox ，方法會將 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 屬性，可取得或設定目前線程的文化特性資訊。

您無法建立這個類別的實例。

屬性

方法

事件

適用於