PENJUALAN BARANG

Jawaban No:2 “ZELY HARDI”

Listing Program :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call Tabel()
KodeBarang.Items.Add(“TS001″)
KodeBarang.Items.Add(“TS002″)
KodeBarang.Items.Add(“VG001″)
KodeBarang.Items.Add(“VG002″)
End Sub

Sub Tabel()
ListView.Columns.Add(“No Pembelian”, 90, HorizontalAlignment.Left)
ListView.Columns.Add(“Kode Barang”, 80, HorizontalAlignment.Left)
ListView.Columns.Add(“Nama Barang”, 80, HorizontalAlignment.Left)
ListView.Columns.Add(“Merk”, 70, HorizontalAlignment.Left)
ListView.Columns.Add(“Harga”, 60, HorizontalAlignment.Left)
ListView.Columns.Add(“Jumlah Beli”, 70, HorizontalAlignment.Left)
ListView.Columns.Add(“Total Harga”, 70, HorizontalAlignment.Left)
ListView.View = View.Details
ListView.GridLines = True
ListView.FullRowSelect = True
End Sub

Sub IsiTabel()
Dim Lst As New ListViewItem
Lst.Text = NoPembelian.Text
Lst.SubItems.Add(KodeBarang.Text)
Lst.SubItems.Add(NamaBarang.Text)
Lst.SubItems.Add(Merk.Text)
Lst.SubItems.Add(Harga.Text)
Lst.SubItems.Add(Jumlah.Text)
Lst.SubItems.Add(Total.Text)
ListView.Items.Add(Lst)
End Sub

Private Sub KodeBarang_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KodeBarang.SelectedIndexChanged
Select Case KodeBarang.Text
Case “TS001″
NamaBarang.Text = “Flashdisk 4GB”
Case “TS002″
NamaBarang.Text = “Flashdisk 2GB”
Case “VG001″
NamaBarang.Text = “Flashdisk 4GB”
Case “VG002″
NamaBarang.Text = “Flashdisk 2GB”
End Select
If KodeBarang.Text = “TS001″ Then
Merk.Text = “Toshiba”
ElseIf KodeBarang.Text = “TS002″ Then
Merk.Text = “Toshiba”
ElseIf KodeBarang.Text = “VG001″ Then
Merk.Text = “V-Gen”
ElseIf KodeBarang.Text = “VG002″ Then
Merk.Text = “V-Gen”
End If
If KodeBarang.Text = “TS001″ Then
Harga.Text = “105000″
ElseIf KodeBarang.Text = “TS002″ Then
Harga.Text = “75000″
ElseIf KodeBarang.Text = “VG001″ Then
Harga.Text = “90000″
ElseIf KodeBarang.Text = “VG002″ Then
Harga.Text = “60000″
End If
End Sub

Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSimpan.Click
IsiTabel()
NoPembelian.Text = “”
KodeBarang.Text = “”
NamaBarang.Text = “”
Merk.Text = “”
Harga.Text = “”
Jumlah.Text = “”
Total.Text = “”
End Sub

Private Sub BtnHapusData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusData.Click
ListView.Items.Remove(ListView.SelectedItems(0))
End Sub

Private Sub BtnHapusSemua_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusSemua.Click
ListView.Items.Clear()
End Sub

Private Sub BtnBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnBersih.Click
NoPembelian.Text = “”
KodeBarang.Text = “”
NamaBarang.Text = “”
Merk.Text = “”
Harga.Text = “”
Jumlah.Text = “”
Total.Text = “”
End Sub

Private Sub Total_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Total.Click
Total.Text = Harga.Text * Jumlah.Text
End Sub

Private Sub Jumlah_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Jumlah.KeyPress
Dim tombol As Integer = Asc(e.KeyChar)
If tombol = 13 Then
Total_Click(sender, e)
End If
End Sub

Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.Click
End
End Sub
End Class

Hasil Program :

PENJUALAN BARANG

Jawaban No:2 “ZELY HARDI”

Listing Program :

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call Tabel()
KodeBarang.Items.Add(“TS001″)
KodeBarang.Items.Add(“TS002″)
KodeBarang.Items.Add(“VG001″)
KodeBarang.Items.Add(“VG002″)
End Sub

Sub Tabel()
ListView.Columns.Add(“No Pembelian”, 90, HorizontalAlignment.Left)
ListView.Columns.Add(“Kode Barang”, 80, HorizontalAlignment.Left)
ListView.Columns.Add(“Nama Barang”, 80, HorizontalAlignment.Left)
ListView.Columns.Add(“Merk”, 70, HorizontalAlignment.Left)
ListView.Columns.Add(“Harga”, 60, HorizontalAlignment.Left)
ListView.Columns.Add(“Jumlah Beli”, 70, HorizontalAlignment.Left)
ListView.Columns.Add(“Total Harga”, 70, HorizontalAlignment.Left)
ListView.View = View.Details
ListView.GridLines = True
ListView.FullRowSelect = True
End Sub

Sub IsiTabel()
Dim Lst As New ListViewItem
Lst.Text = NoPembelian.Text
Lst.SubItems.Add(KodeBarang.Text)
Lst.SubItems.Add(NamaBarang.Text)
Lst.SubItems.Add(Merk.Text)
Lst.SubItems.Add(Harga.Text)
Lst.SubItems.Add(Jumlah.Text)
Lst.SubItems.Add(Total.Text)
ListView.Items.Add(Lst)
End Sub

Private Sub KodeBarang_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KodeBarang.SelectedIndexChanged
Select Case KodeBarang.Text
Case “TS001″
NamaBarang.Text = “Flashdisk 4GB”
Case “TS002″
NamaBarang.Text = “Flashdisk 2GB”
Case “VG001″
NamaBarang.Text = “Flashdisk 4GB”
Case “VG002″
NamaBarang.Text = “Flashdisk 2GB”
End Select
If KodeBarang.Text = “TS001″ Then
Merk.Text = “Toshiba”
ElseIf KodeBarang.Text = “TS002″ Then
Merk.Text = “Toshiba”
ElseIf KodeBarang.Text = “VG001″ Then
Merk.Text = “V-Gen”
ElseIf KodeBarang.Text = “VG002″ Then
Merk.Text = “V-Gen”
End If
If KodeBarang.Text = “TS001″ Then
Harga.Text = “105000″
ElseIf KodeBarang.Text = “TS002″ Then
Harga.Text = “75000″
ElseIf KodeBarang.Text = “VG001″ Then
Harga.Text = “90000″
ElseIf KodeBarang.Text = “VG002″ Then
Harga.Text = “60000″
End If
End Sub

Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSimpan.Click
IsiTabel()
NoPembelian.Text = “”
KodeBarang.Text = “”
NamaBarang.Text = “”
Merk.Text = “”
Harga.Text = “”
Jumlah.Text = “”
Total.Text = “”
End Sub

Private Sub BtnHapusData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusData.Click
ListView.Items.Remove(ListView.SelectedItems(0))
End Sub

Private Sub BtnHapusSemua_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusSemua.Click
ListView.Items.Clear()
End Sub

Private Sub BtnBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnBersih.Click
NoPembelian.Text = “”
KodeBarang.Text = “”
NamaBarang.Text = “”
Merk.Text = “”
Harga.Text = “”
Jumlah.Text = “”
Total.Text = “”
End Sub

Private Sub Total_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Total.Click
Total.Text = Harga.Text * Jumlah.Text
End Sub

Private Sub Jumlah_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Jumlah.KeyPress
Dim tombol As Integer = Asc(e.KeyChar)
If tombol = 13 Then
Total_Click(sender, e)
End If
End Sub

Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.Click
End
End Sub
End Class

Hasil Program :

PENGGAJIAN KARYAWAN

Jawaban no 3 : “ZELY HARDI”

Listing Program :

Public Class Form1

Private Sub BtnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLogin.Click
If Username.Text = “ZELYHARDI” And Password.Text = “1002236″ Then
MenuUtama.Show()
Me.Hide()
Else
MsgBox(“Maaf Username/Password Salah!”)
Username.Text = “”
Password.Text = “”
End If
End Sub
End Class

Hasil Program Login :

Listing Program Menu Utama :

Public Class MenuUtama

Private Sub KeluarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KeluarToolStripMenuItem.Click
End
End Sub

Private Sub DataKaryawanToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataKaryawanToolStripMenuItem.Click
DataKaryawan.Show()
End Sub
End Class

Contoh Menu Utama :

Listing Program Data Karyawan :

Public Class DataKaryawan

Private Sub DataKaryawan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call Tabel()
End Sub

Sub Tabel()
LV.Columns.Add(“Nama”, 80, HorizontalAlignment.Left)
LV.Columns.Add(“Jabatan”, 70, HorizontalAlignment.Left)
LV.Columns.Add(“Gaji”, 70, HorizontalAlignment.Left)
LV.Columns.Add(“Status”, 70, HorizontalAlignment.Left)
LV.Columns.Add(“Tunjangan Istri”, 100, HorizontalAlignment.Left)
LV.Columns.Add(“Anak”, 50, HorizontalAlignment.Left)
LV.Columns.Add(“Tunjangan Anak”, 100, HorizontalAlignment.Left)
LV.Columns.Add(“Jam Lembur”, 80, HorizontalAlignment.Left)
LV.Columns.Add(“Lembur”, 50, HorizontalAlignment.Left)
LV.Columns.Add(“Pajak”, 50, HorizontalAlignment.Left)
LV.Columns.Add(“Total Gaji”, 80, HorizontalAlignment.Left)
LV.View = View.Details
LV.GridLines = True
LV.FullRowSelect = True
End Sub

Sub IsiTabel()
Dim Lst As New ListViewItem
Lst.Text = Nama.Text
Lst.SubItems.Add(Jabatan.Text)
Lst.SubItems.Add(Gaji.Text)
Lst.SubItems.Add(Status.Text)
Lst.SubItems.Add(TunjanganIstri.Text)
Lst.SubItems.Add(Anak.Text)
Lst.SubItems.Add(TunjanganAnak.Text)
Lst.SubItems.Add(JamLembur.Text)
Lst.SubItems.Add(Lembur.Text)
Lst.SubItems.Add(Pajak.Text)
Lst.SubItems.Add(Total.Text)
LV.Items.Add(Lst)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Jabatan.Items.Add(“Kepala Bagian”)
Jabatan.Items.Add(“Mandor”)
Jabatan.Items.Add(“Staff”)
Status.Items.Add(“Belum Menikah”)
Status.Items.Add(“Menikah”)
Anak.Items.Add(“1″)
Anak.Items.Add(“2″)
Dim Jam As Byte
For Jam = 1 To 24
JamLembur.Items.Add(Jam)
Next
End Sub

Private Sub BtnSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSimpan.Click
IsiTabel()
Nama.Text = “”
Jabatan.Text = “”
Gaji.Text = “”
Status.Text = “”
TunjanganIstri.Text = “”
Anak.Text = “”
TunjanganAnak.Text = “”
JamLembur.Text = “”
Lembur.Text = “”
Pajak.Text = “”
Total.Text = “”
End Sub

Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
MenuUtama.Show()
Me.Hide()
End Sub

Private Sub Jabatan_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Jabatan.SelectedIndexChanged
Select Case Jabatan.Text
Case “Kepala Bagian”
Gaji.Text = “2500000″
Case “Mandor”
Gaji.Text = “1750000″
Case “Staff”
Gaji.Text = “1250000″
End Select
If Jabatan.Text = “Kepala Bagian” Then
Pajak.Text = Gaji.Text * 0.015
End If
If Jabatan.Text = “Mandor” Then
Pajak.Text = Gaji.Text * 0.015
End If
If Jabatan.Text = “Staff” Then
Pajak.Text = Gaji.Text * 0.015
End If
End Sub

Private Sub Status_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Status.SelectedIndexChanged
If Jabatan.Text = “Kepala Bagian” Then
If Status.Text = “Menikah” Then
TunjanganIstri.Text = Gaji.Text * 0.09
Else
TunjanganIstri.Text = 0
End If
ElseIf Jabatan.Text = “Mandor” Then
If Status.Text = “Menikah” Then
TunjanganIstri.Text = Gaji.Text * 0.09
Else
TunjanganIstri.Text = 0
End If
ElseIf Jabatan.Text = “Staff” Then
If Status.Text = “Menikah” Then
TunjanganIstri.Text = Gaji.Text * 0.09
Else
TunjanganIstri.Text = 0
End If
End If
End Sub

Private Sub Anak_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Anak.SelectedIndexChanged
If Jabatan.Text = “Kepala Bagian” Then
If Anak.Text = “1″ Then
TunjanganAnak.Text = Gaji.Text * 0.03
ElseIf Anak.Text = “2″ Then
TunjanganAnak.Text = Gaji.Text * 0.07
Else
TunjanganIstri.Text = 0
End If
ElseIf Jabatan.Text = “Mandor” Then
If Anak.Text = “1″ Then
TunjanganAnak.Text = Gaji.Text * 0.03
ElseIf Anak.Text = “2″ Then
TunjanganAnak.Text = Gaji.Text * 0.07
Else
TunjanganIstri.Text = 0
End If
ElseIf Jabatan.Text = “Staff” Then
If Anak.Text = “1″ Then
TunjanganAnak.Text = Gaji.Text * 0.03
ElseIf Anak.Text = “2″ Then
TunjanganAnak.Text = Gaji.Text * 0.07
Else
TunjanganIstri.Text = 0
End If
End If
End Sub

Private Sub Jam_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles JamLembur.SelectedIndexChanged
If Jabatan.Text = “Kepala Bagian” Then
If JamLembur.Text >= “1″ Then
Lembur.Text = JamLembur.Text * 10000
End If
End If
If Jabatan.Text >= “Mandor” Then
If JamLembur.Text >= “1″ Then
Lembur.Text = JamLembur.Text * 7500
End If
End If
If Jabatan.Text = “Staff” Then
If JamLembur.Text >= “1″ Then
Lembur.Text = JamLembur.Text * 5000
End If
End If
End Sub

Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click
Total.Text = Val(Gaji.Text) + Val(TunjanganIstri.Text) + Val(TunjanganAnak.Text) + Val(Lembur.Text) – Val(Pajak.Text)
End Sub

Private Sub BtnHapusData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapusData.Click
LV.Items.Remove(LV.SelectedItems(0))
End Sub
End Class

Hasil Program Data Karyawan 1 :

Hasil Program Data Karyawan 2 :

Hasil Program Data Karyawan 3 :

tugas visual basic

5. Mengenai visual basic :

1.Microsoft Visual Basic (sering disingkat sebagai VB saja) merupakan sebuah bahasa pemrograman yang menawarkan Integrated Development Environment (IDE) visual untuk membuat program perangkat lunak berbasis sistem operasi Microsoft Windows dengan menggunakan model pemrograman (COM).

Visual Basic merupakan turunan bahasa pemrograman BASIC dan menawarkan pengembangan perangkat lunak komputer berbasis grafik dengan cepat.

Beberapa bahasa skrip seperti Visual Basic for Applications (VBA) dan Visual Basic Scripting Edition (VBScript), mirip seperti halnya Visual Basic, tetapi cara kerjanya yang berbeda.^[1]

Para programmer dapat membangun aplikasi dengan menggunakan komponen-komponen yang disediakan oleh Microsoft Visual Basic Program-program yang ditulis dengan Visual Basic juga dapat menggunakan Windows API, tapi membutuhkan deklarasi fungsi luar tambahan.^[1]

Dalam pemrograman untuk bisnis, Visual Basic memiliki pangsa pasar yang sangat luas.^[1] Sebuah survey yang dilakukan pada tahun 2005 menunjukkan bahwa 62% pengembang perangkat lunak dilaporkan menggunakan berbagai bentuk Visual Basic, yang diikuti oleh C++, JavaScript, C#, dan Java.^[1]

2. Sejarah

Bill Gates, pendiri Microsoft, memulai bisnis perangkat lunak dengan mengembangkan interpreter bahasa Basic untuk Altair 8800, untuk kemudian ia ubah agar dapat berjalan di atas IBM PC dengan sistem operasi DOS. Perkembangan berikutnya ialah diluncurkannya BASICA (basic-advanced) untuk DOS. Setelah BASICA, Microsoft meluncurkan Microsoft QuickBasic dan Microsoft Basic (dikenal juga sebagai Basic Compiler).

Visual Basic adalah pengembangan dari bahasa komputer BASIC (Beginner’s All-purpose Symbolic Instruction Code). Bahasa BASIC diciptakan oleh Professor John Kemeny dan Thomas Eugene Kurtz dari Perguruan Tinggi Dartmouth pada pertengahan tahun 1960-an.^[2] Bahasa program tersebut tersusun mirip dengan bahasa Inggris yang biasa digunakan oleh para programer untuk menulis program-program komputer sederhana yang berfungsi sebagai pembelajaran bagi konsep dasar pemrograman komputer.

Sejak saat itu, banyak versi BASIC yang dikembangkan untuk digunakan pada berbagai platform komputer,^[2] seperti Microsoft QBASIC, QUICKBASIC, GWBASIC, IBM BASICA, Apple BASIC dan lain-lain.

Apple BASIC dikembangkan oleh Steve Wozniak, mantan karyawan Hewlett Packard dan teman dekat Steve Jobs (pendiri Apple Inc.).^[2] Steve Jobs pernah bekerja dengan Wozniak sebelumnya (mereka membuat game arcade “Breakout” untuk Atari). Mereka mengumpulkan uang dan bersama-sama merakit PC, dan pada tanggal 1 April 1976 mereka secara resmi mendirikan perusahaan komputer Apple. Popularitas dan pemakaian BASIC yang luas dengan berbagai jenis komputer turut berperan dalam mengembangkan dan memperbaiki bahasa itu sendiri, dan akhirnya berujung pada lahirnya Visual Basic yang berbasis GUI (Graphic User Interface) bersamaan dengan Microsoft Windows. Pemrograman Visual Basic begitu mudah bagi pemula dan programer musiman karena ia menghemat waktu pemrograman dengan tersedianya komponen-komponen siap pakai.^[2]

Hingga akhirnya Visual Basic juga telah berkembang menjadi beberapa versi, sampai yang terbaru, yaitu Visual Basic 2010. Bagaimanapun juga Visual Basic 6.0 tetap menjadi versi yang paling populer karena mudah dalam membuat programnya dan ia tidak menghabiskan banyak memori.^[2]

Sejarah BASIC di tangan Microsoft sebagai bahasa yang diinterpretasi (BASICA) dan juga bahasa yang dikompilasi (BASCOM) membuat Visual Basic diimplementasikan sebagai gabungan keduanya.^[3] Programmer yang menggunakan Visual Basic bisa memilih kode bahasa pemrograman yang dikompilasi atau kode yang harus bahasa pemrograman yang diinterpretasikan sebagai hasil porting dari kode VB.^[3] Sayangnya, meskipun sudah terkompilasi jadi bahasa mesin, DLL bernama MSVBVMxx.DLL tetap dibutuhkan. Namun karakteristik bahasa terkompilasi tetap muncul (ia lebih cepat dari kalau kita pakai mode terinterpretasi).^[3]

3. Perkembangan Visual Basic

Visual Basic 1.0 dikenalkan pada tahun 1991. Konsep pemrograman dengan metode drag-and-drop untuk membuat tampilan aplikasi Visual Basic ini diadaptasi dari prototype generator form yang dikembangkan oleh Alan Cooper dan perusahaannya, dengan nama Tripod. Microsoft kemudian mengontrak Cooper dan perusahaannya untuk mengembangkan Tripod menjadi sistem form yang dapat diprogram untuk Windows 3.0, di bawah kode nama Ruby.

Tripod tidak memiliki bahasa pemrograman sama sekali. Ini menyebabkan Microsoft memutuskan untuk mengkombinasikan Ruby dengan bahasa pemrograman Basic untuk membuat Visual Basic.

 Dari waktu ke waktu

• Proyek Thunder dimulai.
• Visual Basic 1.0 dirilis untuk Windows pada Comdex/Windows Trade Show di Atlanta, Georgia pada Mei 1991.
• Visual Basic 1.0 untuk DOS dirilis pada September 1992. Bahasa pemrogramannya sendiri tidak terlalu kompatibel dengan Visual Basic untuk Windows, karena sesungguhnya itu adalah versi selanjutnya dari kompiler BASIC berbasis DOS yang dikembangkan oleh Microsoft sendiri, yaitu QuickBASIC. Antarmuka dari program ini sendiri menggunakan antarmuka teks, dan memanfaatkan kode-kode ASCII tambahan untuk mensimulasikan tampilan GUI.
• Visual Basic 2.0 dirilis pada November 1992. Lingkungan pemrogramannya lebih mudah untuk digunakan, dan kecepatannya lebih ditingkatkan.
• Visual Basic 3.0 dirilis pada musim semi 1993 dan hadir dalam dua versi: Standar dan Professional. VB3 juga menyertakan versi 1.1 dari Microsoft Jet Database Engine yang dapat membaca dan menulis database Jet/Access 1.x.
• Visual Basic 4.0 (Agustus 1995) adalah versi pertama yang dapat membuat program 32-bit seperti program 16-bit. VB4 juga memperkenalkan kemampuannya dalam membuat aplikasi non-GUI. Bila versi sebelumnya menggunakan kontrol VBX, sejak VB4 dirilis Visual Basic menggunakan kontrol OLE (dengan ekstensi file *.OCX), yang lebih dikenal kemudian dengan kontrol ActiveX.
• Dengan versi 5.0 (Februari 1997), Microsoft merilis Visual Basic eksklusif untuk versi 32-bit dari Windows. Para programmer yang lebih memilih membuat kode 16-bit dapat meng-impor program yang ditulis dengan VB4 ke versi VB5, dan program-program VB5 dapat dikonversi dengan mudah ke dalam format VB4.
• Visual Basic 6.0 (pertengahan 1998) telah diimprovisasi di beberapa bagian, termasuk kemampuan barunya, yaitu membuat aplikasi web. Meskipun kini VB6 sudah tidak didukung lagi, tetapi file runtime-nya masih didukung hingga Windows 7.

 4.Pemrograman Berorientasi Objek (OOP)

Visual Basic merupakan bahasa yang mendukung Pemrograman berorientasi objek , namun tidak sepenuhnya, Beberapa karakteristik obyek tidak dapat dilakukan pada Visual Basic, seperti Inheritance tidak dapat dilakukan pada class module, Polymorphism secara terbatas bisa dilakukan dengan mendeklarasikan class module yang memiliki Interface tertentu. Visual Basic (VB) tidak bersifat case sensitif.^[4]

5. Desain Visual dan Komponen

Visual Basic menjadi populer karena kemudahan desain form secara visual dan adanya kemampuan untuk menggunakan komponen-komponen ActiveX yang dibuat oleh pihak lain.^[5] Namun komponen ActiveX memiliki masalahnya tersendiri yang dikenal sebagai DLL hell,Pada Visual Basic .NET, Microsoft mencoba mengatasi masalah DLL hell dengan mengubah cara penggunaan komponen (menjadi independen terhadap registry).^[5]

 

 

^{Kegiatan saya sehari-hari :}

        1. Pagi s/d sore hari Saya Kerja di Pt.Bensatra yaitu di bidang Advertising 

        2. Sore s/d malam tepatnya jam 21.00 WIB Saya Kuliah

        3. Sepulang kuliah sering  mengulangi pelajaran kuliah tetapi lebih sering nongkrong sihh

       4.   Sebelum tidur wajib makan malam

       5.  Pukul 00.00 wib….waktu nya saya istirhat….(tidur)

ARTIKEL BAHASA PEMROGRAMAN

 1)Bahasa pemrograman tingkat tinggi Bahasa pemrograman tingkat tinggi adalah sebuah bahasa pemrograman yang jika dibandingkan dengan bahasa pemrograman tingkat rendah memiliki sifat lebih mudah digunakan, lebih portabel (mudah diadaptasikan) antar-platform, dan lebih abstrak. Bahasa-bahasa semacam ini sering melakukan abstraksi terhadap beberapa operasi CPU, seperti halnya pengaksesan memori. Fitur-fitur Bahasa pemrograman tingkat tinggi Istilah “bahasa pemrograman tingkat tinggi” tidak serta merta menjadikan bahasa tersebut lebih baik dibandingkan dengan bahasa pemrograman tingkat rendah. Akan tetapi, maksud dari “tingkat tinggi” di sini merujuk kepada abstraksi yang lebih tinggi dibandingkan dengan bahasa tingkat rendah terhadap bahasa mesin. Dibandingkan dengan harus berurusan dengan register, alamat memori dan stack-stack panggilan, bahasa pemrograman tingkat tinggi akan berurusan dengan variabel, larik, dan ekspresi aritmetika atau aljabar Boolean. Selain itu, tidak seperti bahasa rakitan, bahasa tingkat tinggi tidak memiliki opcode atau kode operasi yang dapat secara langsung menjadikan bahasa tersebut menjadi kode mesin. Fitur lainnya seperti rutin-rutin penanganan string, fitur pemrograman berorientasi objek, input/output terhadap berkas juga terdapat di dalam jenis bahasa ini. Secara umum, bahasa tingkat tinggi akan membuat pemrograman komputer yang kompleks menjadi lebih sederhana, sementara bahasa tingkat rendah cenderung untuk membuat kode yang lebih efisien. Dalam sebuah bahasa tingkat tinggi, elemen-elemen kompleks dapat dipecah ke dalam beberapa elemen yang lebih sederhana, meski masih dapat dianggap kompleks, di mana bahasa tersebut menyediakan abstraksi. Karena alasan ini, kode-kode yang harus berjalan dengan efisien dapat ditulis dalam bahasa pemrograman tingkat rendah, sementara bahasa tingkat tinggi digunakan untuk mempermudah pemrograman. Akan tetapi, dengan bertambah rumitnya arsitektur mikroprosesor modern, kompilator-kompilator bahasa pemrograman tingkat tinggi dapat membuat kode yang lebih efisien dibandingkan dengan para programmer bahasa pemrograman tingkat rendah yang melakukannya secara manual. Perlu dicatat bahwa istilah “tingkat tinggi” dan “tingkat rendah” adalah relatif. Pada awalnya, bahasa rakitan dianggap sebagai bahasa tingkat rendah, sementara COBOL, C, dan lain-lainnya dianggap sebagai bahasa tingkat tinggi, mengingat mereka mengizinkan abstraksi terhadap fungsi, variabel, dan evaluasi ekspresi. Akan tetapi, banyak programmer saat ini mungkin menganggap bahasa C sebagai bahasa pemrograman tingkat rendah, mengingat bahasa pemrograman tersebut mengizinkan akses memori secara langsung dengan menggunakan alamatnya, dan juga dapat menggunakan beberapa direktif bahasa rakitan. http://id.wikipedia.org/wiki/Bahasa_pemrograman_tingkat_tinggi 2)CONTOH BAHASA PEMROGRAMAN KOMPUTER C++ C++ adalah salah satu bahasa pemrograman komputer. Dibuat pada tahun 1980-an oleh Bell Labs (Bjarne Stroustrup) sebagai pengembangan dari Bahasa pemrograman C. Salah satu perbedaan yang paling mendasar dengan bahasa C adalah dukungan terhadap konsep pemrograman berorientasi objek (Object Oriented Programming). Program C++ pertama Contoh program sederhana C++ untuk hello world dengan menggunakan Pustaka Dasar C++ dapat dilihat di bawah ini: #include // provides std::cout int main() { std::cout << “Hello, world!\n”; return 0; } Kata yang dipesan Kelompok pertama C++ mempunyai 32 buah kata yang dipesan (reserved words). Kata kunci kelompok pertama merupakan turunan dari bahasa C, di antaranya: auto const double float int short struct unsigned break continue else for long signed switch void case default enum goto register sizeof typedef volatile char do extern if return static union while Kelompok kedua Kata yang dipesan kelompok kedua berjumlah 30. Kata-kata ini adalah baru dan hanya ada di bahasa C++. asm dynamic_cast namespace reinterpret_cast try bool explicit new static_cast typeid catch false operator template typename class friend private this using const_cast inline public throw virtual delete mutable protected true wchar_t Kata-kata yang dipesan tersebut di atas tidak boleh dipakai sebagai nama variable, class, enum, macro, dan struct. Tipe data dasar Untuk menyimpan suatu variabel diperlukan tempat khusus di dalam memori komputer. Besar dan tipe dari variabel-variabel di dalam standar program C++ dispesifikasikan sebagai berikut. Nama Keterangan Ukuran Jangkauan char Abjad/karakter atau untuk bilangan bulat kecil 1 byte signed: -128 to 127 unsigned: 0 to 255 short int (short) Bilangan bulat dengan jangkauan pendek 2 byte signed: -32768 to 32767 unsigned: 0 to 65535 int Bilangan bulat 4 byte signed: -2147483648 to 2147483647 unsigned: 0 to 4294967295 long int (long) Integer dengan jangkauan panjang 4 byte signed: -2147483648 to 2147483647 unsigned: 0 to 4294967295 bool Boolean, dapat bernilai benar atau salah (true or false) i byte true or false float Angka dengan titik mengambang (bilangan cacah) 4 byte 3.4e +/- 38 (7 digit) double Bilangan cacah dengan ketelitian ganda 8 byte 1.7e +/- 308 (15 digits) long double Bilangan cacah dengan ketelitian ganda panjang 8 byte 1.7e +/- 308 (15 digits) wchar_t Karakter lebar, biasa dipakai untuk Unicode karakter 2 byte 1 karakter lebar Daftar C++ compiler Untuk mengubah kode-kode C++ program menjadi suatu program aplikasi yang dimengerti oleh sistem operasi dan komputer, diperlukan sebuah kompilator C++. Berikut ini adalah beberapa kompilator C++ yang dapat digunakan secara gratis. Microsoft Visual C++ 2005 Express Turbo C++ Explorer Apple Xcode for Mac OS X Open Source Watcom / OpenWatcom C/C++ Compiler Digital Mars C/C++ Compiler (Symantec C++ Replacement) Bloodshed Dev-C++ C++ Compiler Free Microsoft .NET Framework Software Development Kit (SDK) / Free Microsoft Visual C++ Compiler Intel C++ Compiler for Linux Non-Commercial Version Sun Studio Compilers and Tools Open64 Compiler Tools Apple’s Macintosh Programmer’s Workshop (C and C++ compilers) TenDRA C/C++ Compiler GNU C/C++ Compiler Ch Embeddable C/C++ Interpreter (Standard Edition) DJGPP C and C++ Compilers CINT C and C++ Interpreter SDCC C Cross-compiler Cygwin Project (C & C++ Compilers) SDCC C Cross-compiler Code::Blocks Pranala luar Homepage Bjarne Stroustrup C++ Users Journal Standard Template Library ISO Standard Andrei Alexandrescu Code guru, C++ resource C++ basic tutorial http://id.wikipedia.org/wiki/C%2B%2B

C (bahasa pemrograman)

Dari Wikipedia bahasa Indonesia, ensiklopedia bebas

Belum Diperiksa

Langsung ke: navigasi, cari

Bahasa pemrograman C merupakan salah satu bahasa pemrograman komputer. Dibuat pada tahun 1972 oleh Dennis Ritchie untuk Sistem Operasi Unix di Bell Telephone Laboratories.

Meskipun C dibuat untuk memprogram sistem dan jaringan komputer namun bahasa ini juga sering digunakan dalam mengembangkan software aplikasi. C juga banyak dipakai oleh berbagai jenis platform sistem operasi dan arsitektur komputer, bahkan terdapat beberepa compiler yang sangat populer telah tersedia. C secara luar biasa memengaruhi bahasa populer lainnya, terutama C++ yang merupakan extensi dari C.

Bahasa Pemograman



Hello world!

Welcome to WordPress.com. After you read this, you should delete and write your own post, with a new title above. Or hit Add New on the left (of the admin dashboard) to start a fresh post.

Here are some suggestions for your first post.

1. You can find new ideas for what to blog about by reading the Daily Post.
2. Add PressThis to your browser. It creates a new blog post for you about any interesting  page you read on the web.
3. Make some changes to this page, and then hit preview on the right. You can alway preview any post or edit you before you share it to the world.