nah, jika biasanya make mySQL sebagai database kali ini memakai microsoft SQL Server 2000, jadul memang, yah cuma buat nambah-nambah ilmu saja, he..he..
untuk mengkoneksikan project visual basic ke SQL Server caranya cukup mudah, cuma ganti provider doank, hampir sama dengan mySQL biasa. bisa dilihat di gambar atas.

Public conn As New ADODB.Connection 
Public strcon As String 

Sub bukakoneksi() 
   strcon = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial    Catalog=apotik;" 
If conn.State = adStateOpen Then 
  conn.Close 
  Set conn = New ADODB.Connection 
  conn.Open strcon 
  conn.CursorLocation = adUseClient 
Else 
  conn.Open strcon
  conn.CursorLocation = adUseClient
End If 
End Sub

Label:

Polimorfisme adalah Kemampuan suatu object  untuk memiliki bentuk dan wujud berbeda. atau bisa dibilang sebagai Kemampuan dari variabel referensi object yang memiliki aksi berbeda bila method yang sama dipanggil, dimana aksi method tergantung dari tipe objectnya. Ada beberapa hal yang harus dipenuhi dalam polymorphisme, seperti :



  1. Method yang dipanggil harus melalui basis class.
  2. Method yang dipanggil harus menjadi method pada basis class.
  3. Method access atribute (modifier) pada sub class tidak boleh lebih terbatas dari basis class.
Kegunaan dari polimorfisme adalah agar kita dapat mendefinisikan beberapa konstruktor atau metode dengan karakteristik yang berbeda-beda agar nantinya dapat digunakan untuk kasus-kasus yang berbeda.

Label: