PROGRAM UNTUK TRANSAKSI PEMBAYARAN SEKOLAH DENGAN VB.NET

Saya mau share nih keteman - teman. Saya m`buat program pembayaran sekolah menggunakan vb.net dengan OUTPUT kaya gini nehhhhh......

merasa tertarik dengan program ini ayoooo cobaa.. Nih Source Kodenya !!!

Public Class Form1
Dim ips As Decimal
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked = True Then
TextBox6.Text = TextBox3.Text
TextBox5.Text = 0
End If
If RadioButton2.Checked = True Then
TextBox6.Text = TextBox3.Text - (TextBox3.Text * 20 / 100)
TextBox5.Text = TextBox3.Text * 20 / 100
End If

End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If ComboBox1.SelectedIndex = 0 Then
TextBox3.Text = 400000
End If

If ComboBox1.SelectedIndex = 1 Then
TextBox3.Text = 350000
End If

If ComboBox1.SelectedIndex = 2 Then
TextBox3.Text = 300000
End If
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

End Sub
End Class