Koneksi String VB.NET 2010

Sebelum membuat koneksi string ke database buat project VB.NET 2010 terlebih dahulu di link Membuat Project Baru di VB.NET 2010. Setelah membuat project buat form seperti gambar di bawah ini

 

Setelah membuat form seperti gambar di atas ketikkan kode seperti berikut :

Imports System.Data.SqlClient
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connectionString As String
        Dim cnn As SqlConnection
        connectionString = "Data Source=.;Initial Catalog=Applications_test;User ID=sa;Password="
        cnn = New SqlConnection(connectionString)
        Try
            cnn.Open()
            MsgBox("Connection Open ! ")
            cnn.Close()
        Catch ex As Exception
            MsgBox("Can not open connection ! ")
        End Try
    End Sub
End Class

Setelah selesai menambahkan kode di atas jalankan project dengan cara klik tombol RUN, apabila muncul kotak dialog Connection Open! seperti gambar dibawah ini berarti sukses.

Posted in: Visual Basic .Net 2010