Sabtu, 15 September 2012

Membuat program/aplikasi untuk menghitung volume balok




  • Buatlah form seperti gambar dibawah ini





  • Tambahkan tool- tool sebagai berikut :
      Label 5 buah
  1. label1 propertiesnya Text = RUMUS VOLUME BALOK
  2. label2 propertiesnya Text = Panjang ( P )
  3. label3 propertiesnya Text = Lebar (l)
  4. label4 propertiesnya Text = Tinggi ( t )
  5. label5 propertiesnya Text = Rumus V = p x l x t
     Textbox 4 buah

  1. textbox1 propertiesnya: Text = 0,sebagai Panjang
  2. textbox2 propertiesnya: Text = 0,sebagai lebar
  3. textbox3 propertiesnya: Text = 0,sebagai tinggi
  4. textbox4 propertiesnya: Text = 0, untuk menampilkan hasil volume

     Button1
buah

      Button1 propertiesnya: text : Volume = (tombol untuk melakukan perhitungan volume balok)


  • Selanjutnya adalah memasukan kode pemprogramannya
  • Doubel klik pada button1/Volume =  kemudian copy code dibawah ini
        Dim p As Decimal = TextBox1.Text
        Dim l As Decimal = TextBox2.Text
        Dim t As Decimal = TextBox3.Text
        TextBox4.Text = p * l * t
 

Penjelasan kode pemprogramanya :

Setiap ada variabel kita dahulukan dengan kata dim artinya dimensi kita gunakan AS/sebagai decimal untuk perhitungannya
  1. variabel dari panjang disingkat jadi p
  2. variabel dari lebar disingkat jadi l
  3. variabel dari tinggi disingkat jadi t

Rumus untuk menghitung volum adalah p x l x t
TextBox4.Text = p * l * t

Tidak ada komentar:

Posting Komentar