frmadmin.vb

来自「Online Telephone Directory in Visual Bas」· VB 代码 · 共 27 行

Option Strict Off
Option Explicit On
Friend Class Form3
	Inherits System.Windows.Forms.Form
	Private Sub Label1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Label1.Click
		Form4.Show()
	End Sub
	
	Private Sub Label10_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Label10.Click
		Form16.Show()
	End Sub
	
	Private Sub Label12_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Label12.Click
		Me.Close()
		Form1.Show()
	End Sub
	
	Private Sub Label4_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Label4.Click
		
		Form10.Show()
	End Sub
	
	Private Sub Label7_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Label7.Click
		
		Form14.Show()
	End Sub
End Class