Pada program ini anda dapat menghitung luas jari-jari dengan mendesignnya menggunakan "Label", "TexBox", dan "Button" yang ada di ToolBox. Dengan demikian anda dapat mengikuti langkah-langkah berikut
1) Tampilkan terlebih dahulu sebuah Form dengan cara membuka
aplikasi Microsoft Visual Studio 2010 dan pilih menu File - New Project -
Visual Basic -Windows Forms Application - OK. Setelah itu akan muncul Form
seperti dibawah ini
2) Design Form dengan menambahkan 4 "Label", 1 "TexBox", dan 1 "Button"seperti yang ada dibawah ini
3) Kemudian anda dapat mengubah nama text Label menjadi "Menghitung Luas Lingkaran", "Input Jari-jari", "Hasi", "Hasil". Dan mengubah nama text Button menjadi "Hitung"
4) Setelah itu double klik di "Hitung" untuk menambahkan linsting
program berikut
Public Class Form3
Dim jari, hasil As Double
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Menghitung luas lingkaran
If TextBox1.Text = "" Then
MsgBox("Data Belum Isi")
Else
jari = Val(TextBox1.Text)
hasil = 3.14 * jari * jari
Label3.Text = hasil
End If
End Sub
End Class
5) Dan untuk menjalankan program anda harus memilih "Start
Debugging" atau menekan "F5" pada tombol keyboard. Hasil pun
akan terlihat seperti tampilan dibawah ini dan anda bisa memasukkan angka yang anda inginkan
6) Hasil pun akan muncul ketika anda memilih "Hitung"
7) Selesai
#Selamat mencoba dan semoga berhasil :)
ga WORK gann
BalasHapusga WORK gann
BalasHapusklo di versi 2019 bisa gk gan ?
BalasHapus