Rabu, 05 Mei 2010

Aplikasi Sistem Pakar (Diagnosa Penyakit )


Sistem pakar merupakan suatu program komputer yang mengandung pengetahuan dari satu atau lebih pakar manusia mengenai suatu bidang spesifik. Jenis program ini pertama kali dikembangkan oleh periset kecerdasan buatan pada dasawarsa 1960-an dan 1970-an dan diterapkan secara komersial selama 1980-an. Bentuk umum sistem pakar adalah suatu program yang dibuat berdasarkan suatu set aturan yang menganalisis informasi (biasanya diberikan oleh pengguna suatu sistem) mengenai suatu kelas masalah spesifik serta analisis matematis dari masalah tersebut. Tergantung dari desainnya, sistem pakar juga mamupu merekomendasikan suatu rangkaian tindakan pengguna untuk dapat menerapkan koreksi. Sistem ini memanfaatkan kapabilitas penalaran untuk mencapai suatu simpulan.(Wikipedia)

Berikut Aplikasi Diagnosa Penyakit + dengan Source Codenya :

Menu Utama




Diagnosa Penyakit




Source Code nya :

1. Menu Utama

Private Sub Label1_Click()

End Sub

Private Sub Form_Load()

End Sub

Private Sub tb_keluar_Click()
Unload Me
End Sub

Private Sub tb_masukan_Click(Index As Integer)
Form2.Show
form_utama.Hide
End Sub



2. Diagnosa Penyakit

Private Sub Command1_Click()
form_utama.Show
Form2.Hide
End Sub

Private Sub Label3_Click()

End Sub

Private Sub Command2_Click()
If Check1.Value = 1 Then
MsgBox ("anda menderita Penyakit pilek")
End If
If Check2.Value = 1 Then
MsgBox ("anda menderita Penyakit pilek")
End If
If Check2.Value = 1 And Check1.Value = 1 Then
MsgBox ("anda menderita Sinusitis Sfenoidalis")
End If
If Check3.Value = 1 Then
MsgBox ("anda menderita Penyakit sakit kepala")
End If
If Check4.Value = 1 Then
MsgBox ("anda menderita Penyakit Demam")
End If
If Check5.Value = 1 Then
MsgBox ("anda menderita Penyakit Anemia ")
End If
If Check6.Value = 1 Then
MsgBox ("anda menderita Penyakit Magh ")
End If
If Check7.Value = 1 Then
MsgBox ("anda menderita Penyakit Anemia")
End If
End Sub

Private Sub Form_Load()

End Sub


Langkah - Langkah Menjalankan Program :

1. Klik fm_utama -> do you want to see this warning again klik Ok
2. Pada kotak project klik form -> klik form_utama
3. Klik kanan Form -> Pilih Add -> Add File
4. Klik form2 -> klik Open
5. Pada menu bar klik run -> klik start.


Untuk mendapatkan Aplikasi Sistem Pakar (Diagnosa Penyakit ) + Source Codenya Silahkan Download disini

6 komentar:

Anonim mengatakan...

mau nanya mas... aplikasi ini ga make database ya??? soalnya aku dapat tugas yg mirip seperti ini, dan aplikasi ini sangat membantu.

thx.

doddy on 22 November 2010 01.18 mengatakan...

membuka aplikasinya pakai software apa gan.mohom petunjuknya

Artikel on 24 November 2010 05.36 mengatakan...

pake visual basic gan :)

Anonim mengatakan...

data base nya pakai apa mas..??? bs di jadikan untk tga akhr g,...???

trias on 4 Mei 2011 17.20 mengatakan...

bookmark gan..sangat membantu

Anonim mengatakan...

mas gak ada yang mentahannya...
tu kan yg langsung jadi.
tapi trims banyak atas ilmunya...

Blog Teman - Teman

KURS MATA UANG

Semua Ada Disini

Entri Populer

Tampilan Posting


Masukkan Code ini K1-AB9115-7
untuk berbelanja di KutuKutuBuku.com

Total Pengunjung

free counter

Harga dari sebuah Blog


This website is worth

What is your website worth?

Klik Disini

 

Sistem Informasi. Copyright 2010 All Rights Reserved Revolution Two Church theme by Brian Gardner Converted into Blogger Template by Bloganol dot com