UTS VB2

Sekarang saya akan membuat aplikasi penjualan mobil yang terhubung dengan Microsoft Excel .

Kita contohkan saja aplikasi penjualan mobil Lamborghini dengan beberapa jenisnya yaitu Aventador,Gallardo,dan Superlegera

Pertama, buat design formnya seperti ini :

ke dua buka excel dan buat seperti ini

lalu save as excell dan ingat baik baik tempat savenya


berikutnya pastikan visual studio sudah terkoneksi dengan excel

caranya :1.pada visual studio buka project lalu add reference dan com .pada com cari aplikasi excel kita yang akan di koneksikan. contoh seperti ini

lalu kita isikan coding kita



Source code:

Public Class Form1

    Dim myexcellapp As New Microsoft.Office.Interop.Excel.Application
    Dim myexcellbook As Microsoft.Office.Interop.Excel.Workbook
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As               System.EventArgs) Handles Button1.Click
       
        myexcellapp.Visible = True
        myexcellbook = myexcellapp.Workbooks.Open("D:\Kuliah\UTSVB2")

        myexcellapp.Range("A2").Value = Me.TextBox1.Text
        myexcellapp.Range("B2").Value = Me.RadioButton1.Text
        myexcellapp.Range("B2").Value = Me.RadioButton2.Text
        myexcellapp.Range("B2").Value = Me.RadioButton3.Text
        myexcellapp.Range("C2").Value = Me.TextBox2.Text
        myexcellapp.Range("D2").Value = Me.RadioButton4.Text
        myexcellapp.Range("D2").Value = Me.RadioButton4.Text
        myexcellbook.SaveAs("D:\Kuliah\UTSVB2")
        myexcellapp.Quit()
    End Sub
End Class


Nah setelah itu kita tes programnya klik start dan isikan sesuatu

lalu hasilnya pada excel

Selesai.
Mohon maaf kalo ada kekurangan dan terimakasih