Membuat Form Pada Visual Basic

Hari ini kegiatan yang saya lakukan adalah membuat atau menyalin form saya yang divisio pada visual basic. Mengenai presentasi, karena para pengujinya sedang sibuk dengan pekerjaan mereka yang sangat banyak presentasi dibatalkan dan diganti dengan membuat form pada visual basic tadi. Setelah membuat form kami diberikan suatu code untuk mengkoneksikan database yang berada di SQL server 2000 pada visual basic.
Berikut ini adalah kode yang diberikan untuk mengkoneksikannya:

Public ConnAPP As New ADODB.Connection
Private Sub main()

ConnAPP.ConnectionString = "Provider=SQLOLEDB.1;Password= (x);Persist Security Info=True;User ID=(y);Initial Catalog=administras;Data Source=(a)"
ConnAPP.CursorLocation = adUseClient
ConnAPP.Open

End Sub

Untuk keterangan bahwa:
(x) adalah password yang digunakan untuk membuka SQL Server 2000
(y) adalah nama atau id user yang anda gunakan saat di SQL Server 2000,sedangkan
(a) adalah jenis database anda bila client maka anda hanya perlu mengisikan titik (.)