Membuat Lampu Natal Dengan Visual Basic

02.08

Lampu Natal
Hari natal tak serasa lengkap jika tanpa lampu natal, nah sekarang kita mencoba untuk membuat Lampu Natal sendiri dengan menggunakan aplikasi Visual Basic, tanpa harus mengeluarkan uang untuk membeli lampu natal yang mungkin harganya mahal...!
Dengan lampu natal buatan sendiri tersebut, Hari Natal kita akan menjadi hari natal yang murah dan meriah.


Adapun cara membuatnya adalah sebagai berikut.
1. Tambahkan kontrol-kontrol ke Form dan atur Propertiesnya sebagai berikut.
Jenis KontrolNama KontrolPropertiesNilai
FormForm1CaptionLampu Natal
ShapeShape1CaptionLampu1


BackColor&H000040C0&
ShapeShape2CaptionLampu2


BackColor&H000040C0&
ShapeShape3CaptionLampu3


BackColor&H000040C0&
ShapeShape4CaptionLampu4


BackColor&H000040C0&
TimerTimer1Interval700

NB: Semakin kecil nilai interval pada Timer, maka semakin cepat pergantian warnanya. Tapi sebaliknya semakin besar nilainya, maka akan semakin lambat pergantian warnanya.
2. Susunlah letak kontrol-kontrol tersebut pada form sehingga kira-kira seperti gambar dibawah ini.
3. Ketiklah listing berikut pada kode editor.

Dim lamp As Boolean
Private Sub Timer1_Timer()

If Lamp=True Then
Shape2.BackColor=vbGreen
Shape4.BackColor=vbGreen
Shape1.BackColor=vbBlack
Shpae3.BackColor=vbBlack
lamp=False
Else
Shape1.backColor=vbRed
Shape3.BackColor=vbRed
Shape2.BackColor=vbBlue
Shape4.BackColor=vbBlue
lamp=True
End If

End Sub
4. Simpan Form dan Project anda.
5. Kemudian jalankan program tersebut dengan cara klik run pada menu bar, lalu klik start, atau dengan cara menekan F5 pada keyboard, atau juga dengan cara jalan pintas yaitu mengklik tombol yang bergambar simbol Play dibawah menu bar. Setelah anda menjalankan program tersebut lihatlah hasilnya, tidak kalah menarik dengan lampu aslinya kan...?
Selengkapnya...

Read On 0 komentar

Membuat Wallpaper Viewer Dengan Visual Basic

05.41

Wallpaper Viewer
Jika anda sering mengganti-ganti walpaper, tentunya sangat merepotkan jika anda harus membuka Control Panel, lalu Display Seting dan bla bla....

Dibicarakan saja sudah capek. Dengan aplikasi ini anda cukup memilih file gambar seperti pada program Picture Viewer dan mengklik sebuah tombol, maka sekejap wallpaper anda telah berubah.



Adapun caranya adalah sebagai berikut.
1. Tambahkan kontrol-kontrol ke Form dan atur propertiesnyaseperti berikut.
Jenis KontrolNama KontrolProperties
Nilai
FormForm1CaptionPicture Viewer
DriveListBoxDrive1--
DirListBoxDir1--
FileListBoxFile1--
ImageImage1StretchTrue
CommondButtonCommand1CaptionSet This Picture As Wallpaper


2. Susunlah letak kontrol-kontrol tersebut pada form sehingga menjadi kira-kira seperti gambar berikut.


3. Ketikkan listing berikut pada kode editor

Private Const SPIF_UPDATEINFILE=&H1
Private Const SPI_SETDESKWALLPAPER=20
Private Const SPIF_SENDWININICHANGE=&H2

Private Declare SystemParametersInfo

Selengkapnya...

Read On 0 komentar

Membuat MP3 Player Dengan Visual Basic

03.44

MP3 Player
Anda sering mendengarkan musik dengan komputer? Jika ya, anda sudah tahu dan akrab dengan Winamp, Windows Media Player, dan Aplikasi multimedia lainnya.
Kita akan mencoba untuk membuat sendiri aplikasi untuk memutar MP3. Apa yang terlintas dibenak anda?"Wah, berapa lama membuatnya? Pasti rumit sekali!"



Jangan salah, Dengan ActiveX semuanya jadi mudah. Kita hanya perlu membuat program untuk memerintah kan ActiveX tersebut untuk membuka file dan memainkannya. Sebelumnya, Tambahkan ActiveX MMControl ke dalam ToolBox terlebih dahulu yaitu dengan cara klik kanan pada ToolBox-Component-Microsoft Multimedia Control.

Cara membuat MP3 Player sendiri adalah sebagai berikut.
1. Tambahkan kontrol-kontrol ke Form dan atur propertiesnyasebagai berikut.
Jenis KontrolNama KontrolPropertiesNilai
FormForm1CaptionMP3 Player
LabelLabel1Caption(kosongkan)
--BorderStyleFixedSingle
MMControlMMControl1--
CommonDialogCommonDialogCancelErrorTrue
--FilterMP3 Audio (*.mp3)|*.mp3
CommondButtonCommand1CaptionOpen File


2. Susunlah letak kontrol-kontrol tersebut pada Form sehingga menjadi kira-kra seperti sebagai berikut.


3. Ketikkan listing program berikut pada kode editor.

Private Sub Command1_Click()
On Error GoTo loncat
MMControl1.Command="Stop"
CommonDialog1.ShowOpen
MMControl.FileName=CommonDialog.FileName
MMControl1.Command="Open"
Label1.Caption=CommonDialog.FileTitle
loncat
Exit Sub
End Sub

Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command="Stop"
End Sub

4. Simpan Form dan Project anda

5. Jalankan program tersebut.Klik tombol Open File. Pilih lagu yang anda inginkan. Klik tombol Play. Maka musik yang anda pilih akan mengalun dari speaker anda. Ajiiiip....!!!

Mungkin anda merasa tidak puas dengan penampilan atau wisualisasi dari program MP3 Player ini. Berkresilah sesuka selera karena keinginan dan selera seseorang pasti berbeda-beda.
Selengkapnya...

Read On 0 komentar

Tips Meningkatkan Kineja komputer

04.09

Seiring dengan banyaknya software/program yang diInstall dikomputer, sering kta merasa kinerja komputer kita menjadi semakin lambat. Atau kadang kita tahunya komputer kita semakin lambat kinerjanya. Hal ini wajar apalagi dengan semakin lamanya pengguna komputer dengan berbagai program yang diInstall.
Sebenarnya kinerja komputer bisa dipengaruhi oleh banyaknya faktor, baik software maupun hardware. Ada berbagai tips yang dapat dilakukan agar kinerja komputer menjadi lebih baik. Berikut beberapa tips yang mungkin dapat dilakukan dan mungkin sebagian sudah umum kita lakukan atau kita dengar.


1. Uninstall program yang tidak dipakai
Meskipun tidak djalankan, program yang jarang atau tidak pernah digunakan bisa ikut mempengaruhi kinerja komputer. Terutama program yang menyimpan setting-settingnya di registry. Mengapa ? Karena setiap kali komputer dijalankan, registry windows akan di load di memory, sehingga semakin besar ukurannya, memory yang digunakan akan semakin besar pula.

2. Periksa program-program yang otomatis berjalan dengan windows
Hal ini bisa dicek dengan program seerti autoruns. Biasanya ada beberapa program yang selalu berjalan yang sebenarnya tidak begitu penting atau kurang penting.

3. Defragment harddisk
Ini bisa dilakukan melalui menu Properties-System Tools-Disk Defragment yang tujuannya untuk menata kembali file-file sesuai prioritasnya.


4. Mematikan service yang tidak terpakai
Hal ini memerlukan sedikit pengetahuan tentang komputer. Service merupakan program /library juga yang dijalankan (diLoad) setiap komputer hidup. Bisa dilihat melalui Control Panel-Administrative Tools-Service. Jika komputer tidak pernah digunakan online (internet), ada beberapa service yang bisa di non aktifkan Misalnya Windows Time dan beberapa service lainnya (bisa dicek keterangannya). Tapi hal ini juga perlu berhati-hati, jika salah bisa menyebabkan beberapa fungsi windos tidak berjalan.

5. Hindari penggunaan Skin Windows
Kadang penggunaan tampilan/skin tambahan windows bisa mempengaruhi kinerja cukup signifikan. Terutama penggunaan software tambahan. Sebaiknya jika ingin tampilan yang berbeda gunakan saja Windows Themes (bawaan windows).

6. Matikan beberapa efek Visual Windows
Selain itu beberapa efek windows [xp] yang tidak begitu penting bisa dmatikan. Bisa dilakukan melalui klik kanan di My Computer pilih Properties. Ditab Advance di bagian Performance klik tombol Settings. Bisa dinon aktifkan Visual efek yang tidak begitu penting.


7. Batasi tambahan jumlah font
Ini berpengaruh ke aplikasi yang menggunakan Pilihan font seperti Microsoft Office. Dengan banyaknya font tambahan akan mempengaruhi ke memori yang digunakan dan loading akan terasa lebih lambat.

8. Hapus icon di desktop yang tidak penting
Sering program yang diInstall dikomputer akan membuat shortcut baru (icon) di desktop. jika kita jarang menggunakan icon-icon ini, lebih baik dihapus saja, bisa sedikit mengurangi pemakaian memori.

9. Scan komputer dari Virus, Spyware, Trojan dan sejenisnya
Jika komputer terinfeksi virus,sebagian besar kinerjanya akan menurun, bahkan bisa-bisa komputer menjadi sangat lambat. Oleh karena itu sebaiknya selalu dijaga agar komputer bebas virus. Kemudian jika komputer sering terkoneksi internet, maka sebaiknya sekitar sebuan sekali komputer discan dari Spyware, Mallware dan sejenisnya.

10. Gunakan alternatif software yang lebih ringan
Beberapa software kadang hanya digunakan untuk beberapa hal yang sederhana. Misalnya menggunakan ACDSee hanya untuk melihat-lihat gambar atau foto saja. Jika hanya ingin melihat-lihat gambar dengan format standard, maka bisa menggunakan Fasilitas bawaan windows, karena ACDSee cukup berat terutama versi-versi terbaru.

11. Menggunakan software TuneUp, defragment dan sejenisnya
Jika kita kesulitan dengan optimalisasi sistem manual dan ingin cara mudah, maka kita bisa menggunakan program-program TuneUp, Defragment registry, dan sejenisnya.

12. Upgrade hardware
Jika memiliki dana tambahan dan spesifikasi komputer masih pas-pasan maka bisa di Upgrade hardwarenya seperti Memory, CPU atau VGA yang paling berpengaruh biasanya CPU dan Memory.

13. Install Ulang
Kadang sistem yang sangat lama dan penuh dengan program yang banyak/jarang terpakai, meski sudah dioptimalisasi masih saja lambat. Jika seperti itu, mungkin Install Ulang adalah jalan yang terbaik, karena biasanya dengan sistem yang lebih "Fresh" kinerja bisa maksimal.

Cara diatas mungkin hanya sebagian tips yang bisa dilakukan dan saya yakin masih banyak tips lain termasuk optimalisasi setting hardware. Jika ada tambahan tips lainnya, silahkan Semoga bermanfaat.

Selengkapnya...

Read On 0 komentar
02.50

coba


lom ada

Selengkapnya...

Read On 0 komentar
Abd.Rauf © 2008 Template by:
Zenplate