Program Database dan Koneksi dari SQL Server ke VB.Net 2010

1. Langkah pertama kita membuat Database. 

Buka SQL Server, bikin new database isikan tabel diantaranya : NIM, Nama, Tanggal lahir, Alamat, Jurusan dan SPP lalu simpan dgn nama tabel anda sendiri cth dbARIFDWI. Kemudian siap membuat program memakai VB 2010 dengan memanfaatkan database tersebut.
 
2. Sekarang buka VB 2010. Buat koneksi Database SQL Server dengan VB 2010. 

•   Buat Project Baru (Form) pada VB 2010.
•   Klik menu Data, pilih New Data Source atau klik tab Data Sources dibawah tab Toolbox, muncul tulisan Add New Data Source dan klik.
•   Akan muncul jendela Choose a Data Source Type, pilih Database dan klik tombol Next.
•   Muncul jendela Chosse a Database Model, pilih Dataset dan klik tombol Next.
•   Muncul jendela Chosse Your Connection dan klik tombol New Connection....
•   Muncul jendela Chosse Data Source, klik SQL Server Database File sebagai Data Source lalu klik tombol Continue.
•   Kemudian Pilih file database yg anda buat tadi cth dbARIFDWI dengan mengeklik tombol Browse... pada kotak Database File, kemudian anda klik Test Connection, jika koneksi berhasil muncul informasi berikut.

Function Return Value, Overloading Function dan Beberapa Function Bawaan

Kali ini saya akan menjelaskan ttg function" yg ada pd visual basic, mari simak penjelasan di bawah ini,

yang pertama sbg berikut,

  Function Return Value

 

Public Class Form6

Private Function fstat(ByVal ParamArray args() As Object) As Single()

// Membuat sub program dengan Function dengan variable fstat dengan parameter ByVal yang bererti melewatkan parameter secara nilai dengan tipe single yang berarti bilangannya bulat.

Dim hasil(3) As Single

// Membuat variable dengan nama hasil dengan jumlah teratas atau Ubound 3 yang bertipe data single.

Dim i As Integer

// Membuat variable dengan nama i yang bertipe data integer.

For i = 0 To UBound(args)

// Merupakan perulangan untuk i=0 sampai batas teratas dari array

_MORE_TEXT_TAG_

hasil(0) = hasil(0) + args(i)

// hasil (0) = 0 karena perulangan belum di mulai. // args(i) = nilai dari indeks array ke i

If i = 0 Then

// jika i = 0 maka lakukan sebagai berikut

hasil(1) = args(i)

// hasil 1 = nilai dari indeks ke i

hasil(2) = args(i)

// hasil 2 =nilai dari indeks ke i

End If

// Selain i=0,atau jika i bukan sama dengan 0

If hasil(1) < args(i) Then hasil(1) = args(i)

// Jika hasil 1 lebih kecil dari nilai i maka hasil 1= nilai dai indeks ke i

If hasil(1) > args(i) Then hasil(1) = args(i)

// Jika hasil 2 lebih kecil dari nilai i maka hasil 2= nilai dai indeks ke i

Next i

Return hasil

// Akan kembali ke hasil

End Function

End Class

Tugas 7 (MENU,TOOLBAR,& MDI FORM)

Kali ini saya akan membahas tentang :

1. Membuat form MDI minimal 4 form anak 

Berikut tampilannya,

Untuk memanggil 4 form anak tsb ini source kodenya,