Selasa, 26 Juni 2012

Buat Kalkulator Sederhana - Visual Basic - Sort Code

Membuat kalkulator sederhana dengan visual basic 6.0 Sort Code, saya coba sering pengalam tugas kuliah mengenai program kalkulator sederhana.

Pertama Buatlah Form/layout nya seperti Gambar di Bawah ini :

Setalah Formnya sesuai serta pengatura properti-propertinya selanjutnya kita masuk ke penyusunan scriptnya.
buatlah seperti dibawah ini :

Private LastOperator  As String
Private FirstPart As String

Private Sub cmdClear_Click()
    FirstPart = ""
    LastOperator = ""
    text1.Text = ""
End Sub
Private Sub cmdEquals_Click()
Select Case LastOperator
    Case Is = "+"
        text1.Text = Val(FirstPart) + Val(text1.Text)
    Case Is = "-"
        text1.Text = Val(FirstPart) - Val(text1.Text)
    Case Is = "/"
        text1.Text = Val(FirstPart) / Val(text1.Text)
    Case Is = "*"
        text1.Text = Val(FirstPart) * Val(text1.Text)
End Select
    FirstPart = ""
    LastOperator = ""
End Sub

Private Sub cmdOp_Click(Index As Integer)
    LastOperator = cmdop(Index).Caption
   
    FirstPart = text1.Text
   
    text1.Text = ""
End Sub
Private Sub Cmdangka_Click(Index As Integer)
    text1.Text = text1.Text + cmdangka(Index).Caption
End Sub


jalankan programnya. so jadilah personal kalkulator buatan sendiri. 

Rabu, 20 Juni 2012

Visual Basic - Program Sederhana

sobat bloger, di sini saya sering mengenai program visual basic sederhana, yang sangat di anjurkan untuk para programer pemula, untuk memulai dan kemudian mendalami pemrograman visual basic, kita disini menggunakan visual basic 6.0 dimana program ini umumnya di pakai oleh programer, walaupun ada program terbaru visual basic  yaitu visual basic. net sudah rilis.

ok langsung saja, disini kita akan membuat program KALKULATOR.