Selasa, 14 Mei 2013

lanjutan visual studio 2010 express

asalamualaikum,dan apakabar sobat, pada pertemuan kali ini saya akan membuat suatu perogram yang sederhana, yaitu program penjumlahn, langsung saja kita peraktekkan.............goooo

    berikut ini komponen yang diperlukan''''''........




selanjutnya desain programnya....................

setelah kita udah mendesain programnya maka langka selanjutnya mengetik script code nya
pertama '..
Double klik tombol tambah, maka akan muncul script dibawah ini...

Public Class Form1

    Private Sub cmdtambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdtambah.Click
'ketikan scriptnya disini
    End Sub
End Class

pada script diatas tuliskan scriptnya diantara private sub cmdtambah  end sub, lihatlah hasil scriptnya dibawah ini....

Public Class Form1

    Private Sub cmdtambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdtambah.Click
        Dim angka1, angka2, hasil As Integer
        angka1 = TextBox1.Text
        angka2 = TextBox2.Text
        hasil = angka1 + angka2
        MsgBox(hasil)
    End Sub
End Class

setelah anda mengetikan skript kode tersebut, selanjutnya anda runkan/jalankan programnya
jika programnya tidak error maka tampilannya seperti dibawah ini....


 dan jika tombol tambah di klik maka hasilnya seperti dibawah ini


penjelasan script..........
baris1 menyatakan form
baris2 menyatakan aktion toolbox
baris3 menyatakan variabel yang berfungsi untuk menampung data sementara
baris4,5 variabel menampung data yang diinputkan dari textbox1 dan textbox2
baris 6 menampung penjumlahan diatarah  textbox1 dan textbox2
baris7 penulisan variabel diantara perintah msgbox ,jangan menggunakan tanda petik ganda karena petik ganda digunakan untuk sting (text)
baris8 end sub  digunakan untuk menhakiri perintah private sub  pada baris kedua

  yang perlu diperhatikan adalah karena variabel bertive integer , maka hasilnya menjadi bilangan bulat, seandainya kamu masukan di textbox1 dan textbox2 bilangan desimal (bilangan koma) maka hasilnya menjadi bilangan bulat(bilangan digenapkan) untuk bilangan pecahan anda dapat menggunakan type data double.

  selanjutnya saya akan menambahkan penggunaan operator, sebagai contohnya mengecek nilai yang dimasukan ke textbox yang kita buat sebelumnya ,apakah berupah string  atau berupa angka, untuk lebih jelasnya  tambahkan 1 buah tombol button  pada perogram sebelumnya sehinggah gambarnya seperti dibawah ini.......
tpi ingat namanya jangan diganti, cukup textnya aja yang diganti


kemudian double klik tombol cek untuk mengisi kode program pada tombol cek
hasil scriptnya  dibawah ini....

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim angka1, angka2 As Char
        angka1 = TextBox1.Text
        angka2 = TextBox2.Text
        If IsNumeric(angka1) Or IsNumeric(angka2) Then
            MsgBox("ini adalah angka")
        Else
            MsgBox("bilangan yang anda masukan bukan angka periksa kembali")
        End If
    End Sub
End Class

setelah tu jalankan perogramnya, jika tidak error masukan hurup di textbox1 dan textbox2 lalu tekan tombol cek maka hasilnya seperti di bawah ini






penjelasan script..........

baris1 menyatakan tombol cek melakukan action klik
baris2 membuat variabel untuk menapung data
baris3,4 digunakan untuk menampung data dari textbox1 dan 2
baris5 fungsi isnumeric digunakan untuk mengecek apakah yang dimasukan angka atau hurup
baris6 memunculkan pesan apabila yang dimasukan angka
baris7 kalau yang dimasukan bukan angka.....

  sebagai tambahan yang perlu diperhatikan pemberian type  variabel yaitu char. type variabel char untuk menampung data baik numeric ataupun karakter jadi,ddengan adanya variabel char maka data yang ditampung dapat berupa angka atau huruf  kasusnya apabila textbox1 dimasukan dengan angka sedangkan textbox2 dimasukan dengan huruf, maka perogram akan menjalankan bagian pertama....

  okeee, itu saja penjelasan mengenai perogram yang sayah buat , gampangkan...
semoga penjelasan sayah dapat bermanfaat bagi  sobat..... aminnnnnnn. :)
 






Tidak ada komentar:

Posting Komentar