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
13 komentar:
mau nanya mas... aplikasi ini ga make database ya??? soalnya aku dapat tugas yg mirip seperti ini, dan aplikasi ini sangat membantu.
thx.
membuka aplikasinya pakai software apa gan.mohom petunjuknya
pake visual basic gan :)
data base nya pakai apa mas..??? bs di jadikan untk tga akhr g,...???
bookmark gan..sangat membantu
mas gak ada yang mentahannya...
tu kan yg langsung jadi.
tapi trims banyak atas ilmunya...
Iya,, kok gak ada koneksi ke database ya???
Juga gak ada file exe nya., gmn mau nyoba.. aq adanya visual studio 2008..
mas i2 kan 1 checkbox 1 msgbox,gmn codingnya misalnya klo semua checkbox=1 dan msgnya ("anda sekarat!")??
keren gan :D
makasih banyak..
mampir ya ke blog saya
http://sekedar-tutorial.blogspot.com
pak saya download softwarenya tapi tidak bisa dibuka.gimana caranya ya?trimksh atas bantuannya?
Cuma 2 form aja gan..? siip lah..
kayaknya ini ngga' pake database karna di tampilkan langsung di message box...
gan kalau checkbox diagnosa yg pakai koneksi database gimana kodenya gan.. tolong bantuannya donk.. saya masih bingung nih... email : muhammadsuleman006@gmail.com
makasih
Posting Komentar