Pemrograman Database

1. Pemrograman Database NyimasArtina, S.Kom, M.Si

2. STRUKTUR PROGRAM VISUAL BASIC .NET • Sebagaibahasa yang telahdirancangkembalidariawal, suatu program Visual Basic • memilikiurutanberikut yang merupakanstrukturdari program: • Option statements • PerintahOption akanmenentukanaturandasarpenanganankodedalam program padasaatkompilasi. Perintah Option terdiridari : • Option Explicit On/Off, menentukanapakahvariabel-varibel yang digunakandalam program harusdideklarasikanterlebihdahuluatautidak (defaultnyaadalah On). • Contoh: • Option Explicit Off • Module Modmain • Sub Main() • a = 100000 • End Sub • End Module • Yang jikadikompilasitidakmenyebabkankesalahanwalaupunvariabel a tidakpernahdideklarasikan. • Option Explicit On • Module Modmain • Sub Main() • a = 100000 • End Sub • End Module • Yang jika dikompilasi akan menyebabkan kesalahan karena variabel a tidak dideklarasikan terlebih dahulu

3. Option Strict On/Off, menentukanapakahkompilermemperbolehkankonversinilai implicit yang berpotensimenyebabkankehilangan data (default adalah Off), misalnyakitamemasukannilaidarisuatuvariabeldengantipe data yang lebihlebarkevariabeldengantipe data yang lebihsempit • Contoh : • Option Explicit On • Option Strict On • Module Hello • Sub Main() • Dim a As Integer • Dim b As Short • a = 100000 • b = a • End Sub • End Module • Yang jikadikompilasiakanmenyebabkanpesankesalahankarenavariabel b yang bertipe short (16 bit), tidakdimungkinkanmenampungnilaidaritipe integer (32 bit), yang memilikipotensikehilangan data padasaat runtime, sehinggapemakaian Option Strict On akanmenampilkanpesankesalahanpadasaatkompilasi.

4. PerintahOption Compare Binary/Text akanmenentukanbagaimana data bertipe string akandibandingkanantarasatudenganlainnya (default adalah Binary). Adapunaturanperbandinganpadamasing-masing setting adalahsebagaiberikut : • Pada Option Compare Binary : A < B < E < Z < a < b < e < z < À < Ê < Ø < à < ê < ø • Pada Option Compare Text : (A=a) < (À= à) < (B=b) < (E=e) < (Ê= ê) < (Ø = ø) < (Z=z) • Contoh : • Option Compare Binary • Module Hello • Sub Main() • Dim a,b As String • a = "ABC" • b = "abc" • System.Console.WriteLine(a = b) 'False • End Sub • End Module

5. Yang jikadijalankanakanmenghasilkan False, karenaperbandingan data berdasarkannilaibinerdarimasing-masing data string . • Tetapijika : • Option Compare Text • Module Hello • Sub Main() • Dim a,b As String • a = "ABC" • b = "abc" • System.Console.WriteLine(a = b) 'True • End Sub • End Module • Yang jikadijalankanakanmenghasikan True, karenasebagai text-nya "ABC" dianggapsamadengan "abc" tanpamelihathurufbesarataukecil.

6. 2. Imports statements • Perintah Imports berfungsimemudahkanpengetikantanpaharusmengetiknama class didalam namespace yang di import. • Contoh : • Module Hello • Sub Main() • System.Console.WriteLine("Hello World !") • End Sub • End Module • Yang setelahadanya Imports System.ConsolepenulisanSystem.Console.WriteLinemenjadisebagaiberikut: • Imports System.Console • Module Hello • Sub Main() • WriteLine("Hello World !") • End Sub • End Module • DalamhalinikitatidakperlulagimengetikSystem.Console.WriteLine, tapicukupWriteLine, karenakitatelahmelakukan Imports System.Console.

7. 3. Main procedure Procedure Main merupakantitikawaldari program anda - merupakan procedure yang pertama kali dieksekusiketikaandamenjalankankodeanda. Jadiapa yang inginandajalankanpertama kali pada program andaditempatkanpada procedure main ini. Adapuncontohpenggunaanyasudahadapadacontoh-contoh yang sebelumnya.

8. CLASS, OBJECT dan INSTANCE Mungkinandapernahbertanyaapasichbedanya class dan object? Ilustrasiinimungkinbisamenjelaskanperbedaannya. Jikaandainginmembangunrumah Class adalah blueprint/ gambar (berisispesifikasilengkapdarirumah yang akandibuat, ukuran, jumlah, dll). Sedangkan object adalahbentukfisik / rumah yang dibangunberdasarkan blueprint / class yang sudahada. Sebuah class terdiridari properties, method, dan events (yang biasadisebutdengan member). Properties menyimpaninformasitentang object yang dibuat. Sebagaicontohpadaaplikasi windows object “TextBox‟ memiliki property “Text‟, yang berisiteks yang akanditampilkanpada textbox. JikaandamemilikitexboxdengannamatxtNamamakaandadapatmenuliskanstrNama = txtNama.Textuntukmengcopynilaidari textbox kevariabelstrNama. Method adalahperintah yang membuat object melakukansesuatu. SebagaicontohMessageBox.Show() menggunakan Show() method dariMessageBox object untukmenampilkanpesan, danMyDoc.Print() menggunakan Print() method menggunakanMyDoc object untukmengirimkan data ke printer. Penulisan method pada VB.NET diikutidengantandakurung (). Events adalahnotifikasi yang dikirimkanoleh object, dimanaandadapat listen atau ignore notifikasitersebut. Sebagaicontoh object button mengirimkan Click event, danandadapatmerespond event tersebutdanmenjalankan code anda. Instance adalah copy unikdari class yang merepresentasikan object. Untukmenggunakan class andaharusmembuat instance terlebihdahulubarudapatmengakses class member, kecualiandamenggunakan shared member, makaandatidakperlumembuat instance untukmengakses member ygadadalam class tersebut.

9. INHERITANCE Inheritance digunakanuntukmembuat Derived Class (Class Turunan) dimana class turunaniniakanmewarisisemua Properties dan Method yang dimilikioleh Parent Classnya. Sebagaicontohketikakitamembuatsebuah Form1 kita Inherits Form1 tersebutdari class System.Windows.Forms.Form. Perhatikancontohberikut :

11. Kode program diatasakanmenghasilkanduabuah Form yaitu Form1 dan Form2 dengansebuahkontrol Button padamasing-masing Form. Padasaat startup yang running pertama kali adalah Form1 danketika BtnFrm2 diklikmakaakanmemanggil Form2. SedangkanketikaBtnEnd yang beradadi Form2 diklikakanmengakhiriaplikasi. Berikutpenjelasannyasecaralebihterperinci : Option Explicit On Perintah ini digunakan untuk memastikan agar semua variable dan object telah dideklarasikan. • Imports System.Windows.Forms • Mengimport Namespace “System.Windows.Forms” sehinggasebenarnyaketikamendeklarasikan BtnFrm2 diatascukupdenganperintah “Public WithEvents BtnFrm2 As New Button”. • Module ModLatihanForm • Membuatsebuah Module ModLatihanForm • Public Class Form1 • . . . . • End Class • Mendeklarasikan sebuah Class yaitu Class Form1. • Inherits System.Windows.Forms.Form • Inherits/ membuat Class turunandari Class Form yang terdapatpada Namespace “System.Windows.Forms”. • Dim Frm2 As New Form2 • Instansiasi Frm2 sebagai instance sekaliguspembuatan Object dari Class Form2. • Public WithEvents BtnFrm2 As New System.Windows.Forms.Button • Pendeklarasiandaninstansiasi BtnFrm2 dari Class Button yang terdapatpada Namespace “System.Windows.Forms”. PerintahWithEventsdisertakansupayasemua Event yang dimiliki Class Button jugadimilikidandapatdigunakanoleh BtnFrm2.

12. Public Sub New() . . . End Sub Constructor bagi Class Form1. Constructor adalah method khusussuatu Class yang akanotomatisdijalankanbegitu instance dari Class dibuatdimemorikomputer. Jadiketikaterjadiinstansiasi Class Form1 makaperintahinisecaraotomatisakandijalankan. Me.Text = "Form Coba" MengaturnilaiProperti Text dari Me/Form1 menjadi “Form Coba”. Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Membuatposisi Form1 beradaditengahlayarketika running pertama kali. Me.BackColor = System.Drawing.Color.LightBlue Merubahwarna background Form1 menjadiwarna “LightBlue”. Me.BtnFrm2.Location = New System.Drawing.Point(182, 103) Mengaturlokasi BtnFrm2, dalamhaliniberarti BtnFrm2 akan “digambar” padaposisi X = 182 dan Y = 103 Me.Controls.Add(Me.BtnFrm2) Menambahkan Object BtnFrm2 kedalam Form1. Me.BtnFrm2.Text = “&Ke Form2” Merubahnilaiproperti Text BtnFrm2 menjadi “Ke Form2”. Karakter “&” digunakanuntukmembuat shortcut dalammengakses object BtnFrm2 (tekanAlt+Karakter Shortcut untukmenggunakanshortcutnyapadasaat runtime). Padasaat runtime Text-nyaakanmenjadi “Ke Form2”.

13. Private Sub BtnFrm2_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles BtnFrm2.Click • . . . • End Sub • Penggunaan Event Click pada BtnFrm2 • Frm2.ShowDialog() • Mencetak/ menampilkan Frm2/ Form2 kelayarketika BtnFrm2 diklik. • Me.Close • Menutup Form1. • Public Class Form2 • Inherits System.Windows.Forms.Form • Public WithEventsBtnEnd As New System.Windows.Forms.Button • Sub New() • Me.Text = "Form Coba2" • Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen • Me.BackColor = System.Drawing.Color.LightBlue • Me.BtnEnd.Location = New System.Drawing.Point(182, 103) • Me.BtnEnd.Text = "Exit" • Me.Controls.Add(Me.BtnEnd) • End Sub • Private Sub BtnEnd_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles BtnEnd.Click • End • End Sub • End Class

14. Penjelasankode program pada Class Form2 samadenganpenjelasanpada Class Form1 diatas. • Sub Main() • . . . • End Sub • Procedure Main dari program/ aplikasidimanamerupakan procedure yang pertama kali dibacadandirunningolehaplikasi. • Dim Frm As New Form1 • InstansiasiFrmsebagai instance sekaliguspembuatan Object dari Class Form1. • Frm.ShowDialog() • Mencetak/ menampilkanFrm/ Form1 kelayar.