Menginstal Nero StartSmart 8.1.1.0

Berikut ini adalah langkah langkah menginstal Nero StartSmart versi 8.1.1.0

1. Masukkan CD Nero Start Smart 8.1.1.0. Setelah menunggu beberapa saat akan muncul :

Klik Open Folder to view files untuk melihat file file yang diperlukan oleh instalasi Nero StartSmart 8.1.1.0

Teknik Pencabangan If -- Then -- Else -- End If Geser Kiri Atas Kanan

Gambar 96 Teknik Pencabangan
VBA Excel

Pada artikel sebelumnya sudah dibahas bagaimana membuat Program VBA Excel menggunakan Teknik Pencabangan  If -- Then -- Else -- End If dengan contoh program Geser Kiri ketika kursor berada pada kolom lebih dari satu ( 1 ) dan membuat Pesan ketika kursor sudah berada pada kolom paling kiri.

Marilah kita kembangkan program tersebut dengan geser ke atas ketika kursor berada pada kolom paling kiri.Diagram alurnya adalah sebagai berikut :

Teknik Pencabangan If .... Then .... Else ..... End If dalam VBA Excel

Setelah mempelajari Teknik Pencabangan If .... Then .... End If, marilah kita pelajari Teknik Pencabangan If .... Then .... Else ..... End If.
Perhatikan diagram alur di bawah ini.

Program di atas dimulai dengan kondisi pilihan apakah kolom sel aktif (activecell.column) > 1 atau tidak. jika activecell.column > 1 maka kursor Geser ke kiri dan jika tidak (artinya kursor berada paling kiri) maka tulis pesan.

Teknik Pencabangan If ..... Then .... End If dalam VBA Excel

Marilah kita bahas Teknik Pencabangan If ..... Then .... End If dalam bentuk program VBA Excel
Dalam Flowchart di bawah ini, VBA akan melakukan gerakan ke kiri.

Flowchart di atas, jika dibuat program dalam VBA adalah :

Sub LeftArrow1_Click()

ActiveCell.Offset(0, -1).Select

End Sub

Jika program di atas dijalankan dan kursor berada di kolom paling kiri maka akan muncul pesan Debug seperti di bawah ini.

Agar tidak muncul pesan Debug seperti di atas, maka program perlu menggunakan Teknik Pencabangan  If ..... Then .... End If sehingga ketika kursor berada paling kiri program tidak melakukan kegiatan apa apa.
Perhatikan Flowchart di bawah ini.

Program dalam VBA Excel adalah :
Sub LeftArrow5_Click()
If ActiveCell.Column > 1 Then
    ActiveCell.Offset(0, -1).Select
End If
End Sub

Mengenal Bahasa Pemrograman Pascal 3.0

Gambar 93. Bahasa Pemrograman Pascal

Bahasa pemrograman Pascal sudah dikenal tahun 1960 an yang ditemukan oleh Nicolaus Wirth, dari Technology University Zurich Switzeland.