開發軟體 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 可以看到全部內容