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

13 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.

dr. Doddy Faisal Mahdi Pane on 22 November 2010 pukul 01.18 mengatakan...

membuka aplikasinya pakai software apa gan.mohom petunjuknya

alfiadah on 24 November 2010 pukul 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 pukul 17.20 mengatakan...

bookmark gan..sangat membantu

Anonim mengatakan...

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

3L33T on 22 Agustus 2011 pukul 06.22 mengatakan...

Iya,, kok gak ada koneksi ke database ya???
Juga gak ada file exe nya., gmn mau nyoba.. aq adanya visual studio 2008..

Anonim mengatakan...

mas i2 kan 1 checkbox 1 msgbox,gmn codingnya misalnya klo semua checkbox=1 dan msgnya ("anda sekarat!")??

Andi on 8 Januari 2012 pukul 14.56 mengatakan...

keren gan :D
makasih banyak..
mampir ya ke blog saya
http://sekedar-tutorial.blogspot.com

aqilmaftuh on 9 Januari 2012 pukul 09.35 mengatakan...

pak saya download softwarenya tapi tidak bisa dibuka.gimana caranya ya?trimksh atas bantuannya?

Saddam Rajief on 18 Januari 2012 pukul 10.30 mengatakan...

Cuma 2 form aja gan..? siip lah..

Anonim mengatakan...

kayaknya ini ngga' pake database karna di tampilkan langsung di message box...

Unknown on 2 Maret 2016 pukul 00.05 mengatakan...

gan kalau checkbox diagnosa yg pakai koneksi database gimana kodenya gan.. tolong bantuannya donk.. saya masih bingung nih... email : muhammadsuleman006@gmail.com
makasih

Labels

 

Copyright 2018 All Rights Reserved @ Sistem Informasi|Fasilkom Unsri| Mkom Budi Luhur |