·  Click project kemudian pilih add windows form, seperti pada gambar dibawah ini 

·  Ketik nama form "Latihan_09_46110007" pada name kemudian click add 

·  Setelah form selesai masukkan rumus seperti dibawah ini  

Public Class Latihan_09_46110007

    Private Sub hasil(ByVal ta As TextBox, ByVal mk As TextBox, ByVal pj As TextBox, ByVal ld As TextBox, ByVal eb As TextBox, ByVal hpe As TextBox, ByVal nbh As TextBox, ByVal tkk As TextBox)

        If 1.2 * Val(mk.Text) / Val(ta.Text) + 1.4 * Val(ld.Text) / Val(ta.Text) + 3.3 * Val(eb.Text) / Val(ta.Text) + 0.6 * Val(hpe.Text) / Val(nbh.Text) >= 3.3 Then

            tkk.Text = "Sangat Sehat"

        ElseIf 1.2 * Val(mk.Text) / Val(ta.Text) + 1.4 * Val(ld.Text) / Val(ta.Text) + 3.3 * Val(eb.Text) / Val(ta.Text) + 0.6 * Val(hpe.Text) / Val(nbh.Text) >= 1.81 Then

            tkk.Text = "Waspada"

        ElseIf 1.2 * Val(mk.Text) / Val(ta.Text) + 1.4 * Val(ld.Text) / Val(ta.Text) + 3.3 * Val(eb.Text) / Val(ta.Text) + 0.6 * Val(hpe.Text) / Val(nbh.Text) >= 0 Then

            tkk.Text = "Mengalami Kesulitan"

        End If

    End Sub

  

    Private Sub analisa_46110007_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles analisa_46110007.Click

        hasil(aktiva1_46110007, modal1_46110007, penjualan1_46110007, laba1_46110007, ebit1_46110007, equity1_46110007, hutang1_46110007, kesehatan1_46110007)

        hasil(aktiva2_46110007, modal2_46110007, penjualan2_46110007, laba2_46110007, ebit2_46110007, equity2_46110007, hutang2_46110007, kesehatan2_46110007)

        hasil(aktiva3_46110007, modal3_46110007, penjualan3_46110007, laba3_46110007, ebit3_46110007, equity3_46110007, hutang3_46110007, kesehatan3_46110007)

    End Sub

End Class

·  Untuk menjalankan form tekan F5 

B. Deskripsi Form Latihan 09

Pada form latihan 08 ada 3 object yang digunakan yaitu label, textbox dan button.

Object Label

Terdapat 12 label pada form latihan 09 (perusahaan, total aktiva, modal kerja, penjualan, laba ditahan, ebit, harga pasar equity, nilai buku hutang, tingkat kesehatan keuangan, tahun I, tahun II dan tahun III).

Object TextBox

Pada form ini ada 25 textbox yang digunakan (22 status input dan 3 status readonly). Status input digunakan untuk memasukkan data sedangkan readonly akan menampilkan hasil analisa setelah data di input ke textbox yang berstatus input.

Object Button                                                                

Terdapat 1 object button (analisa). Tombol analisa digunakan untuk menampilkan hasil analisa data yang telah diinput sebelumnya pada textbox berstatus input.

Even

ButtonClick.

Property

Property TextBox => ReadOnly = True

Langkah-Langkah Menjalankan Form Latihan 09