form1.vb

来自「由VB编寫的人員排班系统主要模式包括（1）人員排班系统：排班處理；出勤人數；分析」· VB 代码 · 共 33 行

Option Strict Off
Option Explicit On
Friend Class Form1
	Inherits System.Windows.Forms.Form
	' All the real code is in "..\SIMPLSUM.BAS" so it can be shared by
	' the VB3, VB4, and VB5 examples.  These event handlers just call
	' the routines in SIMPLSUM.BAS.
	
	
	Private Sub Command1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command1.Click
		
		Call OptimizeButtonClickedEvent()
		
	End Sub
	
	Private Sub Command2_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command2.Click
		
		Call StopButtonClickedEvent()
		
	End Sub
	
	Private Sub Form1_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load
		
		Call FormLoadEvent()
		
	End Sub
	
	Private Sub Form1_FormClosed(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
		
		Call FormUnloadEvent()
		
	End Sub
End Class