Latihan_07_46110009

Latihan_07_46110009

A.     Form Latihan_07  terdapat tiga object yaitu Label, Textbox, dan Button  
      ==>Object Label

                   Terdapat  dua   label (yang bertuliskan Masukkan Angka dan Hasil Perhitungan) 

            ==>Object Text Box

                  Terdapat tiga puluh  textbox (lima status input dan dua puluh lima status read only).

                  Status input digunakan untuk memasukkan nilai.  

                  Status Read Only digunakan untuk menampilkan hasil perhitungan. 

            ==>Object Button

Terdapat tiga object button (Hitung 1, Hitung 2, dan Hitung 3).  Masing Tombol Hitung digunakan untuk menampilkan hasil perhitungan di object TextBox ReadOnly. Dimana pada rumus untuk textbox 6, 7, 29, dan 30 memiliki rumus yang berbeda di tiap botton hitung sedang kan textbok 7 – 28 memiki rumus yang sama di tiap

B.     Script Unique 

Untuk Buttom "Hitung 1"

  TB646110009.Text = Val(TB146110009.Text) + Val(TB246110009.Text) 

 TB746110009.Text = Val(TB146110009.Text) + Val(TB346110009.Text)

Untuk Buttom "Hitung 2"

     TB646110009.Text = Val(TB246110009.Text) * Val(TB346110009.Text)
     TB746110009.Text = Val(TB546110009.Text) * Val(TB446110009.Text)

Untuk Buttom "Hitung 3"

TB646110009.Text = Val(TB246110009.Text) * Val(TB346110009.Text)

TB746110009.Text = Val(TB546110009.Text) * Val(TB446110009.Text)      

C.     Even

ULHY()

HITUNG146110009_Click

HITUNG246110009_Click

HITUNG346110009_Click

D.     Property

Property TextBox ==> ReadOnly=True