frmwincecontrols.vb

来自「Microsoft Mobile Development Handbook的代码」· VB 代码 · 共 28 行

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Drawing
Imports System.Text
Imports System.Windows.Forms

Namespace CodeForChapter2
  Public Partial Class frmWinCEControls
	  Inherits Form
	Public Sub New()
	  InitializeComponent()
	End Sub

	Private Sub menuItem1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles menuItem1.Click
	  notification1.Visible = True
	End Sub

	Private Sub frmWinCEControls_Closing(ByVal sender As Object, ByVal e As CancelEventArgs) Handles MyBase.Closing
	  notification1.Dispose()
	End Sub

	Private Sub notification1_ResponseSubmitted(ByVal sender As Object, ByVal e As Microsoft.WindowsCE.Forms.ResponseSubmittedEventArgs) Handles notification1.ResponseSubmitted
	  ' TODO your logic
	End Sub
  End Class
End Namespace