Menghitung Luas Kubus dengan VB.net 2005

Program menghitung luas kubus dengan VB.net - Tutorial dasar pemograman VB.net ini adalah tutorial yang paling dasar bahkan bisa juga dibilang sebagai pengenalan pemograman dalam VB.net, disini saya mengunakan VB.net 2005. Saya akan membuat program untuk menghitung luas kubus yang akan dibuat secara singkat.

• Pertama, buka VB.net Anda
• Buatlah project baru dengan nama AppPengenalan

• Kemudian desain form seperti tampilan dibawah

•  Yang dibutuhkan adalah 2 label, 2 textbox, dan 3 button.
• Gantilan nama TextBox1 pada Properties dengan nama TxtSisi.
• Dan TextBox2 dengan nama TxtLuas.
• Button1 menjadi BtnHitung
• Button2 menjadi BtnReset
• Button3 menjadi BtnKeluar

 Untuk memasukan kodenya, double klik pada button Hitung dan ketkan kodenya.

 Ketiklah kode berikut ini :


Public Class KUBUS
    Private Sub BtnHitung_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHitung.Click
        Me.TxtLuas.Text = 6 * (Val(Me.TxtSisi.Text) ^ 2)
    End Sub

    Private Sub BtnReset_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnReset.Click
        Me.TxtLuas.Text = ""
        Me.TxtSisi.Text = ""
        Me.TxtSisi.Focus()
    End Sub

    Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
        Dim x As VariantType
        x = MessageBox.Show("Yakin mau keluar?", "Pesan", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If x = vbYes Then
            End
        End If
    End Sub
End Class



 Setelah selesai, simpanlah dan run projectnya. Jika memiliki masalah sillahkan bertanya pada kolom komentar.

Untuk tutorial selanjutnya saya akan membuat program menghitung luas dan keliling lingkaran pada artikel Menghitung Luas dan Keliling Lingkaran dengan VB.net 2005.