SISTEM PENDUKUNG KEPUTUSAN PROMOSI KENAIKAN JABATAN DENGAN METODE SIMPLE ADDITIVE WEIGHTING (SAW) VISUAL BASIC 6.0
Penulis : Ala dinner
Asal : Kab. Kep. Mentawai
Metode : Simple Additive Weighting
Aplikasi : Visual Basic 6.0
File : Tugas Pemograman
Kunjungi Juga Media Sosial Penulis dibawah ini
Youtube : Ala dinner
Facebook : Aladinner.idn
Instagram :ala_dinner
Hallo Semua, kali ini saya akan membagikan cara implementasi sistem pendukung keputusan menggunakan metode SAW kedalam visual basic 6.0
Ok, langsung aja ke materinya...
METODE SIMPLE ADDITIVE WEIGHTING (SAW)DENGAN VISUAL BASIC 6.0
DEFINISI METODE SIMPLE ADDITIVE WEIGHTING (SAW)
- Metode SAW merupakan metode yang juga dikenal dengan metode penjumlahan terbobot dari rating kinerja pada setiap alternative pada semua atribut.
- Metode
SAW membutuhkan proses normalisasi matriks keputusan (X) ke suatu skala yang
dapat diperbandingkan dengan semua rating alternative yang ada.metode ini merupakan metode yang paling terkenal dan paling banyak digunakan dalam menghadapi situasi Multiple Attribute Decision Making (MADM).MADM itu sendiri merupakan suatu metode yang digunakan untuk mencari alternative optimal dari sejumlah alternative dengan criteria tertentu.
LANGKAH-LANGKAH METODE SAW
- Menemukan Masalah
- Membuat criteria-kriteria
- Memberikan bobot disetiap criteria
- Menentukan jenis (Max atau Min)
- Masukkan data dalam table
- Normalisasi matrik (Rumus 1 = Max/Min) Rumus Max = C1 dibagi Max (Semua yang ada dalam Kriteria C1)Rumus Min = C1 dibagi Min (semua yang ada dalam Kriteria C1)
- Hitung skor (Rumus 2 =Menghitung Nilai Bobot disetiap Alternatif )(Bobot *hasil Normalisasi Rumus 1)+(bobot*hasil normalisasi rumus1)sampai seterusnya.
- Melakukan
Perangkingan
HASIL DAN PEMBAHASAN
1. Menemukan Masalah
|
Kode |
Kriteria |
Keterangan |
|
C1 |
Masa Kerja |
Benefit |
|
C2 |
Penilaian Kerja |
Benefit |
|
C3 |
Perilaku |
Benefit |
|
|
Bobot |
|
C1 |
3 |
|
C2 |
3 |
|
C3 |
4 |
|
C1 |
C2 |
C3 |
|
+ |
+ |
+ |
|
3 |
3 |
4 |
|
No |
Nama |
C1 |
C2 |
C3 |
|
1 |
Chairani |
4 |
7 |
7 |
|
2 |
Rafida |
5 |
8 |
5 |
|
3 |
Teguh |
6 |
9 |
5 |
|
C1 |
C2 |
C3 |
|
0,66666667 |
0,777778 |
1 |
|
0,83333333 |
0,888889 |
0,714286 |
|
1 |
1 |
0,714286 |
|
Hasil |
|
8,333333333 |
|
8,023809524 |
|
8,857142857 |
|
No |
Nama |
C1 |
C2 |
C3 |
Hasil |
|
1 |
Chairani |
4 |
7 |
7 |
8,333333333 |
|
2 |
Rafida |
5 |
8 |
5 |
8,023809524 |
|
3 |
Teguh |
6 |
9 |
5 |
8,857142857 |
IMPLEMENTASI KEDALAM VISUAL BASIC
Buka Program Visual Basic 6.0
Lalu Buatlah Tampilan Seperti BerikutIsikan Listing Program Berikut
Private Sub Command1_Click()
On Error GoTo cek
Text19.Text = Text4.Text / Text34.Text
Text20.Text = Text5.Text / Text34.Text
Text21.Text = Text6.Text / Text34.Text
Text22.Text = Text7.Text / Text35.Text
Text23.Text = Text8.Text / Text35.Text
Text24.Text = Text9.Text / Text35.Text
Text25.Text = Text10.Text / Text36.Text
Text26.Text = Text11.Text / Text36.Text
Text27.Text = Text12.Text / Text36.Text
Text39.Text = (3 * Text19.Text) + (3 * Text22.Text) + (4 * Text25.Text)
Text40.Text = (3 * Text20.Text) + (3 * Text23.Text) + (4 * Text26.Text)
Text41.Text = (3 * Text21.Text) + (3 * Text24.Text) + (4 * Text27.Text)
Exit Sub
cek: MsgBox
"cek nilai atau nilai max atau min", vbCritical, "File
Kosong" End Sub

Silahkan Tinggalkan Komentar Yang Berkaitan dengan Isi Blog ini ConversionConversion EmoticonEmoticon