Struktur perulangan atau looping merupakan salah satu alat kontrol program yang digunakan untuk mengulang suatu blok perintah sampai kondisi tertentu. Proses perulangan akan terus dilakukan secara terus menerus atau berulang-ulang selama kondisi tersebut belum terpenuhi [bernilai benar/true]. jika kondisi sudah bernilai salah/false, maka perulangan akan berhenti.
Perulangan atau Looping dalam Visual Basic terdiri dari :
- For-Next
- Do While-Loop
- Do Loop Until
Digunakan untuk mengulang perintah dalam jumlah yang ditentukan. pada for-next kita tidak perlu menuliskan kondisi yang akan yang akan di uji, tetapi cukup hanya memberikan nilai step awal dan akhir nila.
|
For variabel = nilai_awal To nilai_akhir
Perulangan yang akan terus menerus dilakukan selama kondisi memenuhi syarat [bernilai benar] dan akan berhenti jika kondisi bernilai salah.
merupakan perulangan yang metodenya kebalikan dari do-while Loop. Perulangan ini akan menjalankan suatu kondisi secara terus menerus jika kondisi bernilai salah [false] dan perulangan akan berhenti jika kondisi bernilai benar [true]
agar lebih memahami perulangan [Looping] yang telah dijelaskan, langsung saja kita praktekan secara langsung. Buatlah Project di Visual Basic .NET. Buka Visual Basic .Net > New Project > Beri nama projecnya “Perulangan” dan tunggu hingga Form1 mucul. Buatlah susunan Form dengan susunan toolbox seperti gambar di bawah ini Double Klik Pada button For Next dan telislah contoh coding seperti di bawah ini
Untuk button Do While, double klik dan tulislah contoh coding di bawah ini
selanjutnya double klik button Do Until dan tulislah contoh conding di bawah ini
Kemudian jalankan program dengan klik star atau tekan tombol F5. Contoh tampilan program |
contoh kode program perulangan:
1.Public Class Form1
Private Property txtjumlahperulangan As Object
Private Property txtjumlahpengulangan As Object
Private Sub Button1_Click[sender As Object, e As EventArgs] Handles Button1.Click Dim I As Integer LBulang.Items.Clear[] For I = 1 To 10 LBulang.Items.Add[I] Next
End Sub
Private Sub btnhasilperulangan_Click[sender As Object, e As EventArgs] Handles btnhasilperulangan.Click Dim teks As String Dim jumlah, i As Integer teks = TextBox1.Text jumlah = TextBox2.Text
Struktur perulangan atau looping merupakan salah satu alat kontrol program yang digunakan untuk mengulang suatu blok perintah sampai kondisi tertentu. Proses perulangan akan terus dilakukan secara terus menerus atau berulang-ulang selama kondisi tersebut belum terpenuhi [bernilai benar/true]. jika kondisi sudah bernilai salah/false, maka perulangan akan berhenti.
Perulangan atau Looping dalam Visual Basic terdiri dari :
- For-Next
- Do While-Loop
- Do Loop Until
Digunakan untuk mengulang perintah dalam jumlah yang ditentukan. pada for-next kita tidak perlu menuliskan kondisi yang akan yang akan di uji, tetapi cukup hanya memberikan nilai step awal dan akhir nila.
|
For variabel = nilai_awal To nilai_akhir
Perulangan yang akan terus menerus dilakukan selama kondisi memenuhi syarat [bernilai benar] dan akan berhenti jika kondisi bernilai salah.
merupakan perulangan yang metodenya kebalikan dari do-while Loop. Perulangan ini akan menjalankan suatu kondisi secara terus menerus jika kondisi bernilai salah [false] dan perulangan akan berhenti jika kondisi bernilai benar [true]
agar lebih memahami perulangan [Looping] yang telah dijelaskan, langsung saja kita praktekan secara langsung. Buatlah Project di Visual Basic .NET. Buka Visual Basic .Net > New Project > Beri nama projecnya “Perulangan” dan tunggu hingga Form1 mucul. Buatlah susunan Form dengan susunan toolbox seperti gambar di bawah ini Double Klik Pada button For Next dan telislah contoh coding seperti di bawah ini
Untuk button Do While, double klik dan tulislah contoh coding di bawah ini
selanjutnya double klik button Do Until dan tulislah contoh conding di bawah ini
Kemudian jalankan program dengan klik star atau tekan tombol F5. Contoh tampilan program |
contoh kode program perulangan:
1.Public Class Form1
Private Property txtjumlahperulangan As Object
Private Property txtjumlahpengulangan As Object
Private Sub Button1_Click[sender As Object, e As EventArgs] Handles Button1.Click Dim I As Integer LBulang.Items.Clear[] For I = 1 To 10 LBulang.Items.Add[I] Next
End Sub
Private Sub btnhasilperulangan_Click[sender As Object, e As EventArgs] Handles btnhasilperulangan.Click Dim teks As String Dim jumlah, i As Integer teks = TextBox1.Text jumlah = TextBox2.Text
For i = 1 To jumlah
Next
End Sub
End Class
MySQL telah menyediakan Driver untuk koneksi yang menghubungkan aplikasi program dengan database miliknya seperti ODBC, JDBC [Java], dan NET [connector / NET] atau lebih umum disebut mysqlconnector .Net yang khusus menghubungkan MySQL dengan paket Visual Studio. ODBC [connector / ODBC] adalah connector yang umum digunakan, universal artinya kebanyakan Database dapat di koneksikan dengan aplikasi program menggunakan ODBC
Langkah-Langkah koneksi
- New Project ->Windows Form Aplication kemudian tulis nama project anda.
- Tambahkan 1 buah button melalui toolbox ke dalam Form rubahlah properties nama button1 menjadi btnKoneksi dan text = Koneksi
- selanjutnya tambahkan MySql.Data.dll ke dalam program dengan cara klik pada menu PROJECT -> project properties [bianya dibagian paling bawah] ->Referens -> Add carilah MySql.Data.dll, jika tidak ada klik Browse… cari pada directory C:\Program Files [x86]\MySQL\MySQL Connector Net 6.9.7\Assemblies\v4.5
- Setelah menambahkan MySql.Data.dll kemudian kembali ke Form dan klik ganda pada btnKoneksi maka akan beralih ke jendelah editor.
- Import data terlebih dahulu dibagian atas Public class Imports MySql.Data.MySqlClient
- Kemudian tulislah source code berikut pada event btnKoneksi
Private Sub btnKoneksi_Click[sender As Object, e As EventArgs] Handles btnKoneksi.Click
Dim koneksi As MySqlConnection
str = “Server=localhost; user id=root; password=; database=produksi”
koneksi = New MySqlConnection[str]
If koneksi.State = ConnectionState.Closed Then
MsgBox[“Koneksi Berhasil”]
- setelah itu run program dengan menekan tombol F5 pada keyboard atau klik start pada Visual Basic
contoh :
- Objek ADO.NET ini berfungsi menyediakan antar muka pengrograman pada project kita dengan berbagai sumber data. Dengan kata lain pengolahan data pada database dilakukan melalui kode-kode ADO.NET ini, lalu ditampilkan pada aplikasi kita.
- OLEbConnection Merupakan suatu program yang berfungsi mengkoneksikan ke database dan memberikan informasi – informasi data. Cara Menggunakan nya yaitu Melakukan Koneksi ke Sumber Data.
- Misalnya OleDbConnection pada komponen ADO.net.
- OleDbCommand adalah suatu program yang menjalankan perintah-perintah pada sumber data.
- OleDbDataReader merupakan kumpulan record-record yang diambil dari database yang berfungsi membaca data pada sumber data dengan sifat forward only dan read only.
Cara menggunakannya biasanya digunakan pada tampilan control tampilan data seperti DataGrid, GridView, dsb.
*MEMULAI MS. ACCESS* -pada halaman Ms. access, pilihlah kelompok featuring pada panel sebelah kiri -pilih blank database -beri nama database dengan ADOGaji -alamat folder bebas
-masuk ke dalam dengan view sebagai tempat merancang isi tabel
*MASUK VB.Net*
struktur for next digunakan untuk mengulang blok perintah dalam jumlah yang sudah ditentukan. pada struktur ini tidak perlu menuliskan kondisi yang akan diuji tetapi hanya menuliskan nilai awal dan akhir variabel perhitungan . nilai variabel perhitugan ini akan secara otomatis berkurang setiap kali suatu pengulangan dikerjakan.
bentuk penulisan for-next :
for =nilai awal to nilai akhir [srtep tingkat] …
next
*DO….LOOP* steatmant ini mengulang blok steatmant bila kondisi benar atau sampai kondisi menjadi benar bila tidak ada perintah keluar , steatmant ini digunakan untuk kondisi yang mempunyai nilai tidak pasti dan tidak berurutan. staetman ini menggunakan sebuah logika : => do while …. LOOP => do ….
LOOP WHILE
*STATEMANT DO…LOOP….UNTIL* statement ini akan mengerjakan pertanyaan dalam blok steatment ketika kondisi bernilai salah dan akan berhenti ketika kondisi mencapai nilai benar. => do until ….. LOOP => do ….
LOOP UNTIL
*STRUKTUR WHILE-END WHILE* digunakan untuk melakukan pengulangan terus menerus selama kondisi memenuhi syarat [bernilai true]. pengulangan ini akan berhenti jika kondisi nya tidak memenuhi syarat [bernilai false] => while [kondisi] …..ekspresi…..
end while
Struktur For-Next digunakan untuk mengulang blok perintah dalam jumlah yang sudah ditentukan. Pada struktur ini Anda tidak perlu menuliskan kondisi yang akan diuji tetapi hanya perlu menuliskan nilai awal dan akhir variabel penghitung. Nilai variabel penghitung ini akan secara otomatis bertambah atau berkurang setiap kali suatu pengulangan dikerjakan.
Bentuk penulisan dari struktur For-Next sebagai berikut :
for = nilai awal to nilai nilai akhir [step tingkat] …
next
Do…Loop
Statemen ini mengulang blok statemen bila kondisi benar atau sampai kondisi menjadi benar. Bila tidak ada perintah keluar, proses perulangan [loop] akan terus berlangsung. Statemen ini digunakan untuk kondisi yang mempunyai nilai tidak pasti dan tidak berurutan.
Statemen ini memiliki dua buah bentuk logika. => do while pertanyaan_1> … Loop => do
Loop while
Statemen Do…Loop…Until
Statemen ini akan mengerjakan pernyataan dalam blok statemen ketika kondisi bernilai salah, dan akan berhenti ketika kondisi mencapai nilai benar. =>> do until …
Loop
=>> do …
Loop until = 70 then\
Keterangan = “lulus”
Else nilai >=50 then
Keterangan =”lulus dengan catatan”
Else integer