Latihan_34A_36110033

A.    Object-object dalam Latihan_34A_36110033:

   

1.      Object StatusStrip

Terdapat dua object statusstrip yang nama texnya bertuliskan daftar barang dan input barang. Daftar Barang digunakan untuk melihat data barang yang ada pada form latihan_34B_36110033 sedangkan Input Barang digunakan untuk memasukkan data barang yang ada pada pada form latihan_34C_36110033.

 2.      Object Menustrip

Terdapat satu menustrip yang bertuliskan barang.

 3.      Object DataGridView

Terdapat satu object datagridview yang digunakan untuk menampilkan daftar barang.

 B.     Script Unique:

Latihan_34A_36110033_Load

Lengkapnya dapat dilihat pada prosedur Latihan_34A_36110033.

C.    Even:

InputBarang_36110033

DaftarBarang_36110033

Prosedur

1.    Klik Start lalu pilih Microsoft Visual Studio 2008

2.    Buka Ms. Visual Studio.

3.    Lalu akan muncul jendela awal Microsoft Visual Studio.

4.    Klik Add New Item dan akan muncul jendela add new item seperti berikut:

 Setelah muncul pilih windos from, kemudian ganti nama sesuai dengan nama yang diinginkan dan selanjutnya klik tombol add. Langkah ini dilakukan karena kita sudah pernah membuat project sebelumnya. Akan muncul from untuk digunakan membuat project.

5.    Buat 2 Object StatusStrip, 1 Object Menustripdan dan 1 object datagridview. Kemudian beri nama apa saja yang anda inginkan, selanjutnya diikuti dengan stambuk. Adapun posisi Label, object datagridview, dan button sesuai dengan design pada latihan 34A berikut:

 

6.      Untuk menuliskan rumus pada latihan 34A, anda dapat menuliskan rumus seperti dibawah ini:

Public Class Latihan_34A_36110033

    Private Sub DaftarBarang_36110033_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DaftarBarangToolStripMenuItem_36110033.Click, ToolStripButton1_36110033.Click

    If Latihan_34B_36110033.Visible = False Then

       Latihan_34B_36110033.Show()

       Else

       Latihan_34B_36110033.Activate()

       Latihan_34B_36110033.WindowState = FormWindowState.Normal

       End If

    End Sub

    Private Sub InputBarang_36110033_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InputBarangToolStripMenuItem_36110033.Click, ToolStripButton2_36110033.Click

    If Latihan_34C_36110033.Visible = False Then

       Latihan_34C_36110033.Show()

       Else

       Latihan_34C_36110033.Activate()

       Latihan_34C_36110033.WindowState = FormWindowState.Normal

        End If

       Latihan_34C_36110033.Kode_36110033.Text = ""

       Latihan_34C_36110033.NAMA_36110033.Text = ""

       Latihan_34C_36110033.HARGA_36110033.Text = ""

       Latihan_34C_36110033.JUMLAH_36110033.Text = ""

       Latihan_34C_36110033.ToolStripStatusLabel_36110033.Text = "-"

    End Sub

End Class

7.      Kemudian di Start Debbuging, maka kita akan tahu, betul atau tidaknya rumus yang kita gunakan serta coba jalankan perintah yang ingin kita ketahui dari latihan tersebut untuk mengetahui hasilnya yang lebih jelas lagi.

8.      Jika program berjalan simpan dengan menekan tombol ctrl+s  untuk menyimpan data dan prosedur latihan 34A selesai.