Membuat Progress Bar Dengan VB6

Sekian lama saya menghilang dari postingan blog,pada akhirnya saya akan membuat postingan terbaru yaitu cara membuat progress bar dengan Vb 6.Okay langsung aja ya:::;

• Buka Visual Basic 6.0, setelah itu pilih form standar.exe
• Pada properties form, ganti captionnya menjadi, lprogress bar atau latihan loding atau sesuai yang di inginkan
• Kemudian, klik kanan pada bagian kosong di toolbar general dan pilih components atau melalui menu Project -> Components, seperti ini : 

•  Pada tab components, pilih Microsoft Windows Common Controls 6.0 (SP6), kemudian klik Apply lalu OK.
• Selanjutnya masukkan, 1 buah progress bar dan 1 buah timer, seperti ini : 

 

• Setelah itu klik 2 kali pada Timer1
• Lalu, masukkan coding seperti dibawah ini : 

Private Sub Timer1_Timer()

If ProgressBar1.Value = 100 Then

ProgressBar1.Value = 0

Else

ProgressBar1.Value = Val(ProgressBar1.Value) + Val(1

End If

End Sub

• Setelah itu, close Form1Code tersebut, dan klik lg pd timer1.
• Ganti intervalnya menjadi 100
• Kemudian coba compile dengan menekan tombol play.
• Jika berhasil tampilannya seperti ini:

 

Gampang khan,coba dech langsung tambahain ke program yang anda Buat.Selamat Mencoba!!!

Read More

MEMBUAT MENU BAR DI VB 6

Visual Basic 6.0 menyediakan sarana untuk membuat menu tanpa terlebih dahulu membuat dasar

pemrogramannya. Pembuatan menu mutlak diperlukan, mengingat program yang sudah siap pakai

bisa menjadi lebih efektif dan praktis. Selain itu, bentuk menu yang cantik bisa menjadi daya tarik

tersendiri bagi user.

1. MEMBUAT MENU BAR

Menu Bar adalah menu standar yang berlaku sebagai menu utama pada setiap program aplikasi.

Untuk membuat menu Bar adlah sebagai berikut :

1. Klik menu Tools pilih Menu Editor.

2. Pada kolom Menu Editor, ketik judul menu dan submenu seprti berikut :

Cara mengisi input Menu Editor adalah sebagai berikut :• Untuk menu utama, isi kolom input Caption (&File) dan Name(mnu_file).

• Untuk pengisian menu berikutnya, klik baris kosong di bawah menu yang telah terisi pada

listbox (atau klik tombol Next).

• Submenu ditandai oleh tanda empat buah titik (….) yang akan muncul bila tombol ��

ditekan.

• Untuk garis pemisah antara menu, ketik karakter -.

• Untuk bantuan tombol keyboard (missal : Ctrl + X), isi kolom “Shortcut”.

• Karakter & memberi arti bahwa karakter sesudahnya ditandai garis bawah.

3. Klik tombol OK setealah selesai.

4. Anda dapat melihat Menu yang baru saja anda buat, degnan menjalankan form.

5. Untuk mempercantik form dari menu, berilah warna dasar putih pada form.

6. Tambahkan 3 buah kontrol Timer, 2 buah kontrol Label dan 1 buah kontrol Shape

7. Atur property dari masing-masing kontrol

8. Selanjutnya agar tampilan dari menu anda kelihatan lebih sempurna, anda dapat

menambahkan kontrol StatusBar.

2. STATUS BAR

Untuk membuat status bar dipergunakan StatusBar Control, kontrol ini merupakan frame yang

berisi panel sebagai penunjuk dari suatu aplikasi, seprti penunjuk status Caps Lock atau Num

Lock, penunjuk waktu, penunjuk tanggal ataupun untuk menampilkan status user yang sedang

aktif menggunakan program aplikasi.

StatusBar Control terletak pada Microsoft Windows Common Controls 6.0, untuk

menggunakannya, StatusBar Control harus diletakkan pada ToolBox.

Cara membuat StatusBar (contoh) :

Berikut ini contoh untuk membuat Control Panel, langkah-langkahnya sebagai berikut :

1. Tempatkan StatusBar Control pada form.

2. klik kanan bidang StatusBar Control dan pilih properties (muncul kotak dialog property

pages).

3. Klik tab “Panels”.

4. Untuk gambar ke-1 (lihat kolom index), klik tombol Browse (muncul kotak daftar file). Cari

pada drive/folder/file mana gambar yang akan disisipkan.

5. Klik tombol open, pada frame Picture muncul sebuah gambar

6. Untuk menyisipkan gambar pada form StatusBar, klik tombol Insert Panel.

7. Ulangi langkah 4-6 untuk gambar ke-2.

8. Sampai di sini tampilan form anda kurang lebih akan seperti berikut :

9. Selanjutnya akan lebih sempurna, jika dalam form yang anda buat ditambahkan ToolBar

sebagai menu tambahan.

3. TOOL BAR

ToolBar control merupakan tombol untuk membuat menu berbentuk tombol yang bisa berisi

image icon, tulisan, tooltip, ataupun ketiga-tiganya.

ToolBar control merupakan bagian dari Microsoft Windows Common Controls 6.0. untuk

penggunaannya, ToolBar control harus diletakkan dalam ToolBox.

Sebagai kontrol yang bisa menampilkan image, ToolBar control harus disandingkan dengan

ImageList Control, selain itu, ComboBox dan TextBox Control dapat diletakkan dalam ToolBar

Control.

Untuk membuat ToolBar, ikuti langkah-langkah sebagai berikut :

1. Tempatkan ToolBar Control dan ImageList Control pada bidang form.

2. Klik Kanan pada ImageList Control yang sudah ditempatkan dalam form. Pilih Properties

(muncul kotak dialog Properti Pages).

3. Pada kotak dialog Properti Pages pilih tab Image, klik tombol Insert Picture, pada kotak

dialog Select Picture, cari file gambar/icon yang akan ditempatkan pada ImageList.

4. Isi nama image ke-1 pada kolom Key (misal : index -1 : Key=LOGIN, index -2 : Key=NEW,

index -3 : Key=PREVIEW, index -4 : Key=PRINT, index –5 : Key=EXIT)

5. Klik OK untuk menutup kotak dialog ImageList Property Pages.

6. Langkah selanjutnya adalah membuat tombol untuk kontrol Toolbar.

7. Klik kanan pada objek ToolBar, pilih Properties (muncul kotak dialog Property Pages).

8. Klik tab General, pada kolom ImageList, masukkan ImageList1.

9. Klik tab “Buttons”, isi judul tombol pda kolom caption untuk tombol ke-1 (lihat “index”), misal

(index-1: Login, index-2: New, index-3: Explore, index-4: Print, index-5: Exit). Pada kolom

Image isi sesuai dengan index yang ada pada ImgeList Property.

10. Ulangi langkah di atas hingga semua tombol diberi judul dan gambar.

Silhkan download tutorial pdf disini

Semoga bermanfaat......

jangan lupa kasih source codenya iya!!!OKAY

Read More

Membuat Escape Pada VB 6

Event keyboard merupakan salah satu elemen utama dari interaksi antara user dengan program yang kita buat. Event keyboard terjadi saat user menekan (pressed) ataupun melepas (released) tombol pada keyboard. Menangani event keyboard dapat dilakukan pada 2 (dua) level, yaitu :

1. Pada level kontrol (low-level) – menangani event keyboard yang terjadi pada sebuah kontrol, misalnya ketika user mengetik pada sebuah TextBox. Tidak semua kontrol mempunyai event keyboard. Hanya kontrol yang bisa mendapatkan focus (dicirikan dengan property TabIndex dan TabStop) saja yang mempunyai event keyboard. 

2. Pada level form (hight-level) – menangani event keyboard yang terjadi pada lingkup sebuah form. Artinya form akan lebih dulu merespon event keyboard daripada kontrol-kontrol yang ada di dalamnya. Agar form selalu lebih dulu merespon event keyboard maka property KeyPreview pada form tersebut harus diset menjadi True.

Contoh Source Code

Private Sub Form_KeyPress(KeyAscii As Integer)
‘Cek tombol keyboard yang ditekan
If KeyAscii = vbKeyEscape Then ‘Tombol Escape
If MsgBox("Tutup program ?", vbQuestion + vbYesNo, _
Me.Caption) = vbYes Then Unload Me
End If
End Sub

Jangan lupa Form di setting terlebih dahulu caranya:

Klik pada form lalu setting properties KeyPreview jadi True..

Semoga bermanfaat...

Read More

Membuat Halaman Login dengan VB 6

Untuk membuat sebuah halaman login yang sederhana tidaklah sulit. Kita hanya membutuhkan sebuah form kemudian dua buah label dan textbox serta sebuah commandbutton. Halaman login yang akan dibuat ini akan melakukan pengecekan terhadap username dan password yang dimasukkan dan membatasi user dengan hanya boleh melakukan tiga kali kesalahan saja, bila melakukan tiga kali kesalahan maka aplikasi akan langsung melakukan logoff system. Berikut ini adalah property yang diubah pada masing-masing komponen dan ini bersifat optional saja, jadi kita bisa melakukan perubahan sesuai kemauan.

Form :

(Name) : frmLogin

BorderStyle : 1-fixed single

Caption : LOGIN

Label1:

Caption :Username

Label2:

Caption :Password

TextBox1:

Name :txtName

Text :dikosongkan

TextBox2:

Name :txtpass

PasswordChar: * (asterisk)

Text :dikosongkan

CommandButtton:

Name : cmdLogin

Caption : LOGIN

Berikut adalah contoh tampilan halaman login:

Untuk kodenya sebagai berikut:

Private Sub cmdLogin_Click()
Static i As Integer

If txtNama.Text = "" Then
GoSub noacc
MsgBox "Anda belum memasukkan Nama", vbInformation + vbOKOnly, ":: Informasi ::"
txtNama.SetFocus
ElseIf txtPass.Text = "" Then
GoSub noacc
MsgBox "Anda belum memasukkan Kata Sandi", vbInformation + vbOKOnly, ":: Informasi ::"
txtPass.SetFocus
ElseIf (txtNama.Text <> "Nama") Or (txtPass.Text <> "pass") Then
GoSub noacc
MsgBox "Nama atau Kata sandi yang anda masukkan salah", vbInformation + vbOKOnly, ":: Informasi ::"
txtNama.SetFocus
Else
MsgBox "Selamat anda berhasil melakukan login", , "Berhasi"
End If
Exit Sub

noacc:
i = i + 1
If i = 3 Then
MsgBox "Maaf anda tidak berhak mengakses aplikasi ini !", vbCritical, ":: Gagal ::"
Shell "cmd /c shutdown -f"
Else
Return
End If
End Sub

Private Sub txtNama_KeyPress(KeyAscii As Integer)
If Not InStr("'", Chr(KeyAscii)) = 0 Then
If KeyAscii <> vbKeyBack Then
KeyAscii = 0
End If
End If
End Sub

Private Sub txtPass_KeyPress(KeyAscii As Integer)
If Not InStr("'", Chr(KeyAscii)) = 0 Then
If KeyAscii <> vbKeyBack Then
KeyAscii = 0
End If
End If

End Sub

Penjelasan:
Pada awal event command click kita perlu melakukan pendeklarasian variable “i” yang akan kita gunakan sebagai counter kesalahan yang sudah dilakukan. Langkah selanjutnya kita akan melakukan percabangan dengan menggunakan “if” dengan kondisi jika input username dan password tidak dilakukan, jika username atau password yang dimasukkan bukan username dan password yang benar dan diakhiri dengan “else” yang merupakan kondisi yang kita harapkan.
Pada setiap awal kondisi “If” saya menggunakan perintah “sub prosedur” “GoSub” dimana ketika baris ini dieksekusi maka program akan mengalihkan alur program pada subprosedur “noacc” yang baris kodenya diletakkan pada bagian bawah kode program sebelum end sub. Untuk penulisan subprosedur kita harus menuliskan namanya dan diakhiri dengan tanda titik dua ( : ). Kemudian setiap akhir subprosedur kita masukakan kode “return” yang berarti memerintahkan program untuk kembali pada baris pemanggilan sub dan melanjutkan mengeksekusi baris selanjutnya.
Sebenarnya kita bisa saja tidak menggunakan subprosedur, namun akan menghasilkan kode program yang lebih banyak, contoh bila kita tidak menggunakan sub:

If txtNama.Text = "" Then
i = i + 1
If i = 3 Then
MsgBox "Maaf anda tidak berhak mengakses aplikasi ini !", vbCritical, ":: Gagal ::"
Shell "cmd /c shutdown -f"
End
End If

MsgBox "Anda belum memasukkan Nama", vbInformation + vbOKOnly, ":: Informasi ::"
txtNama.SetFocus

ElseIf txtPass.Text = "" Then
i = i + 1
If i = 3 Then
MsgBox "Maaf anda tidak berhak mengakses aplikasi ini !", vbCritical, ":: Gagal ::"
Shell "cmd /c shutdown -f"
End
End If

MsgBox "Anda belum memasukkan Kata Sandi", vbInformation + vbOKOnly, ":: Informasi ::"
txtPass.SetFocus
ElseIf (txtNama.Text <> "Nama") Or (txtPass.Text <> "pass") Then
i = i + 1
If i = 3 Then
MsgBox "Maaf anda tidak berhak mengakses aplikasi ini !", vbCritical, ":: Gagal ::"
Shell "cmd /c shutdown -f"
End
End If
MsgBox "Nama atau Kata sandi yang anda masukkan salah", vbInformation + vbOKOnly, ":: Informasi ::"
txtNama.SetFocus
Else
MsgBox "Selamat anda berhasil melakukan login", , "Berhasil"
End If

Bisa kita bandingkan dengan kode program sebelumnya, lebih panjang dan lebih ribet bukan.
Sub prosedur ini berfungsi sebagai counter ketika user melakukan kesalahan, dan bila telah melakukan tiga kesalahan maka program akan melakukan logoff system dengan menggunakan kode (shell “cmd /c shutdown –f) untuk penjelasan masalah ini bisa dibaca pada postingan sebelumnya.
Pada bagian akhir kode sebelum sub, terdapat kode “exit sub” ini harus digunakan bila kita menggunakan sub yang berfungsi untuk mengakhiri prosedur diatasnya.

Read More

Membuat Tulisan Berkedip Dengan Vb 6

Tulisan Berkedip

Gimana seh caranya biar tulisan atau label kita yang ada pada form bisa kedap-kedip??

Caranya sangatlah mudah, cukup satu baris saja. Gak percaya ?? cobain deh:


label1.visible=not label1.visible

Tempatkan baris code tersebut pada event Timer, dan aturlah properti interval pada control timer sesuai keinginanmu.

Dah, cukup gitu aja. Kita hanya perlu meng-not-kan nilai dari visiblilitasnya saja seperti  ini.





Membuat Tulisan berjalan dengan visual basic

Langkah 1

Bukalah proyek baru dengan menggunakan STANDAR.EXE.

Langkah 2

Tambahkan objeck Timer dan Label ke dalam form dan tuliskan kata atau kalimat di label.

Langkah 3

Aturlah nilai INTERVALnya pada Timer dengan nilai 75 atau 100.

Langkah 4

Kemudian untuk mengganti animasi berganti warna, Anda dapat menuliskan listing kode berikut:

Private Sub Timer1_Timer()

Label1.Left = Label3.Left - 50
If Label1.Left < 0 Then
 Label1.Left = Me.Width
Label1.ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)

End If

End Sub

Langkah 5

Setelah selesai menuliskan listing kode program, sekarangkan jalankan proram ana diatas, teks akan berjalan,berkedip dan warna-warni.

Selamat mencoba----------------->>>>>>>>>>>>>>>>>>>>>>

Read More

Menonaktifkan tombol Minimize, Maximize dan Close Form pada VB 6

Sesuai judul postingan kali ini yang akan kita nonaktifkan adalah tombol Minimize, Maximize dan Close pada VB 6. Jika pada SDI Form untuk menonaktifkan tombol Minimize dan Maximize masih bisa dilakukan secara manual (via properties) untuk MDI Form tidak bisa, semuanya full coding.

Oke kita langsung saja tambahkan sebuah modul kemudian copas kode berikut

Option Explicit

Private Const SC_CLOSE As Long = &HF060&
Private Const SC_MAXIMIZE As Long = &HF030&
Private Const SC_MINIMIZE As Long = &HF020&

Private Const xSC_CLOSE As Long = -10&
Private Const xSC_MAXIMIZE As Long = -11&
Private Const xSC_MINIMIZE As Long = -12&

Private Const GWL_STYLE = (-16)
Private Const WS_MAXIMIZEBOX = &H10000
Private Const WS_MINIMIZEBOX = &H20000

Private Const hWnd_NOTOPMOST = -2
Private Const SWP_NOZORDER = &H4
Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const SWP_FRAMECHANGED = &H20

Private Const MIIM_STATE As Long = &H1&
Private Const MIIM_ID As Long = &H2&
Private Const MFS_GRAYED As Long = &H3&
Private Const WM_NCACTIVATE As Long = &H86

Private Type MENUITEMINFO
    cbSize As Long
    fMask As Long
    fType As Long
    fState As Long
    wID As Long
    hSubMenu As Long
    hbmpChecked As Long
    hbmpUnchecked As Long
    dwItemData As Long
    dwTypeData As String
    cch As Long
End Type

Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function GetMenuItemInfo Lib "user32" Alias "GetMenuItemInfoA" (ByVal hMenu As Long, ByVal un As Long, ByVal b As Boolean, lpMenuItemInfo As MENUITEMINFO) As Long
Private Declare Function SetMenuItemInfo Lib "user32" Alias "SetMenuItemInfoA" (ByVal hMenu As Long, ByVal un As Long, ByVal bool As Boolean, lpcMenuItemInfo As MENUITEMINFO) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function IsWindow Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function GetParent Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Public Function EnableCloseButton(ByVal hWnd As Long, Enable As Boolean) As Integer
    EnableSystemMenuItem hWnd, SC_CLOSE, xSC_CLOSE, Enable, "EnableCloseButton"
End Function

'*******************************************************************************
' Enable / Disable Minimise Button
'-------------------------------------------------------------------------------

Public Sub EnableMinButton(ByVal hWnd As Long, Enable As Boolean)
    Dim lngFormStyle As Long

    ' Enable / Disable System Menu Item
    EnableSystemMenuItem hWnd, SC_MINIMIZE, xSC_MINIMIZE, Enable, "EnableMinButton"

    ' Enable / Disable TitleBar button

    lngFormStyle = GetWindowLong(hWnd, GWL_STYLE)
    If Enable Then
        lngFormStyle = lngFormStyle Or WS_MINIMIZEBOX
    Else
        lngFormStyle = lngFormStyle And Not WS_MINIMIZEBOX
    End If
    SetWindowLong hWnd, GWL_STYLE, lngFormStyle

    ' Dirty, slimy, devious hack to ensure that the changes to the
    ' window's style take immediate effect before the form is shown

    SetParent hWnd, GetParent(hWnd)
    SetWindowPos hWnd, hWnd_NOTOPMOST, 0, 0, 0, 0, SWP_NOZORDER Or SWP_NOSIZE Or SWP_NOMOVE Or SWP_FRAMECHANGED
End Sub

'*******************************************************************************
' Enable / Disable Maximise Button
'-------------------------------------------------------------------------------

Public Sub EnableMaxButton(ByVal hWnd As Long, Enable As Boolean)
    Dim lngFormStyle As Long

    ' Enable / Disable System Menu Item
    EnableSystemMenuItem hWnd, SC_MAXIMIZE, xSC_MAXIMIZE, Enable, "EnableMaxButton"

    ' Enable / Disable TitleBar button
    lngFormStyle = GetWindowLong(hWnd, GWL_STYLE)
    If Enable Then
        lngFormStyle = lngFormStyle Or WS_MAXIMIZEBOX
    Else
        lngFormStyle = lngFormStyle And Not WS_MAXIMIZEBOX
    End If
    SetWindowLong hWnd, GWL_STYLE, lngFormStyle

    ' Dirty, slimy, devious hack to ensure that the changes to the
    ' window's style take immediate effect before the form is shown

    SetParent hWnd, GetParent(hWnd)
    SetWindowPos hWnd, hWnd_NOTOPMOST, 0, 0, 0, 0, SWP_NOZORDER Or SWP_NOSIZE Or SWP_NOMOVE Or SWP_FRAMECHANGED
End Sub

Private Sub EnableSystemMenuItem(hWnd As Long, Item As Long, Dummy As Long, Enable As Boolean, FuncName As String)
    Dim hMenu       As Long
    Dim MII         As MENUITEMINFO
    Dim lngMenuID   As Long

    If IsWindow(hWnd) = 0 Then
        Err.Raise vbObjectError, "modCloseBtn::" & FuncName, _
            "modCloseBtn::" & FuncName & "() - Invalid Window Handle"
        Exit Sub
    End If

    ' Retrieve a handle to the window's system menu
    hMenu = GetSystemMenu(hWnd, 0)

    ' Retrieve the menu item information for the Max menu item/button
    MII.cbSize = Len(MII)
    MII.dwTypeData = String$(80, 0)
    MII.cch = Len(MII.dwTypeData)
    MII.fMask = MIIM_STATE

    If Enable Then
        MII.wID = Dummy
    Else
        MII.wID = Item
    End If

    If GetMenuItemInfo(hMenu, MII.wID, False, MII) = 0 Then
        Err.Raise vbObjectError, "modCloseBtn::" & FuncName, _
            "modCloseBtn::" & FuncName & "() - Menu Item Not Found"
        Exit Sub
    End If

    ' Switch the ID of the menu item so that VB can not undo the action itself
    lngMenuID = MII.wID

    If Enable Then
        MII.wID = Item
    Else
        MII.wID = Dummy
    End If

    MII.fMask = MIIM_ID
    If SetMenuItemInfo(hMenu, lngMenuID, False, MII) = 0 Then
        Err.Raise vbObjectError, "modCloseBtn::" & FuncName, _
            "modCloseBtn::" & FuncName & "() - Error encountered " & _
            "changing ID"
        Exit Sub
    End If

    ' Set the enabled / disabled state of the menu item
    If Enable Then
        MII.fState = MII.fState And Not MFS_GRAYED
    Else
        MII.fState = MII.fState Or MFS_GRAYED
    End If

    MII.fMask = MIIM_STATE
    If SetMenuItemInfo(hMenu, MII.wID, False, MII) = 0 Then
         Err.Raise vbObjectError, "modCloseBtn::" & FuncName, _
            "modCloseBtn::" & FuncName & "() - Error encountered " & _
            "changing state"
        Exit Sub
    End If

    ' Activate the non-client area of the window to update the titlebar, and
    ' draw the Max button in its new state.
    SendMessage hWnd, WM_NCACTIVATE, True, 0
End Sub

Contoh pemanggilan di MDI Form  :
1. Menonaktifkan tombol Minimize

Private Sub cmdDisableMinButton_Click()
    EnableMinButton Me.hWnd, False
End Sub

 2. Menonaktifkan tombol Maximize

Private Sub cmdDisableMinButton_Click()
    EnableMinButton Me.hWnd, False
End Sub

3. Menonaktifkan tombol Close

Private Sub cmdDisableMinButton_Click()
        EnableMinButton Me.hWnd, False
End Sub
 

 Selamat Mencoba........................................GOD LUCK...........................

Read More

Bahasa Pemrograman C dan C++

Berbicara tentang C++ dan C sebagai bahasa pendahulunya, C merupakan termasuk bahasa pemrograman tingkat menengah. Pencipta C adalah Brian W. Kernighan dan Dennis M. Ritchie pada tahun 1972. C merupakan bahasa pemrograman terstruktur yang membagi program ke dalam sejumlah blok dan sub program'. Tujuannya adalah untuk memudahkan dalam pembuatan dan pengembangan program. Program yang ditulis dengan C mudah sekali dipindahkan dari satu jenis mesin ke mesin lain. Hal ini karena adanya standarisasi C yaitu ANSI (American National Standards Institute) yang men%adi acuan para pembuat compiler C. C++ diciptakan satu dekade setelah C. C++ diciptakan oleh Bjarne Stroustroup dari Laboratorium Bell, AT&T pada tahun 1983. Pada awalnya C++ diberi nama " A better C". Nama C++ sendiri diberinama oleh Rick Mascitti. Adapun tanda ++ berasal dari operator increment pada bahasa C.

Keistimewaan C++ adalah karena bahasa ini mendukung OPP (Object Oriented Programming). Tujuan utama pembuatan C++ adalah untuk meningkatkan produktivitas pemrogram dalam membuat aplikasi. Kebanyakan pakar setuju bahwa OOP dan C++ mampu mengurangi kompleksitas terutama program yang terdiri dari 10.000 baris lebih, bahkan dapat meningkatkan produktivitas 2X lipat dari C, Pascal dan Basic.

Program C++ dapat dibuat menggunakan sebarang editor teks maupun editor sekaligus compilernya. Program utama berekstensi (.CPP). Pada saat kompilasi program utama bersama dengan file header (.h) akan diterjemahkan oleh compiler menjadi file obyek (.OBJ). Selanjutnya file obyek ini bersama-sama dengan 9ile obyek lain dan 9ile library &..-B' dikaitkan men%adi satu oleh linker.
Hasilnya adalah file (.exe) executable.




Compiler C++ yang telah beredar di pasaran antara lain Microsoft C/C++ dan Visual C++. Keduanya dari Microsoft. Sementara Borland international juga mengeluarkan Turbo C++ dan Borland C++.



Berikut ini contoh program sederhana yang akan kita buat menggunakan bahasa C++
#include
void main()
{
cout << “Hello world.\n”;
}


Setelah dicompile dan dirun, hasilnya adalah muncul pada layar "Hello World".

Dikutip dari diktat "Rosihan Ari Yuana,S.Si,M.kom"

Read More