UTS Pemograman Semester 4

1.Deskripsi Aplikasi ini betujuan memudahkan menyimpan data pembeli tiket Kereta Api. Dengan menggunakan tools TextBox, Label, ComboBox, Button. 2. ScreenShot 3. Source Code Imports Word = Microsoft.Office.Interop.Word Imports Excel = Microsoft.Office.Interop.Excel Public Class Form1     Private Sub cmbkrl_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbkrl.SelectedIndexChanged         If (cmbkrl.SelectedIndex.Equals(0)) Then             txtharga.Text = 50000         ElseIf (cmbkrl.SelectedIndex.Equals(1)) Then             txtharga.Text = 100000         Else             txtharga.Text = 150000         End If     End Sub     Private Sub txtjumlah_LostFocus(sender As Object, e As EventArgs) Handles txtjumlah.LostFocus ...