Senin, 12 November 2012

Program Mencari Nilai Faktorial Visual Basic

Langsung aja ngak usah panjang lebar berikut adalah langkah membuat program menghitung nilai faktorial :
  1. Buat  2 label
  2. Buat 2 textbox
  3. Buat 1 buah command
Perhatikan contoh berikut :













berikut adalah listing/source codenya :

double klik pada command1/tombol_hitung lalu isi dengan listing/source berikut :

Private Sub Command1_Click()
Dim x As Double
x = 1
For i = 1 To Text1.Text
x = x * i
Next i
Text2.Text = x
End Sub

double klik pada command2/tombol_baru lalu isi dengan listing/source berikut :

Private Sub Command2_Click()
Text1.Text = Clear
Text2.Text = Clear
End Sub

double klik pada command3/tombol_keluar lalu isi dengan listing/source berikut :

Private Sub Command3_Click()
Unload Me
End Sub

Selamat mencoba.......

2 komentar:

  1. Lalu kalo saya ambil bilangan bulat negatif apa jadinya??
    Kan Integer gak hanya integer positif mas,, negatif juga termasuk..

    BalasHapus