开发软体 VS.Net2003

功能说明：
当职称变动时，所属的员工也自动变更
ex1.职称为Chief Executive Officer ->员工 Philip
ex2.职称为Editor ->员工 Helen Yoshi Howard 3位

各控制项简介
ComboBox
1.cmbJoblvl
2.cmbEmp

Label
1.lblJoblvl
2.lblEmp

触发事件
1.cmbJoblvl_SelectedIndexChanged

需要的观念：
1.资料库的基本概念
2.VB.net的控制项应用及触发事件的概念
3.ADO.net的语法

'汇入 System.data 及 System.Data.SqlClient
Imports System.Data
Imports System.Data.SqlClient
'因为在此用Sqlserver，若是其他的资料库则汇入Odbc或Oledb，如下
Imports System.Data.Odbc
Imports System.Data.OleDb
'不过这个练习，不需汇入Odbc 或Oledb，因为在此用Sqlserver
Public Class frmCombobox
Inherits System.Windows.Forms.Form

#Region " Windows Form 设计工具产生的程式码 "

Public Sub New()
MyBase.New()

'此为 Windows Form 设计工具所需的呼叫。
InitializeComponent()

'在 InitializeComponent() 呼叫之后加入所有的初始设定

End Sub

'Form 覆写 Dispose 以清除元件清单。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'为 Windows Form 设计工具的必要项
Private components As System.ComponentModel.IContainer

'注意: 以下为 Windows Form 设计工具所需的程序
'您可以使用 Windows Form 设计工具进行修改。
'请勿使用程式码编辑器来修改这些程序。
Friend WithEvents lblJoblvl As System.Windows.Forms.Label
Friend WithEvents cmbEmp As System.Windows.Forms.ComboBox
Friend WithEvents lblEmp As System.Windows.Forms.Label
Friend WithEvents cmbJoblvl As System.Windows.Forms.ComboBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.lblJoblvl = New System. ..

访客只能看到部份内容，免费 加入会员 或由脸书 Google 可以看到全部内容