ANALISA KASUS

ANALISA KASUS
Oleh : 1. Antono
2. Silvi maria CH

Nama perusahaan : CV.WIRA TEKNIK METALINDO
Segmentasi : produksi spare part motor dan mobil
Produk : stamping, dies, jig

Berawal dari ide 4 orang yang bekerja di PT.SUZUKI INDOMOBIL MOTOR mereka ingin medirikan bengkel bubut bernama CV.WIRA TEKNIK METALINDO yang beralamat di Jl. Raya Narogong Km.12,5 No.168, Gg. Cikiwul, Bantar Gebang – Bekasi. sebagai vendor di suzuki berawal dari tiga buah mesin bubut perusahaan tersebut berjalan. Karena permintaan barang dari suzuki semakin meningkat dan perusahaan makin berkembang. Akhirnya perusahaan dapat menambah mesin dan tenaga kerja dengan beberapa fungsi bagian dan jabatan, antara lain: produksi, enginering, QC/QA, keuangan, HRD, marketing.
Semua hal itu dilakukan semata – mata untuk meningkatkan pelayanan kepada pelanggan dan meningakatkan jumlah produksi dan pelanggan pada CV. WIRA TEKNIK METALINDO dan semua keluhan pelanggan dapat teratasi. Dengan letak CV. WIRA TEKNIK METALINDO dekat dengan beberapa pabrik penyuplai bahan produksi.
Untuk meningkatkan pelayanan dan manfaat teknologi informasi. CV.WIRA TEKNIK METALINDO bermaksud untuk mengembangkan SIM di dalam CV.WIRA TEKNIK METALINDO walaupun sumber daya manusia (SDM) belum memahami komputer, diharapkan di kemudian hari CV.WIRA TEKNIK METALINDO dapat berkembang dengan pesat dan SDM pada CV.WIRA TEKNIK METALINDO dapat memahami komputer .


Analisa Organisasi
1. Struktur organisasi.
(terlampir)
2. Job description.
a. Manager produksi
1) Mengepalai semua divisi produksi
2) Mengatur jadwal dan target produksi
3) Membuat laporan Produksi
b. Manager QC/QA
1) Mengepalai semua divisi QC dan QA
2) Memberi jaminan bahwa barang OK dan siap di kirim
3) Menentukan tingkatan suppllier
4) Melakukan perbaikan sistem agar lebih baik
5) Membuat laporan Pengecekan barang
c. Manager Keuangan
1) Membuat keputusan langsung di bidang keuangan.
2) Membuat laporan keuangan bulanan dan tahunan
3) Menghitung dan melaporkan pajak.
d. Manager HRD
1) Mengepalai staff HRD
2) Melakukan penilaian kepada karyawan
3) Melakukan laporan JAMSOSTEK
4) Membuat laporan yang berhubungan dengan karyawan
e. Manager Marketing
1) Mencari konsumen
2) Menentukan harga barang
3) Membuat laporan harga barang dan konsumen
f. PPIC/PPC
1) Melakukan pembelian barang
2) Menentukan jadwal pengiriman
3) Membuat laporan pembelian dan pengiriman


Analisa SWOT dan CSF.
Analisa SWOT
1. Strengths (kekuatan)
a. letak CV.WIRA TEKNIK METALINDO dekat dengan beberapa pabrik penyuplai bahan produksi
b. Memiliki teknisi yang berpengalaman
c. Cepat dalam segi pelayananya
d. Efisiensi SDM

2. Weaknesses (kelemahan)
a. Masih membutuhkan banyak penyuplai jasa, contoh: EDP, Spot, EDM, dsb

3. Opportunities (peluang)
a. Dapat meningkatkan jumlah pelanggan /customer dengan cara melakukan peningkatan pelayanan.
b. Menjadikan CV.WIRA TEKNIK METALINDO lebih besar dari sebelumnya.
c. Mampu bersaing dengan perusahaan sejenis.
d. Membuka cabang baru

4. Treats (ancaman)
a. Menurunnya pelanggan dikarenakan pelayanan QC yang kurang baik yang menyebabkan barang kembali semakin meningkat sehingga tingkat kepuasan pelanggan menurun

Analisa CSF (Critical success factor).
1. Memakai tenaga kerja yang sudah memahami computer.
2. Menggunakan system komputerisasi agar dapat bersaing dengan perusahaan lain.
3. Dengan sistem komputerisasi, dapat menurunkan tingkat lost





PERENCANAAN.
1. Kebutuhan hardware
a. 6 PC dengan “processor Pentium 4” dengan ketentuan sebagai berikut :
1) 1 pc untuk Direktur
2) 5 pc untuk Manager Produksi, Engineering, keuangan, PPIC, HRD
b. 1 Laptop untuk Marketing
c. 1 pc dengan “processor mini PC atom” dengan ketentuan sebagai berikut :
 Di gunakan untuk server (tempat pusat data base)
d. 1 buah HUB
e. 1 buah Modem

2. Kebutuhah soft ware
a. Windows xp
b. Microsoft office 2003
c. Sql server dan sql user
d. Aplikasi inventory perusahaan manufacturing ( visual basic 6)

3. Sumber daya manusia (SDM)
Manusia /SDM yang mampu melakukan pegoperasian program SIM di dalam bengkel.

4. Skema System
(terlampir)

5. Jaringan
Jaringan yang akan di gunakan adalah topologi star .topologi star di gunakan agar apabila terjadi kesalahan pada satu pc tidak akan menganggu system lain.
Skema Jaringan
(terlampir)




6. Laporan
Laporan yang di harapkan adalah :
a. laporan Produksi
b. laporan perbaikan
c. laporan Pengecekan barang
d. laporan keuangan & pajak bulanan dan tahunan
e. laporan yang berhubungan dengan karyawan & JAMSOSTEK
f. laporan harga barang dan konsumen
g. Laporan pembelian dan pengiriman barang

*-*

CARA MENGHAPUS FOLDER AUTORUN.INF

clik start==Run==
ketik cmd ===
setelah masuk jendela cmd =====
ketik ===
rd /s /q G:\autorun.inf\con\aux\ ===
rd /s /q G:\autorun.inf\con\ ====
rd /s /q G:\autorun.inf\ =====

selamat mencoba...========


lewat SmadAV juga bisa kok

Buka SmadAV, klik tab Tools - Smad-Lock - Pilih flashdisk - Klik Unlock.

PUISI CINTA

Puisi Cinta ke-1:
selamat pagi cinta……diujung pagi yang cerah ini aku tak menemukan bayangmu,kemana dikau??…..aku selalu setia setiap pagi hanya buat mengatakan sayangku padamu…aku juga selalu membawa seikat bunga cinta yang segar nan indah buatmu seorang..namun pagi ini aku tak tau kemana gerangan dirimu yang biasanya akan selalu menyambutku dengan uluran kasih sayangmu..adakah kau rasa debar was wasku menanti hadirmu, hingga ujung pagi ini kaupun belum nampah ,,,,
YIQ 081803697172
————————————————–
Puisi Cinta ke-2:
aku ingin semua yang hadir dalam jiwaku adalah hakmu yang akan menjadi pemacu dalam kisah hidup yang kita jalani sehari hari karena aku cinta kamu…aku juga ingin hadirku adalah kekayaanmu yang sempurna karena didalamnya ada pernak pernik sayangku buatmu..dalam suka dan duka dunia cinta aku ingin engkau juga paham akan semburan lava cinta yang sewaktu waktu bisa dahsat menghujani seluruh jiwamu ….selangkah semi selangkah semua ingin dalam janji kisah cinta yang kita jalani akan ringan terasa karena kau hadir saat tepat ujung jarum asmara menusuk jantung hariku….
YIQ 081803697172
————————————————–
Puisi Cinta ke-3:
dalam nelangsa hayalku ada hadirmu menyapaku,aku tersenyum ceria karena engkaupun tersenyun,,namun sedetik kemudian engkau pergi membawa senyum yang belum sempat kunikmati …aku tidak tau kenapa begitu cepat engkau berlalu dan membawa senyum itu pergi..aku juga bingung kenapa engkau tebarkan senyum lalu kaupun pergi tanpa sepatah kata terucap..kemana aku akan mencari dirimu dalam remang remang cahaya yang membawa langkahmu..kemana aku harus mengadu karena engkau tak meninggalkan jejak…haruskah aku berteriak agar alam semesta membantuku mencari langkahmu?????….aku juga tidak tau apakah senyum manismu itu adalah senyum perpisahan atau senyum terakhir buaatku..
YIQ 081803697172
————————————————–
Puisi Cinta ke-4:
dinginnya malam tak sedingin hariku kala mengingat acuhnya dirimu memandangku,dengan apa aku harus buktikan kalau aku menyayangimu…dengan apa aku harus peragakan kalau aku mengasihimu sepenuh hari,tapi belum sempat ku ucap kata bayangmupun tak tampak lagi..kemana pergimu..kemana langkahmu..kemana bayangmu…yang kesekian kalinya aku harus kecewa karena cinta belum hampiri asaku dengan sempurna
aku titip salam rinduku padamu ………..aku sayang padamu……engkau yang merasakan kasihku..ILV U
YIQ 081803697172
————————————————–
Puisi Cinta ke-5:
nuansa indah dihatiku tak pernah menentu itu karena engkau tak pernah menyatakan cinta dengan sempurna….jika itu hanya sebuah ilusi dalam hayal kenapa selalu engkau ucap salam manis buatku setiap hari.. walau begitu aku akan selalu menitipkan kangenku buatmu, ingin aku sapa dirimu setipa kali engkau titip salam tapi aku ragu arena salammu juga samar sampai…
YIQ 081803697172
————————————————–
Puisi Cinta ke-6:
mimpi buruk selalu menghantui disetiap langkah kakiku tentang pedasnya ucapan selamat malammu yang engkau lontarkan tadi malam,aku bingung apa arti semuanya,aku juga gak ngerti kanapa demikian,haruskah aku pejamkan mata atau menutup mata sementara dihatiku selalu menggemakan namamu karena aku suka kamu….
YIQ 081803697172
————————————————–
Puisi Cinta ke-7:
indah sungguh indah kenangan yang engkau ciptakan bersama usainya malam tanpa selimut sinar rembulan…aku pasrah dalam hangetnya selimut tebal kulitmu…aku terbuai oleh manisnya rayu yang engkau lontarkan ketika kita bersama dalam kasih yang tercipta tanpa ada komando…aku menikmati sejuknya bibir mungilmu ketika menuturkan kisah kisah asmara yang kita jalani sehari hari..aku ingin semua kisah yang ada takkan pernah memudar dan takkan pernah hilang ditelan waktu karena aku sangat sayang padamu
YIQ 081803697172
————————————————–
Puisi Cinta ke-8:
kesal kesal kesal………cinta membawaku kejalan kebencian memandangmu,mendengarmu dan mengingatmu……masa bodo dengan dirimu,masa bodo dengan ocehanmu,masa bodo dengan senyummu karena aku lagi kesal denganmu…enyahlah engkau dari hadapanku,enyahlah engkau dari ingatanku,dan pergi jauhlah engkau dari hai hariku…
YIQ 081803697172
————————————————–
Puisi Cinta ke-9:
aku ragu dengan dia ,aku resah dengannya karena kasihnya tidak nampak ,karena sayangnya samar,,haruskah aku menyapa untuk mengetahui kepastiannya????….aku bimbang ,aku tidak bisa menyapa,aku tidak bisa menghampirinya,biarkanlah sayang ini lenyap dan pergi seperti dia yang pergi dan berlalu begitu saja dariku….
YIQ 081803697172
————————————————–
Puisi Cinta ke-10:
indah sangat indah kenangan diantara kita …semua kita ciptakan karena cinta yang bersemi diantara kita begitu damai,begitu teduh dan begitu manis,,,,namun kenapa tiba tiba saja semua lenyap ,,kenapa tiba tiba saja semua musnah dan kenapa tiba tiba saja hengkang dari hadapanku…..aku ingin semua yang pernah tercipta diantara kita adalah kenangan yang tak akan pernah ternoda oleh asa lain namun aku ingin kenangan itu tersimpan rapat rapat dalam sanubarimu agar suatu saat kalau kau ingin melihatnya masih tertata rapi…
YIQ 081803697172
————————————————–
Puisi Cinta ke-11:
sayang kenapa tiba tiba saja asa yang kau titip padaku samar dan kaku?????…sayang kenapa indahnya senyumnu hambar terlihat olehku????aku tidak ingin semuanya begitu saja,karena semuanya belum sempurna aku lihat,ak semua yang ada padamu hanya tercipta buatku dan hanya buat ddiriku dalam hari hari sepanjang waktuku….
YIQ 081803697172
————————————————–
Puisi Cinta ke-12:
hari ini sudah hampir seperempatnya berjalan,namun sia sia aku menanti hadirmu diujung jalan yang sepi tanpa ada bayang yang melintas,,,aku hanyalah sebuah raga yang kesepian dalam hayal,aku adalah sebuah sosok yang nelangsa dalam bayangan,tapi aku juga adalah sesosok manusia yang butuh akan cinta dan kasih,karena itu aku menanti hadirmu diujung jalan itu,cintai aku,sayangi aku dan kasihilah aku….
YIQ 081803697172
————————————————–
Puisi Cinta ke-13:
tabir hidupmu adalah sebuah pengorbanan yang berat buatku ungkap tapi aku harus melakukannya agar aku tau apakah aku ada dibalik tabir itu..satu persatu akan kubuka tirainya,satu persatu akan ku susun didalam jiwa ini,aku tidak akan menyerah buat melakukannya hingga kutemukan asa tertulis namaku didalamnya,aku juga tidak akan melepaskanmu jiga asa itu ada dan tercipta buatku…terimakaisih buatmu karena engkau ijinkan aku membuka tabirmu karena sebenarnya diantara kita sudah tercipta sebuah asmara yang damai ….
YIQ 081803697172
————————————————–
Puisi Cinta ke-14:
hari ini aku bahagia karena dia menghampiriku dan mengucapkan sayangnya padaku,kemana duka yang semalam datang karena tak ada kabar beritanya??masa bodo dengan itu yang jelas hari ini aku bahagia,,aku ingin menumumkan pada semua mahluk yang berada dimuka bumi ini karena hari ini aku seneng,karena hari ini aku bahagia dan karena hari ini aku ringan melangkah itu semua karena hadirmu dan cintamu….
YIQ 081803697172
————————————————–
Puisi Cinta ke-15:
dalam kesendirianku tak pernah terbayang akan hadirmu disampingku,,dalam sunyiku tak pernah terbayang akan lambaian tanganmu menggapaiku,,adakah asa yang kau bawa dalam jiwamu buat diriku????…adakah semua yang tercipta dalam raga kan menjadi milikku untuh????…hadirmu dan lambaian tanganmu sangat membuatku terpana akan hadirmu didetik detik penantianku..
YIQ 081803697172
————————————————–
Puisi Cinta ke-16:
kau tak kan pernah kulupakan dalam ingat dan benakku karena kau adalah satu satunya belahan jiwa yang tersimpan dalam ragaku,,,kau tak kan pernah terlewatkan dalam canda gurauku karena kau adalah topik pembicaraanku sehari hari,,,mampukah ku melupakanmu?/,,mampukah ku melewatimu??,,walau hanya sedetik dalam ingat takkan pernah kumampu melakukannya,,aku sayang kamu,aku juga tak ingin semua kisah kasih diantara kita ada yang tertinggal karena semua tercipta karena kau dan aku saling menyayangi…..
YIQ 081803697172
————————————————–
Puisi Cinta ke-17:
diujung belahan dunia manapun kau berada aku akan menantimu, aku akan hadirkan panorama cinta yang kulukis dengan tinta emas yang kumiliki,aku akan hiasi dengan pita berwarna pink,,andai kau tau betapa rapi dan indahnya kukemas asa ini mungkin kau akan pulang manemuiku dalam keadaan apapun ,,,aku tak akan mengeluh ,,aku tak akan berkomentar tentang pulangmu dalam ragaku karena seperti janji kita dulu aku akan menerimamu apa adanya….
YIQ 081803697172
————————————————–
Puisi Cinta ke-18:
gemuruh ombak dilautan luas tak mampu mengalahkan gemuruh dadaku ketika engkau menyapa,,,laut luas tak seluas cinta yang kumiliki,, tak seluas kasih yang kuciptakan buatmu aku akan selalu mengoleksi kisah hari hari kita yang entah sampai kapan akan terbentang dihadapan semua orang karena kita akan mengikrarkan kisah kasih diantara kita berdua..
YIQ 081803697172
————————————————–
Puisi Cinta ke-19:
andai semua kata kata dan cerita cerita dalam karyaku ini adalah kisah nyata dalam hidupku, mungkin aku tidak kan mampu membendung suka dan duka yang akan datang silih berganti,,,andai semua kata kata indah ini mampu kulukis setiap hari betapa menumpuknya kertas kertas gambar dan cat warna yang akan tertuang,,,akupun takkan mampu mendapat belaian belaian manis setiap hari dan akupun takkan mampu mendapat sakit hati dari perlakuan perlakuan kasih yang pahit jika itu ada,,,oh andai saja semua ini benar adanya aku hanya akan mampu berucap terimakasih buat semuanya karena papun ini aku harus menerimanya karena takdir dan nasib tidak bisa dirubah dalam sekejab,,,,wahai kasih yang bersembunyi dibalek layar lebar ini dimana dirimu,adakah engkau mendengarkan keluhan dan curahan hari ini????…wahai kasih yang belum sampai dimana gerangan dirimu yang bersembunyi dibalik awan dan hujan,akankan engkau menyapaku dan menghampiriku????dan adakah seorang belahan jiwa yang akan menjadi kasihku?????,,,,hayal dan hayal takkan pernah berhenti sampai disini…..
YIQ 081803697172
————————————————–
Puisi Cinta ke-20:
cinta tak mengenal cengeng ,cinta juga tak mengenal putus asa siapkan dirimu buat menyambut cinta yang entah manis atau pahit dijalani,,,,
YIQ 081803697172
————————————————–
Puisi Cinta ke-21:
resah dan gelisah terasa ketika detik detik terakhir engkau kadir,,kata yang aku nanti tidak juga tertuang ,,apakan mampu engkau ucapkan kata itu buatku???…aku tidak tau pasti apakah kau mampu atau tidak karena semua kata kata yang akan terucap sudah tertuang semua dari langkah dan gerakmu menghampiriku dalam hari hari terakhir ini
YIQ 081803697172
————————————————–
catatan: Cinta pada makhluk gak blh melebihi cinta kepada Allah dan RasulNya, dan gak blh melanggar hak-hak Allah dan RasulNYA
————————————————
Puisi Cinta – Kumpulan Puisi Cinta – Sms Puisi Cinta

TIPS “PACARAN YANG ISLAMI”

1. Jangan berduaan dengan pacar di tempat sepi, kecuali ditemani mahram dari sang wanita (jadi bertiga)
“Janganlah seorang laki-laki berkholwat (berduaan) dengan seorang wanita kecuali bersama mahromnya…”[HR Bukhori: 3006,523, Muslim 1341, Lihat Mausu’ah Al Manahi Asy Syari’ah 2/102]
“Tidaklah seorang lelaki bersepi-sepian (berduaan) dengan seorang perempuan melainkan setan yang ketiganya“ (HSR.Tirmidzi)
2. Jangan pergi dengan pacar lebih dari sehari semalam kecuali si wanita ditemani mahramnya
“Tidak halal bagi wanita yang beriman kepada Allah dan hari akhir untuk bepergian sehari semalam tidak bersama mahromnya.” [HR Bukhori: 1088, Muslim 1339]
3. Jangan berjalan-jalan dengan pacar ke tempat yang jauh kecuali si wanita ditemani mahramnya
“…..jangan bepergian dengan wanita kecuali bersama mahromnya….”[HR Bukhori: 3006,523, Muslim 1341]
4. Jangan bersentuhan dengan pacar, jangan berpelukan, jangan meraba, jangan mencium, bahkan berjabat tangan juga tidak boleh, apalagi yang lebih dari sekedar jabat tangan
”Seandainya kepala seseorang di tusuk dengan jarum dari besi itu lebih baik dari pada menyentuh wanita yang tidak halal baginya.” (Hadits hasan riwayat Thobroni dalam Al-Mu’jam Kabir 20/174/386 dan Rauyani dalam Musnad: 1283, lihat Ash Shohihah 1/447/226)
Bersabda Rasulullahi Shallallahu ‘alaihi wassallam: “Sesungguhnya saya tidak berjabat tangan dengan wanita.” [HR Malik 2/982, Nasa’i 7/149, Tirmidzi 1597, Ibnu Majah 2874, ahmad 6/357, dll]
5. Jangan memandang aurat pacar, masing-masing harus memakai pakaian yang menutupi auratnya
“Katakanlah kepada orang-orang beriman laki-laki hendaklah mereka menahan pandangannya dan menjaga kemaluannya..” (Al Qur’an Surat An Nur ayat 30)
“…zina kedua matanya adalah memandang….” (H.R. Bukhari, Muslim, Abu Dawud dan Nasa’i)
6. Jangan membicarakan/melakukan hal-hal yang membuat terjerumus kedalam zina
“Dan janganlah kamu mendekati zina, sesungguhnya zina itu adalah suatu perbuatan yang keji dan suatu jalan yang jelek” (Al Qur’an Surat Al Isra 32)
“Kedua tangan berzina dan zinanya adalah meraba, kedua kaki berzina dan zinanya adalah melangkah, dan mulut berzina dan zinanya adalah mencium.” (H.R. Muslim dan Abu Dawud)
7. Jangan menunda-nunda menikah jika sudah saling merasa cocok
“Wahai para pemuda ! Barangsiapa diantara kalian berkemampuan untuk nikah, maka nikahlah, karena nikah itu lebih menundukan pandangan, dan lebih membentengi farji (kemaluan). Dan barangsiapa yang tidak mampu, maka hendaklah ia puasa (shaum), karena shaum itu dapat membentengi dirinya”. (Hadits Shahih Riwayat Ahmad, Bukhari, Muslim, Tirmidzi, Nasa’i, Darimi, Ibnu Jarud dan Baihaqi).
“Yang paling banyak menjerumuskan manusia ke-dalam neraka adalah mulut dan kemaluan.” (H.R. Turmudzi dan dia berkata hadits ini shahih.)
WARNING:
sebenarnya banyak ulama dan ustadz yang mengharamkan pacaran, misalnya saja ustadz Muhammad Umar as Sewed. jadi sebaiknya segera menikahlah dan jangan berpacaran…

Bagi yang sudah terlanjur berbuat dosa maka bertaubatlah dan jangan putus asa, Allah pasti mengampuni hambanya yang bertaubat dan memohon ampun…

cara membersihkan virus ‘bunga citra lestari’

Virus Bonek atau Love-chaca memalsukan diri sebagai file gambar JPEG dengan nama ‘bunga cita lestari’. Vaksincom mendeteksi virus ini sebagai W32/SillyFDC.F, dengan ukuran file 122 KB dan ekstensi .exe.
Love-chaca sulit untuk dimatikan baik dalam kondisi normal, safe mode maupun safe mode with command prompt. Karena sulitnya melakukan pembersihan, maka ada beberapa langkah yang bisa anda pilih untuk membasmi virus tersebut.
Cara 1:
Pengguna komputer yang terkena virus Love-chaca bisa melakukan pembersihan dengan menjadikan drive/harddisk yang terinfeksi menjadi slave. Sebelumnya pengguna bisa me-rename file msvbvm60.dll pada direktory C:\Windows\System32, menjadi file yang diinginkan yang nantinya bisa di-rename kembali seperti semula jika virus sudah terhapus.
Untuk menghapus secara manual file-file virus yang sudah ada, anda bisa menggunakan fitur searchingdi Windows. Tampilkan terlebih dahulu folder Windows yang di-hidden dengan menggunakan dos command prompt. Caranya:
• Klik [start], kemudian klik [run]
• Ketik [cmd]
• Pada dos prompt, ketik perintah attrib -s -h /s /d, kemudian tekan enter (sebelumnya pastikan Anda berada pada direktori C:\WINDOWS), contoh C:\WINDOWS>attrib -s -h /s /d
• Untuk mengembalikan file yang disembunyikan di drive lain, lakukan langkah di atas tetapi sebelumnya anda ganti terlebih dahulu lokasi drive yang akan dicek [contoh D:\>attrib -s -h /s /d]

Masalah pada komputer anda

Berikut ini terdapat tips2 yang diambil dari artikel pakar luar negeri:
1. Untuk menurunkan waktu booting dan meningkatkan performa, tidak usah
menggunakan software d efrag pihak ketiga, gunakan saja perangkat Defragmenter yang
buatan (built-in) Windows, tidak akan jauh beda. Dan juga, sebaiknya menggun akan
Harddisk dengan tipe Ultra-133 atau Serial ATA (SATA) dengan buffer 8-MB.
2. Jika RAM PC kurang dari 512 MB, maka sebaiknya ditambah kapasitas memorinya.
Hal ini relatif tidak mahal dan akan membantu meningkatkan performa sistem Anda
secara dramatis.
3. Pastikan file system yang digunakan Windows XP adalah NTFS. Cara memeriksan ya:
a. Buka Windows Explorer (My Computer)
b. Klik kanan pada drive C:
c. Klik Properties.
Kalau ternyata file system Anda menggunakan FAT32, maka untuk mengub ahnya
adalah dengan cara sebagai berikut:
- Backup data-data penting dulu ya.
- Klik Start > Run > ketik CMD
- Setelah muncul jendela Command Prompt, ketik:
Code:
CONVERT C: /FS:NTFS
Catatan: Komputer jangan disela ketika melakukan konversi ini, dan juga dalam
keadaan bebas dari virus. File system yang digunakan oleh drive bootable (biasanya C:)
bisa FAT32 atau NTFS. Saya sangat merekomendasikan untuk menggunakan NTFS
demi keamanan superior, ketahanan dan efisiensi ruang yang lebih besar.

Diposkan oleh aboenk
Berikut ini terdapat tips2 yang diambil dari artikel pakar luar negeri:
1. Untuk menurunkan waktu booting dan meningkatkan performa, tidak usah
menggunakan software d efrag pihak ketiga, gunakan saja perangkat Defragmenter yang
buatan (built-in) Windows, tidak akan jauh beda. Dan juga, sebaiknya menggun akan
Harddisk dengan tipe Ultra-133 atau Serial ATA (SATA) dengan buffer 8-MB.
2. Jika RAM PC kurang dari 512 MB, maka sebaiknya ditambah kapasitas memorinya.
Hal ini relatif tidak mahal dan akan membantu meningkatkan performa sistem Anda
secara dramatis.
3. Pastikan file system yang digunakan Windows XP adalah NTFS. Cara memeriksan ya:
a. Buka Windows Explorer (My Computer)
b. Klik kanan pada drive C:
c. Klik Properties.
Kalau ternyata file system Anda menggunakan FAT32, maka untuk mengub ahnya
adalah dengan cara sebagai berikut:
- Backup data-data penting dulu ya.
- Klik Start > Run > ketik CMD
- Setelah muncul jendela Command Prompt, ketik:
Code:
CONVERT C: /FS:NTFS
Catatan: Komputer jangan disela ketika melakukan konversi ini, dan juga dalam
keadaan bebas dari virus. File system yang digunakan oleh drive bootable (biasanya C:)
bisa FAT32 atau NTFS. Saya sangat merekomendasikan untuk menggunakan NTFS
demi keamanan superior, ketahanan dan efisiensi ruang yang lebih besar.



4. Non aktifkan File Indexing. Layanan File Index ing mengekstraksi in formasi dari
dokumen-dokumen dan file-file lainnya yang ada pada harddisk dan membuat sebuah
"search able keyword index" (index keyword pen carian). Bisa dibayangkan proses ini
sangat memberatkan sistem.
Cara kerjanya sbb:
Seorang user mencari kata, frase, atau properti sebuah dokumen, dari
dokumen-dokumen yang jumlahnya ratusan atau ribuan dan ia tidak tahu nama dari
dokumen yang dicari. Windows XP dengan fun gsi built-in search masih bisa melakukan
berbagai macam jenis pencarian tanpa melibatkan Indexing Service. Tapi agak lebih
lama. Sistem Operasi harus membuka tiap file ketika diminta tolong mencari apa yang
user inginkan.
Keban yakan orang tidak membutuhkan fitur pencarian ini. Yang biasanya membutuhkan
adalah lingkungan perusahaan yang besar dimana ribuan dokumen diletakkan pada
paling tidak satu server. Akan tetapi jika hanya semacam system builder, yang
kebanyakan kliennya adalah bisnis kecil dan menengah, dan jika para klien tidak
membutuhkan fitur tersebut, saya rekomendasikan supaya mendisfu ngsikannnya
(disable) layanan tersebut.
Caranya Mendisfungsikann ya:
a. Buka Windows Explorer (My Computer)
b. Klik kanan pada drive C:
c. Pilih Properties
d. Hilangkan tanda centang (checklist) "Allow Indexing Service to index this disk for
fast file searching."
e. Klik tombol Apply, muncul: apply changes to "C: subfolders and files"
f. Klik tombol OK.
Jika ada pesan peringatan atau error muncul (seperti "Access is denied"), klik tombol
Ignore All.
5. Update driver VGA dan chipset motherboard, termasuk update B IOS dan
konfigurasinya. Carilah info-info tentang konfigurasi BIOS secara tepat di internet.
6. Kosongkan folder Prefetch windows setiap 3 bulan atau lebih.
Windows XP merekam sebagian dari data atau aplikasi yang sering digunakan agar
membuat proses load kelihatan lebih cepat ketika dipanggil oleh user. Hal ini bagus,
tetapi untuk waktu yan g lama, folder prefetch bisa jadi kelebihan muatan referensi file
dan aplikasi yang tidak lagi digunakan. Jika hal itu terjadi, Windows XP akan
membuang-buang waktu dan memperlambat per forma sistem, ketika melakukan load
aplikasi atau file. Tidak ada yang penting dalam folder tersebut, dan seluruh isinya aman
untuk dihapus.
Folder tersebut terletak di: C:¥WINDOWS¥Prefetch¥
7. Sekali sebulan jalankan disk cleanup.
Caranya:
a. Buka Windows Explorer (My Computer)
b. Klik kanan pada drive C:
c. Pilih Properties
d. Klik tombol Disk Cleanup dan delete semua file temporer.
8. Pada Device Manager, klik gand a pada IDE ATA/ATAPI Controllers device, dan
pastikan DMA di-enable (diaktifkan) untuk tiap drive yang terhubung ke Primary
Controller dan atau Secondary controller.
Lakukan hal ini dengan cara:
a. Klik ganda pada Primary IDE Channel. kemudian klik tab Advance Settings.
b. Pastikan Transfer Mode -nya diset pada "DMA if Available" untuk kedua Device 0
dan Device 1.
c. Lakukan hal serupa pada Secondary IDE Channel.
9. Upgrade Pengkabelan.
Untuk peningkatan teknologi harddisk, dibutuhkan pengak abelan yang akan mendorong
performa lebih baik.
Pastikan untuk menggunakan kabel 80-wire Ultra-133 untuk semua device IDE dan
gunakan konektor yang cocok dengan socket Master/Slave/Motherboard.
Kalo Device-n ya cuma satu, harus dihubungkan pada konektor yang paling ujun g dari
kabel pita (kabel data), jangan pada konektor yang di tengah kabel pita, jika tidak, maka
akan terjadi masalah sin yal. Pada harddisk ultra DMA, masalah sin yal ini bisa
mencegah harddisk memaksimalkan potensinya.
10. Buang semua spyware dari komputer.
Gunakan program gratisan seperti AdAware buatan Lavasoft atau SpyBot Search &
Destroy. Setelah program ini terinstal, pastikan untuk melakukan cek update dan
mendownloadnya jika ada, sebelum melakukan p encarian spyware di komputer.
Apapun program yang ditemukan bisa dihapus secara aman. Semua program gratisan
yang meminta spyware untuk dijalankan tidak akan berfungsi lagi. Jika
program-program gratisan itu masih dibutuhkan tinggal instal lagi saja.
11. Bu ang semua program atau item yan g tidak perlu dari rutin (routin) Windows
Startup dengan menggunakan utilitas MSCONFIG.
Caranya:
a. Klik Start > Run > ketik MSCONFIG > klik OK
b. Klik tab StartUp ?> kemudian hilangkan checklist (tanda centang) dari program yangtidak diinginkan.
Tidak paham dengan item-item tersebut? Kunjungi WinTasks Process Library. Situs itu
memuat proses sistem, aplikasi yang diketahui dan juga tentang refer ensi spyware dan
penjelsann ya. Atau bisa diidentifikasi nama item-item tersebut secara langsung dengan
menggunakan google.
12. Buang semua program yang tidak digunakan dari Add/Remove Programs di Control
Panel.
13. Matikan beberapa atau semua animasi yan g tidak dibutuhkan dan nonaktifkan
(disable) active desktop.
Pada kenyataannya, untuk optimasi performa, matikan semua animasi. Windows Xp
menawarkan banyak setting-setting yang berbeda pada bagian ini.
Caranya:
a. Klik System Icon di Control Panel
b. Klik tab Advance
c. Klik tombol Settings pada kotak Performance.
d. Hilangkan checklist (tanda centang) opsi apa saja yang tidak ingin dijalankan.
Atau bisa langsung klik pada Radio Button: Adjust for best performance.
14. Kalo bisa mengedit Registry Windows XP, lakukan untuk meningkatkan per forma
XP.
Bisa menggunakan software tweak atau manual mengedit registry. Di internet sudah
banyak tersebar.
15. Kunjungi situs update Microsoft Windows secara rutin dan download semua update
yang berlabel Critical.
Download juga Optional update yang dibutuhkan. (ingat, kalau software OS windows
XP -nya b ajakan, jangan coba-coba untuk mengupdate, bisa dikasih "stempel" tanda
bajakan sama Microsoft yang justru akan memperlambat sistem ketika booting dan
running).
16. Update anti virus dalam sepekan sekali atau bahkan harian. Pastikan han ya satu
software yang terinstal. Menggabungkan lebih dari satu antivirus hanya akan
mengundang pen yakit bagi performa dan kahandalan komputer.
17. Pastikan font yan g terinstal kurang dari 500 jenis saja pada komputer. Makin banyak
font, makin lambatlah sistem. Walaupun windows XP lebih efisien d alam menangani
font dari pada versi sebelumn ya, tapi kelebihan font akan berdampak pada melemahnya
sistem.
18. Jangan partisi harddisk. (Opsional saja)

NTFS File System Windows XP berjalan lebih efisien pada satu partisi yan g besar. Data
tidak lebih aman pada partisi terpisah, dan format ulang tidak dibutuhkan untuk instal
ulang Sistem Operasi (OS). Satu partisi ini berfungsi agar tidak ada pembatasan oleh
partisi akan tetapi akan dibatasi oleh ukuran kapasitas harddisk itu sendiri. Sehingga
tidak perlu melakukan r esize partisi yang meghabiskan waktu dan resiko kehilangan
data.
19. Lakukan pengecekan terhadap sistem RAM untuk memastikan beroperasi dengan
baik.
Saya merekomendasikan untuk menggunakan program gratisan MemTest86.
Setelah didownload, bisa membuat bootable CD atau disket (sesuai pilihan) yang akan
melakukan 10 macam tes pada memory PC secara otomatis setelah malakukan boot
dengan CD atau disket yang dibuat. Biarkan semua tes berjalan sampai paling tidak
melewati 3 tes selesai dari 10 tes. Jika program mendapati error, matikan dan cabut
listrik komputer, cabut RAM memory, ganti dengan yang lain dan lakukan tes lagi.
Ingat, memory yang rusak tidak bisa diperbaiki, dan hanya bisa diganti.
20. Jika terdapat CD atau DVD recorder / writer, carilah update firmware dari pabriknya.
Pada beberap a kasus, upgrade terbukti bisa mempercepat r ecorder tersebut dan biasanya
gratis.
21. Non aktifkan (disable) service (layanan) yan g tidak penting.
Windows XP memasang banyak service yan g tidak dibutuhkan. Untuk menentukan
service apa saja yang tidak dibutuhkan, buka situs Black Viper untuk konfigurasi
Windows XP.
22. Jika tampilan tunggal Windows Ex plorer mengalami masalah ketika menampilkan
file dan menghambat sistem operasi, lakukan langkah berikut:
a. Buka My Computer
b. Klik Tools
c. Klik Folder Options?
d. Klik tab View
e. Geser / gulun g ke bawah menuju "Launch folder windows in a separate process",
aktifkan opsi ini. Setelah komputer di-restart, opsi ini akan berjalan.
23. Setidaknya sekali setahun, buka casing komputer dan bersihkan semua debu dan
"puing-puingnya". Sementara itu cek juga kipasnya, apakah putarannya masih
proporsional.

Saat Ini, pastilah kita semua selaku konsumen/pengguna jasa komputer dan jaringan ( internet ) sudah sangat sering mendengar istilah “virus” yang terkadang meresahkan kita. Tulisan ini akan mengupas lebih jauh mengenai virus, yang nantinya diharapkan dapat membuat kita semua mengerti dan memahami tentang virus.


ASAL MUASAL VIRUS

1949, John von Neumann, menggungkapkan " teori self altering automata " yang merupakan hasil riset dari para ahli matematika.

1960, Lab BELL (AT&T), para ahli di lab BELL (AT&T) mencoba-coba teori yang diungkapkan oleh John von Neumann, dengan membuat suatu jenis permainan/game. Mereka membuat program yang dapat memperbanyak dirinya dan dapat menghancurkan program buatan lawan. Program yang mampu bertahan dan menghancurkan semua program lain, akan dianggap sebagai pemenangnya. Permainan ini akhirnya menjadi permainan favorit di tiap-tiap lab komputer. Tetapi, semakin lama program yang diciptakan makin berbahaya, sehingga mereka
melakukan pengawasan dan pengamanan yang ketat terhadap permainan ini.

1980, Program-program tersebut yang akhirnya dikenal dengan sebutan "virus" ini berhasil menyebar keluar lingkungan laboratorium, dan mulai beredar di masyarakat umum.

PENGERTIAN VIRUS

"A program that can infect other programs by modifying them to include a slighty altered copy of itself. A virus can spread throughout a computer system or network using the authorization of every user using it to infect their programs. Every programs that gets infected can also act as a virus that infection grows“

Pertama kali istilah “virus” digunakan oleh Fred Cohen pada tahun 1984 di Amerika Serikat. Virus komputer dinamakan “virus” karena memiliki beberapa persamaan mendasar dengan virus pada istilah kedokteran (biological viruses).

Virus komputer bisa diartikan sebagai suatu program komputer biasa. Tetapi memiliki perbedaan yang mendasar dengan program-program lainnya,yaitu virus dibuat untuk menulari program-program lainnya, mengubah, memanipulasinya bahkan sampai merusaknya. Ada yang perlu dicatat disini, virus hanya akan menulari apabila program pemicu atau program yang telah terinfeksi tadi dieksekusi, disinilah perbedaannya dengan "worm". Tulisan ini tidak akan bahas worm karena nanti akan mengalihkan kita dari pembahasan mengenai virus ini.

KRITERIA VIRUS

Suatu program dapat disebut sebagai suatu virus apabila memenuhi minimal 5 kriteria berikut :
1. Kemampuan untuk mendapatkan informasi
2. Kemampuan untuk memeriksa suatu file
3. Kemampuan untuk menggandakan diri dan menularkan diri
4. Kemampuan melakukan manipulasi
5. Kemampuan untuk menyembunyikan diri.
Sekarang akan coba dijelaskan dengan singkat apa yang dimaksud dari tiap-tiap kemampuan itu dan mengapa ini sangat diperlukan.

1. Kemampuan untuk mendapatkan informasi

Pada umumnya suatu virus memerlukan daftar nama-nama file yang ada dalam suatu directory. Untuk apa? Agar dia dapat memperoleh daftar file yang bisa dia tulari. Misalnya, virus makro yang akan menginfeksi semua file data MS Word, akan mencari daftar file berekstensi *.doc. Disinilah kemampuan mengumpulkan informasi itu diperlukan agar virus dapat membuat daftar/data semua file, lalu memilahnya dengan mencari file-file yang bisa ditulari. Biasanya data ini tercipta saat file yang tertular/terinfeksi virus atau file program virus itu sendiri dibuka
oleh user. Sang virus akan segera melakukan pengumpulan data dan menaruhnya (biasanya) di RAM, sehingga apabila komputer dimatikan semua data hilang. Tetapi data-data ini akan tercipta kembali setiap kali virus itu diaktifkan. Biasanya data-data ini disimpan juga sebagai hidden file oleh virus tersebut.

2. Kemampuan memeriksa suatu program

Suatu virus juga harus bisa memeriksa suatu file yang akan ditulari, misalnya dia bertugas menulari program berekstensi *.doc, maka dia harus memeriksa apakah file dokumen tersebut telah terinfeksi ataupun belum, karena jika sudah, akan percuma menularinya lagi. Ini sangat berguna untuk meningkatkan kemampuan suatu virus dalam hal kecepatan menginfeksi suatu file/program. Yang umum dilakukan oleh virus adalah memiliki/memberi tanda pada file/program yang telah terinfeksi sehingga mudah untuk dikenali oleh virus tersebut. Contoh penandaan adalah misalnya memberikan suatu byte yang unik di setiap file yang telah terinfeksi.

3. Kemampuan untuk menggandakan diri

Kalo ini memang virus "bang-get", maksudnya, tanpa kemampuan ini tak adalah virus. Inti dari virus adalah kemampuan mengandakan diri dengan cara menulari file lainnya. Suatu virus apabila telah menemukan calonkorbannya maka ia akan mengenalinya dengan memeriksanya. Jika belum terinfeksi maka sang virus akan memulai aksinya penularan dengan cara menuliskan byte pengenal pada file tersebut, dan seterusnya mengcopikan/menulis kode objek virus diatas file sasaran. Beberapa cara umum yang dilakukan oleh virus untuk menulari/menggandakan dirinya adalah :
• File yang akan ditulari dihapus atau diubah namanya. Kemudian diciptakan suatu file berisi program virus itu sendiri menggunakan nama file yang asli.
• Program virus yang sudah dieksekusi/load ke memori akan langsung menulari file-file lain dengan cara menumpangi seluruh file yang ada.
4. Kemampuan mengadakan manipulasi

Rutin (routine) yang dimiliki suatu virus akan dijalankan setelah virus menulari suatu file. Isi dari suatu rutin ini dapat beragam mulai dari yang tidak berbahaya sampai yang melakukan perusakan. Rutin ini umumnya digunakan untuk memanipulasi file atau pun mempopulerkan pembuatnya ! Rutin ini memanfaatkan kemampuan dari suatu sistem operasi (Operating System), sehingga memiliki kemampuan yang sama dengan yang dimiliki sistem operasi. Misal :
1. Membuat gambar atau pesan pada monitor
2. Mengganti/mengubah-ubah label dari tiap file, direktori, atau label dari drive di PC
3. Memanipulasi file yang ditulari
4. Merusak file
5. Mengacaukan kerja printer, dsb
5. Kemampuan Menyembunyikan diri

Kemampuan menyembunyikan diri ini harus dimiliki oleh suatu virus agar semua pekerjaan baik dari awal sampai berhasilnya penularan dapat terlaksana.
Langkah langkah yang biasa dilakukan adalah:
• Program virus disimpan dalam bentuk kode mesin dan digabung dengan program lain yang dianggap berguna oleh pemakai
• Program virus diletakkan pada Boot Record atau track pada disk yang jarang diperhatikan oleh komputer itu sendiri
• Program virus dibuat sependek mungkin, dan hasil file yang diinfeksi tidak terlalu berubah ukurannya Virus tidak mengubah keterangan/informasi waktu suatu file dll
SIKLUS HIDUP VIRUS

Siklus hidup virus secara umum, melalui 4 tahap:

Dormant phase ( Fase Istirahat/Tidur ) Pada fase ini virus tidaklah aktif. Virus akan diaktifkan oleh suatu kondisi tertentu, semisal: tanggal yang ditentukan, kehadiran program lain/dieksekusinya program lain, dsb. Tidak semua virus melalui fase ini.

Propagation phase ( Fase Penyebaran ) Pada fase ini virus akan mengkopikan dirinya kepada suatu program atau ke suatu tempat dari media storage (baik hardisk, RAM dsb). Setiap program yang terinfeksi akan menjadi hasil “kloning” virus tersebut (tergantung cara virus tersebut menginfeksinya).

Trigerring phase ( Fase Aktif ) Di fase ini virus tersebut akan aktif dan hal ini juga di picu oleh beberapa kondisi seperti pada Dormant Phase.

Execution phase ( Fase Eksekusi ) Pada fase inilah virus yang telah aktif tadi akan melakukan fungsinya. Seperti menghapus file, menampilkan pesan-pesan, dsb

JENIS – JENIS VIRUS

Untuk lebih mempertajam pengetahuan kita tentang virus, saya akan coba memberikan penjelasan tentang jenis-jenis virus yang sering berkeliaran di masyarakat umum.

1. Virus Makro
Jenis virus ini pasti sudah sangat sering kita dengar. Virus ini ditulis dengan bahasa pemrograman dari suatu aplikasi bukan dengan bahasa pemrograman dari suatu Operating System. Virus ini dapat berjalan apabila aplikasi pembentuknya dapat berjalan dengan baik. Sebagai contoh jika pada komputer mac dijalankan aplikasi Word, maka virus makro yang dibuat dari bahasa makro Word dapat bekerja pada komputer bersistem operasi Mac ini.
Contoh virus:
• Varian W97M, misal W97M.Panther Panjang 1234 bytes, akanmenginfeksi NORMAL.DOT dan menginfeksi dokumen apabila dibuka.
• WM.Twno.A;TW Panjang 41984 bytes, akan menginfeksi Dokumen Ms.Word yang menggunakan bahasa makro, biasanya berekstensi *.DOT dan *.DOC
• dll
2. Virus Boot Sector
Virus Boot sector ini sudah umum sekali menyebar. Virus ini dalam menggandakan dirinya, akan memindahkan atau menggantikan boot sector asli dengan program booting virus. Sehingga saat terjadi booting maka virus akan diload ke memori dan selanjutnya virus akan mempunyai kemampuan mengendalikan hardware standar (contoh : monitor, printer dsb) dan dari memori ini pula virus akan menyebar ke seluruh drive yang ada dan yang terhubung ke komputer (contoh : floopy, drive lain selain drive c:).
Contoh virus :

Varian virus wyx:
ex: wyx.C(B) menginfeksi boot record dan floopy ;
Panjang :520 bytes;
Karakteristik : memory resident dan terenkripsi.
Varian V-sign :
Menginfeksi : Master Boot Record ;
Panjang 520 bytes;
Karakteristik : menetap di memori (memory resident),terenkripsi, dan polymorphic)
Stoned.june 4th/ bloody!:
Menginfeksi : Master Boot Record dan floopy;
Panjang 520 bytes;
Karakteristik : menetap di memori (memory resident), terenkripsi dan menampilkan pesan "Bloody!june
4th 1989" setelah komputer melakukan booting sebanyak 128 kali.

3. Stealth Virus
Virus ini akan menguasai tabel interrupt pada DOS yang sering kita kenal dengan "Interrupt interceptor".Virus ini berkemampuan untuk mengendalikan instruksi-instruksi level DOS dan biasanya mereka tersembunyi sesuai namanya baik secara penuh ataupun ukurannya.
Contoh virus :
- Yankee.XPEH.4928,
Menginfeksi file *.COM dan *.EXE ;
Panjang 4298 bytes;
Karakteristik: menetap di memori, ukurantersembunyi, memiliki pemicu
- WXYC (yang termasuk kategori boot record pun karena masuk kategri stealth dimasukkan pula disini),
Menginfeksi floopy an motherboot record;
Panjang 520 bytes;
Karakteristik : menetap di memori; ukuran dan virus tersembunyi.
- Vmem(s):
Menginfeksi file file *.EXE, *.SYS, dan *.COM ;
Panjang fie 3275 bytes;
Karakteristik:menetap di memori, ukuran tersembunyi, di enkripsi.
- dll

4. Polymorphic Virus
Virus ini Dirancang buat mengecoh program antivirus, artinya virus ini selalu berusaha agar tidak dikenali oleh antivirus dengan cara selalu merubah rubah strukturnya setiap kali selesai menginfeksi file/program lain.
Contoh virus:

- Necropolis A/B,
Menginfeksi file *.EXE dan *.COM;
Panjang file 1963 bytes;
Karakteristik: menetap di memori, ukuran dan virus tesembunyi,terenkripsi dan dapat berubah ubah struktur
- Nightfall,
Menginfeksi file *.EXE;
Panjang file 4554 bytes;
Karakteristik : menetap di memori, ukuran dan virus tesembunyi,memiliki pemicu, terenkripsidan dapat
berubah-ubah struktur
- dll

5. Virus File/Program
Virus ini menginfeksi file-file yang dapat dieksekusi langsung dari sistem operasi, baik itu file *.EXE, maupun *.COM biasanya juga hasil infeksi dari virus ini dapat diketahui dengan berubahnya ukuran file yang diserangnya.

6. Multi Partition Virus
Virus ini merupakan gabungan dari virus boot sector dan virus file. Artinya pekerjaan yang dilakukan berakibat dua, yaitu dia dapat menginfeksi file-file *.EXE atau *.COM dan juga menginfeksi boot sector.
BEBERAPA CARA PENYEBARAN VIRUS

Virus layaknya virus biologi harus memiliki media untuk dapat menyebar, virus komputer dapat menyebar ke berbagai komputer/mesin lainnya juga melalui berbagai media, diantaranya:

1. Disket, media storage R/W
Media penyimpanan eksternal dapat menjadi sasaran empuk bagi virus untuk dijadikan media. Baik sebagai tempat menetap ataupun sebagai media penyebarannya. Media yang bias melakukan operasi R/W (Read dan Write) sangat memungkinkan untuk ditumpangi virus dan dijadikan sebagai media penyebaran.

2. Jaringan ( LAN, WAN,dsb)
Hubungan antara beberapa computer secara langsung sangat memungkinkan suatu virus ikut berpindah saat terjadi pertukaran/pengeksekusian file yang mengandung virus.

3. WWW (internet)
Sangat mungkin suatu situs sengaja ditanamkan suatu “virus” yang akan menginfeksi komputer-komputer yang mengaksesnya.

4. Software yang Freeware, Shareware atau bahkan Bajakan
Banyak sekali virus yang sengaja ditanamkan dalam suatu program yang disebarluaskan baik secara gratis, atau trial version.

5. Attachment pada email, transfering file
Hampir semua jenis penyebaran virus akhir-akhir ini menggunakan email attachment dikarenakan semua pemakai jasa internet pastilah menggunakan email untuk berkomunikasi, file-file ini sengaja dibuat mencolok/menarik perhatian, bahkan seringkali memiliki ekstensi ganda pada penamaan filenya.

PENANGULANGANNYA

1. Langkah-Langkah untuk Pencegahan
Untuk pencegahan anda dapat melakukan beberapa langkah-langkah berikut :
• Gunakan antivirus yang anda percayai dengan update terbaru. Tidak perduli apapun merknya asalkan selalu diupdate, dan auto-protect dinyalakan maka komputer anda terlindungi.
• Selalu scanning semua media penyimpanan eksternal yang akan digunakan, mungkin hal ini agak merepotkan tetapi jika auto-protect antivirus anda bekerja maka prosedur ini dapat dilewatkan.
• Jika anda terhubung langsung ke Internet cobalah untuk mengkombinasikan antivirus anda dengan Firewall, Anti-spamming, dsb.
• Selalu waspada terhadap fle-file yang mencurigakan, contoh : file dengan 2 buah exstension atau file executable yang terlihat mencurigakan.
• Untuk software freeware + shareware, ada baiknya anda mengambilnya dari situs resminya.
• Semampunya hindari membeli barang bajakan, gunakan software-software open source.
2. Langkah-Langkah Apabila telah Terinfeksi
• Deteksi dan tentukan dimanakah kira-kira sumber virus tersebut apakah di disket, jaringan, email dsb. Jika anda terhubung ke jaringan maka ada baiknya anda mengisolasi komputer anda dulu (baik dengan melepas kabel atau mendisable sambungan internet dari control panel)
• Identifikasi dan klasifikasikan jenis virus apa yang menyerang pc anda, dengan cara:
1. Gejala yang timbul, misal : pesan, file yang corrupt atau hilang dsb
2. Scan dengan antivirus anda, jika anda terkena saat auto-protect berjalan berarti virus definition di dalam komputer anda tidak memiliki data virus ini, cobalah update secara manual atau mendownload virus definitionnya untuk kemudian anda install. Jika virus tersebut memblok usaha anda untuk mengupdate, maka upayakan untuk menggunakan media lain (komputer) dengan antivirus yang memiliki update terbaru
• Bersihkan virus tersebut. Setelah anda berhasil mendeteksi dan mengenalinya maka usahakan segera untuk mencari removal atau cara-cara untuk memusnahkannya di situs-situs yang memberikan informasi perkembangan virus tersebut. Hal ini perlu dilakukan apabila antivirus dengan update terbaru anda tidak berhasil memusnahkannya.
• Langkah terburuk. Jika semua hal diatas tidak berhasil adalah memformat ulang komputer anda.

KATA - KATA BIJAK TENTANG CINTA

Cinta tidak pernah meminta, ia sentiasa memberi, cinta membawa penderitaan, tetapi tidak pernah berdendam, tak pernah membalas dendam. Di mana ada cinta di situ ada kehidupan; manakala kebencian membawa kepada kemusnahan.~ Mahatma Ghandi
Tuhan memberi kita dua kaki untuk berjalan, dua tangan untuk memegang, dua telinga untuk mendengar dan dua mata untuk melihat. Tetapi mengapa Tuhan hanya menganugerahkan sekeping hati pada kita? Karena Tuhan telah memberikan sekeping lagi hati pada seseorang untuk kita mencarinya. Itulah namanya Cinta.
Ada 2 titis air mata mengalir di sebuah sungai. Satu titis air mata tu menyapa air mata yg satu lagi,” Saya air mata seorang gadis yang mencintai seorang lelaki tetapi telah kehilangannya. Siapa kamu pula?”. Jawab titis air mata kedua tu,” Saya air mata seorang lelaki yang menyesal membiarkan seorang gadis yang mencintai saya berlalu begitu sahaja.”
Cinta sejati adalah ketika dia mencintai orang lain, dan kamu masih mampu tersenyum, sambil berkata: aku turut bahagia untukmu.
Jika kita mencintai seseorang, kita akan sentiasa mendoakannya walaupun dia tidak berada disisi kita.
Jangan sesekali mengucapkan selamat tinggal jika kamu masih mau mencoba. Jangan sesekali menyerah jika kamu masih merasa sanggup. Jangan sesekali mengatakan kamu tidak mencintainya lagi jika kamu masih tidak dapat melupakannya.
Perasaan cinta itu dimulai dari mata, sedangkan rasa suka dimulai dari telinga. Jadi jika kamu mahu berhenti menyukai seseorang, cukup dengan menutup telinga. Tapi apabila kamu Coba menutup matamu dari orang yang kamu cintai, cinta itu berubah menjadi titisan air mata dan terus tinggal dihatimu dalam jarak waktu yang cukup lama.
Cinta datang kepada orang yang masih mempunyai harapan walaupun mereka telah dikecewakan. Kepada mereka yang masih percaya, walaupun mereka telah dikhianati. Kepada mereka yang masih ingin mencintai, walaupun mereka telah disakiti sebelumnya dan kepada mereka yang mempunyai keberanian dan keyakinan untuk membangunkan kembali kepercayaan.
Jangan simpan kata-kata cinta pada orang yang tersayang sehingga dia meninggal dunia , lantaran akhirnya kamu terpaksa catatkan kata-kata cinta itu pada pusaranya . Sebaliknya ucapkan kata-kata cinta yang tersimpan dibenakmu itu sekarang selagi ada hayatnya.
Mungkin Tuhan menginginkan kita bertemu dan bercinta dengan orang yang salah sebelum bertemu dengan orang yang tepat, kita harus mengerti bagaimana berterima kasih atas kurniaan itu.
Cinta bukan mengajar kita lemah, tetapi membangkitkan kekuatan. Cinta bukan mengajar kita menghinakan diri, tetapi menghembuskan kegagahan. Cinta bukan melemahkan semangat, tetapi membangkitkan semangat -Hamka
Cinta dapat mengubah pahit menjadi manis, debu beralih emas, keruh menjadi bening, sakit menjadi sembuh, penjara menjadi telaga, derita menjadi nikmat, dan kemarahan menjadi rahmat.
Sungguh menyakitkan mencintai seseorang yang tidak mencintaimu, tetapi lebih menyakitkan adalah mencintai seseorang dan kamu tidak pernah memiliki keberanian untuk menyatakan cintamu kepadanya.
Hal yang menyedihkan dalam hidup adalah ketika kamu bertemu seseorang yang sangat berarti bagimu. Hanya untuk menemukan bahawa pada akhirnya menjadi tidak bererti dan kamu harus membiarkannya pergi.
Kamu tahu bahwa kamu sangat merindukan seseorang, ketika kamu memikirkannya hatimu hancur berkeping.
Dan hanya dengan mendengar kata “Hai” darinya, dapat menyatukan kembali kepingan hati tersebut.
Tuhan ciptakan 100 bahagian kasih sayang. 99 disimpan disisinya dan hanya 1 bahagian diturunkan ke dunia. Dengan kasih sayang yang satu bahagian itulah, makhluk saling berkasih sayang sehingga kuda mengangkat kakinya kerana takut anaknya terpijak.
Kadangkala kamu tidak menghargai orang yang mencintai kamu sepenuh hati, sehinggalah kamu kehilangannya. Pada saat itu, tiada guna sesalan karena perginya tanpa berpatah lagi.
Jangan mencintai seseorang seperti bunga, kerana bunga mati kala musim berganti. Cintailah mereka seperti sungai, kerana sungai mengalir selamanya.
Cinta mampu melunakkan besi, menghancurkan batu, membangkitkan yang mati dan meniupkan kehidupan padanya serta membuat budak menjadi pemimpin. Inilah dasyatnya cinta !
Permulaan cinta adalah membiarkan orang yang kamu cintai menjadi dirinya sendiri, dan tidak merubahnya menjadi gambaran yang kamu inginkan. Jika tidak, kamu hanya mencintai pantulan diri sendiri yang kamu temukan di dalam dirinya.
Cinta itu adalah perasaan yang mesti ada pada tiap-tiap diri manusia, ia laksana setitis embun yang turun dari langit,bersih dan suci. Cuma tanahnyalah yang berlain-lainan menerimanya. Jika ia jatuh ke tanah yang tandus,tumbuhlah oleh kerana embun itu kedurjanaan, kedustaan, penipu, langkah serong dan lain-lain perkara yang tercela. Tetapi jika ia jatuh kepada tanah yang subur,di sana akan tumbuh kesuciaan hati, keikhlasan, setia budi pekerti yang tinggi dan lain-lain perangai yang terpuji.~ Hamka
Kata-kata cinta yang lahir hanya sekadar di bibir dan bukannya di hati mampu melumatkan seluruh jiwa raga, manakala kata-kata cinta yang lahir dari hati yang ikhlas mampu untuk mengubati segala luka di hati orang yang mendengarnya.
Kamu tidak pernah tahu bila kamu akan jatuh cinta. namun apabila sampai saatnya itu, raihlah dengan kedua tanganmu,dan jangan biarkan dia pergi dengan sejuta rasa tanda tanya dihatinya
Cinta bukanlah kata murah dan lumrah dituturkan dari mulut ke mulut tetapi cinta adalah anugerah Tuhan yang indah dan suci jika manusia dapat menilai kesuciannya.
Bukan laut namanya jika airnya tidak berombak. Bukan cinta namanya jika perasaan tidak pernah terluka. Bukan kekasih namanya jika hatinya tidak pernah merindu dan cemburu.
Bercinta memang mudah. Untuk dicintai juga memang mudah. Tapi untuk dicintai oleh orang yang kita cintai itulah yang sukar diperoleh.
Satu-satunya cara agar kita memperolehi kasih sayang, ialah jangan menuntut agar kita dicintai, tetapi mulailah memberi kasih sayang kepada orang lain tanpa mengharapkan balasan. (Dale Carnagie)
Cinta sejati adalah cinta yang selalu mencintaimu dalam hidup dan matinya serta cinta yang selalu menyayngimu dalam senyum dan tangismu ….
Aku ga ingin menjadi seekor lebah….yg menghisap madu pada bunga…dan lantas meninggal kan nya setelah habis…….
tapi aku ingin menjadi sebuah tangkai…yg akan hidup semati bersama bunga itu…..

q dsiNi leLah meNgaLah daN taK Lagi b’Tahan..
hNya keTidaK pasTian yag meNjeLma mNjadi riNdu busuK sesaAt
hiLang q dlm peKat mLm
meNyesakkan haTi,,
mnyisakan sEpi..
ia tK aKn paHami
betapa hNcurnya q aTas ciNta tu
ciNta itu yg melemahkan q
kTika mmenuhi sePinya haTi yg kiaN meRadang
m’ingatmu adaLah sakiT yg meNghantui q
d siNi q seSak meNahanhaTi yg meronta
ciNta itu yg meRuntuhkan dinding riNdu daLam seLubung haTi q
ciNta itu taK q sEntuh
taK q Rengkuh
TNyata ciNta ini taK Lebih MenyakitKan keTika tk q miLiki
aNdaikan sinAr biNtang isYaratkan keBahagiaan tuK q
aKn q Nantikannya di seTiap Luka haTi q
daN beRikan q seguMpaL keKuatan tuK segeRa beRanjak daRi keHeningan ini,,,,

cinta adalah nafas kehidupan,cinta adalah ruh nya manusia,cinta adalah sumber penderitaan,cinta adalah sumber pengharapan,cinta adalah haram dan suci,cinta adalah perpaduan, cinta adalah sanggahan,cinta adalah kenikmatan,cinta adalah pengingkaran,cinta adalah pembelajaran,cinta adalah memberi,kerelaan,perjuangan dan pengorbanan.
cinta adalah sumber dari setiap denyut,nafas dan ruh manusia

jangan katakan ‘ku cinta kmu’bila kmu tidak peduli.
jangan bicara soal perasaan bila tdk bener2 ada.
jangan kmu sentuh hidup se2orang bila kau berniat mematahkan hatinya.
jangan menatap kedalam matanya bila apa yang kau kerjakan cma berbohong.
hal terkejam yang bskau lakukan cma membuat orang jatuh cinta, padahalkau tidak niat sma skali tuk menerimanya saat dia terjaaatuh……

untuk apa mengungkapan cinta,,, untuk apa di cinta,,,, untuk apa melakukan semua demi cinta,,,, “Cinta,,,,,” “Cinta” bukan Dewa atau Raja,,,,,, Cinta memerlukan Kasih Sayang,,,,,, CInta tanpa Kasih Sayang,,,, bagaikan Dewa Tanpa Dewi Atau Raja tanpa Permainsuri,,,,, Lebih baik memiliki Kasih Sayang tanpa Cinta dari pada memiliki CInta tanpa Ada Kasih Sayang,,,,,

dengarkanlah kata hatimu, disitu akan kamu temukan makna hidupmu dan cintamu. karena hati tak pernah bohong.

cinta cuma keindahan semata,sebentar dan tak lama….
cuma sebuah harapan yang tak datang
sesekali bahagia
berkali-kali menderita
oh dia telah buat aku
berteman sepi selamanya
apa akan datang,pangeran yang tak bertopeng
tulus dan apa adanya
mendekat…
menghampiri
dan benar-benar menyayangi……………


“cinta yang kurasakan kejam
,tak tahu tempat,tak tahu siapa,dan tak tahu waktu
cinta yang tak sempurna
pahit bila diteruskan dan tersiksa bila dihentikan
tiada dayaku ku melupakan kenangan.
pertemuan yang tak terjamah
mampu melewati batas
angan impian bs membutakan
mampukah ku lewati
jika nanti akhirnya ku kan berkata dan tertawa “MENGAPA DULU KUBISA SEPERTI ITU”..cepatlah waktu berputar dan mengaburkan rasa cinta ini..”


CIINTA_
INDAH_MANAKALAH_MENGERTI_


Jangan pernah menghiraukan cinta di saat ia datang karena kamu akan menyesal setelah cinta itu pergi…
Jangan pernah menyakiti seseorang yang mencitai kita dengan tulus karena kamu akan tersakiti oleh kepergiannya………..!

cinta adalah ketika qta siap mati untuk nya…..
cinta adalah ktika qta mnangis untuk nya…..
cinta adalah ktika qta ingin mati jika khilangan nya…..

cinta itu ssah dimengerti.kadang membuat kita bahagia kaya disurga kadang juga buat kita merasa dineraka.

kalo kita gak bisa memiliki apa yang kita cintai kita harus belajar mencintai apa yang kita miliki. Bukankah cinta itu adalah membebaskan…jika kita mencintai…bebaskanlah dia memilih apa yang menjadi kebahagiaannya…

cinta…..
memberi dengan tulus tanpa mengharapkan balasan…
tetap tersenyum demi kbhagiaan nya meskipun itu pahit….
itulah….
cinta…..

CnTa Ga kNaL AraH,sLaLu DaTaNg pD Siapa Pun Yg D ingin Kn nYa. CnTa Bs MnCpTaKn AiR MaTa,Tp BnYaK OrG Yg MnginginKn KeHaDiRan nYa,CnTa aKn TraSa inDaH biLa aDa kTuLuSaN HaTi Dari SaNg pEnCnTa nYa.KrNa CnTa aDaLaH SumBeR KeKuaTan Yg Bs MruBaH sGaLa BnTuK kHaYaLan TnTaNg KeinDaHan & DaYa CpTa Mnusia MnJaDi nYaTa,Jg DpT MmBuaT kHiDupAn KiTa MnJaDi LeBiH BrMaKnA… MaKa Dr iTu, Jgn s!a - s!a Kn CnTa Yg HaDr DaLaM HaTi KiTa.

“Ketika aku berdiri bagaikan sebuah cermin jernih di hadapanmu, kamu memandang ke dalam diriku dan melihat bayanganmu. Kemudian kamu berkata, Aku cinta kamu. Tetapi sebenarnya, kamu mencintai dirimu dalam diriku”

cinta sejati janganlah kau tunggu
cinta sejati jangganlah kau harapkan
asal kamu tau bahwa cinta lah yang mencari
cintax sendiri melalui hati mu
hanyalah hati yang tau cntax itu dmna,.,.,.,.,


cinta,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
Jika ada yang mencintai mu maka dia harus mencntai mu
apa adanya………..
tapi bila ada yang mencintai karna perubahan,itu bukan cinta
tapi perjanjian…………
sedangkan dalam cinta g butu janji……tapi bukti………………..

Kumpulan Source Code tuk Validasi Program dengan menggunakan Visual Basic 6.o

--> Hanya Angka yang bisa di Input dalam TextBoxt

Private Sub txtNomor_KeyPress(KeyAscii As Integer)
If Not (KeyAscii >= Asc("0") & Chr(13) _
And KeyAscii <= Asc("9") & Chr(13) _ Or KeyAscii = vbKeyBack _ Or KeyAscii = vbKeyDelete _ Or KeyAscii = vbKeySpace) Then Beep KeyAscii = 0 End If End Sub --> Hanya Huruf

Private Sub txtNama_KeyPress(KeyAscii As Integer)
If Not (KeyAscii >= Asc("a") & Chr(13) _
And KeyAscii <= Asc("z") & Chr(13) _ Or (KeyAscii >= Asc("A") & Chr(13) _
And KeyAscii <= Asc("Z") & Chr(13) _ Or KeyAscii = vbKeyBack _ Or KeyAscii = vbKeyDelete _ Or KeyAscii = vbKeySpace)) Then Beep KeyAscii = 0 End If End Sub --> membersihkan Seluruh Control TextBox dan Combo Box

Sub Clear()
For Each Control In Me.Controls
If TypeOf Control Is TextBox Then
Control.Text = ""
End If
If TypeOf Control Is ComboBox Then
Control.Text = ""
End If
Next Control
End Sub

NB: jika ada tombol yang lain tinggal di tambah kondisi IFnya aja, dan tuk menonaktifkan seluruh tombol tinggal ganti "Control.Text=Enabled" aja

--> Get Auto Number

Private Sub Auto()
Dim Urutan As String * 10
Dim Tgl As String
Dim Hitung
Set TMasuk = New ADODB.Recordset
TMasuk.Open "Select * from Masuk", Persediaan, adOpenDynamic, adLockPessimistic
'TMasuk.MoveFirst
Tgl = Format(Now, "yy/mm/dd")
With TMasuk
If .RecordCount = 0 Then
Urutan = Right(Tgl, 2) + Mid(Tgl, 4, 2) + Left(Tgl, 2) + "0001"
Else
.MoveLast
If Left(![No Masuk], 6) <> Right(Tgl, 2) + Mid(Tgl, 4, 2) + Left(Tgl, 2) Then
Urutan = Right(Tgl, 2) + Mid(Tgl, 4, 2) + Left(Tgl, 2) + "0001"
Else
Hitung = (![No Masuk]) + 1
Urutan = (Right(Tgl, 2) + Mid(Tgl, 4, 2) + Left(Tgl, 2)) + Right("0000" & Hitung, 4)
End If
End If
txtNomor = Urutan
End With
End Sub

--> Mengambil record ke dalam COmboBox

Sub DaftarPelanggan()
Me.MousePointer = 11
Pesan = "Select * from Pelanggan Order By kodePlg"
Set TPelanggan = New ADODB.Recordset
TPelanggan.Open Pesan, Persediaan, adOpenStatic
cmbPlg.Clear
If Not TPelanggan.EOF Then
TPelanggan.MoveFirst
While Not TPelanggan.EOF
cmbPlg.AddItem TPelanggan!KodePlg
TPelanggan.MoveNext
Wend
End If
TPelanggan.Close
Set TPelanggan = Nothing
Me.MousePointer = 1
End Sub

-- Laporan dengan Crystall Report

Sub CetakLap()
With CrtLaporan
.Reset
.DataFiles(0) = App.Path & "\Penduduk.mdb"
.ReportFileName = App.Path & "\Lap Lahir.rpt"
.WindowMinButton = False
.WindowShowCancelBtn = True
.WindowShowCloseBtn = True
.WindowShowPrintBtn = True
.WindowShowPrintSetupBtn = True
.WindowState = crptMaximized
.Action = 1
End With
end sub



Me.CMB_KODE_KEDARAAN.Clear
X = " SELECT * FROM KENDARAAN ORDER BY \NOPOL"

Set RS = New ADODB.Recordset
RS.Open X, CONN, adOpenStatic, adLockOptimistic

If RS.RecordCount > 0 Then
While Not RS.EOF
Me.CMB_KODE_KEDARAAN.AddItem RS.Fields("NOPOL")
RS.MoveNext
Wend
End If
RS.Close
Set RS = Nothing
End Sub

Tahukah kamu?

1. Pesan instan (bahasa Inggris: Instant messaging) adalah sebuah teknologi Internet yang mengizinkan para pengguna dalam jaringan internet untuk mengirimkan pesan-pesan singkat secara langsung pada saat yang bersamaan (real time) menggunakan teks kepada pengguna lainnya yang sedang terhubung ke jaringan yang sama.

2. Voice over Internet Protocol (juga disebut VoIP, IP Telephony, Internet telephony atau Digital Phone) adalah teknologi yang memungkinkan percakapan suara jarak jauh melalui media internet

3. Netiquette merupakan Etika dalam menggunakan Internet. Internet sebagai sebuah kumpulan komunitas, diperlukan aturan yang akan menjadi acuan orang-orang sebagai pengguna Internet, dimana aturan ini menyangkut batasan dan cara yang terbaik dalam memanfaatkan fasilitas Internet.

4. Intranet adalah sebuah jaringan privat (private network) yang menggunakan protokol-protokol Internet (TCP/IP), untuk membagi informasi rahasia perusahaan atau operasi dalam perusahaan tersebut kepada karyawannya.

5. Server adalah sebuah sistem komputer yang menyediakan jenis layanan tertentu dalam sebuah jaringan komputer.

6. Client adalah komputer yang menerima layanan dari server atau komputer induk dalam suatu jaringan komputer

7. HyperText Markup Language (HTML) adalah sebuah bahasa markup yang digunakan untuk membuat sebuah halaman web dan menampilkan berbagai informasi di dalam sebuah browser Internet.

8. Penjelajah web (bahasa Inggris: web browser), disebut juga sebagai perambah atau peramban, adalah perangkat lunak yang berfungsi menampilkan dan melakukan interaksi dengan dokumen-dokumen yang disediakan oleh server web.

9. Bandwidth adalah satuan ukuran (megabyte per second (Mbps) dan kilobyte per second (kbps)) yang digunakan untuk mengukur kemampuan suatu jaringan dalam mentrasnfer data

10. URL atau Uniform Resource Locator (diterjemahkan: Pelokasi Sumber Daya Seragam), adalah rangkaian karakter menurut suatu format standar tertentu, yang digunakan untuk menunjukkan alamat suatu sumber - seperti dokumen dan gambar - di Internet.

Files dan Folder disembunyikan Virus ?

Beberapa waktu yang lalu saya diminta teman untuk memeriksa flasdisk yang katanya datanya hilang. Setiap membuka setiap folder maka ia akan kembali ke folder tersebut atau membuka folder lainnya, dan foldernya selalu kosong. Setelah saya scan di komputer dengan AVG Free Edition + update terbaru, akhirnya ditemukan banyak sekali virusnya, dan ternyata virus-virus itu ( seperti kebiasaan virus lokal saat ini ) menduplikasi dirinya dengan icon dan nama folder yang bersangkutan, sehingga ketika membuka folder sebenarnya menjalankan virusnya. Sedangkan folder aslinya di sembunyikan ( hidden ).
Untuk menampilkan folder yang disembunyikan, tidak cukup melalui Folder Options > View > Show hidden files and folders, tetapi harus menghilangkan check di "Hide protected operating system files (Recommended)" dan terkadang menu ini dihilangkan oleh virus, sehingga kita tidak bisa merubahnya.

Setelah folder ditampilkan, icon akan tampak samar-samar yang menunjukkan file/folder di-hidden jika di klik kanan > Properties, maka opsi Hidden tidak akan bisa dirubah ( karena hidden system ). Untuk menampilkannya lagi bisa dilakukan dengan langkah berikut :
1. Buka Command Prompt ( All Programs > Accessories > Command Prompt )
2. Cari dimana folder yang di sembunyikan
3. Ketik perintah ATTRIB *.* -S -H -R /S /D
4. Untuk mengetahui keterangan mengenai perintah itu ketik ATTRIB /?
Setelah membuka window Command Prompt, biasanya akan tampil seperti berikut :
C:\Documents and Settings\nama_user
Kemudian ketik saja sebagai berikut
CD..
dan tekan enter. Ulangi lagi sampai tampil drive-nya saja, misalnya
C:\>
Selanjutnya, dicari dimana file/folder tersebut disembunyikan. Jika di drive E:, maka ketik saja perintah berikut :
C:\>E: kemudian tekan enter, sehingga akan tampil E:\>
Setelah itu ketik perintah seperti diatas ATTRIB *.* -S -H -R /S /D , yang berarti semua file dan folder di drive E: yang disembunyikan akan ditampilkan. Jika hanya folder tertentu, misalnya di folder D:\Data\Skripsi. Maka langkahnya sebagai berikut :
1. Ubah lokasi Command prompt ke drive D, dengan mengetikkan perintah D:
2. Untuk menuju lokasi D:\Data\Skripsi, maka ketikkan perintah sebagai berikut :
CD Data\Skripsi
3. Kemudian baru ditulis perintah ATTRIB *.* -S -H -R /S /D

Menggungkapkan Perbedaan Pendapat secara Halus

Perbedaan pendapat di antara pembicara baik pada forum diskusi atau
situasi semiformal sudah biasa terjadi. Tidak setiap orang selalu menyetujui
pendapat mitra bicaranya. Masing-masing orang memiliki pandangan
atau pemikirannya sendiri. Tetapi, perbedaan pendapat itu tak boleh
menjadi pemicu konfik. Perbedaan pendapat dapat semakin memberi
wawasan yang lebih luas tentang suatu pokok permasalahan. Mencari
solusinya bisa lebih variatif. Segala unsur yang berbeda dicarikan sudut
persamaannya atau disinergikan untuk mengarah pada satu kesimpulan
atau penyelesaian. Bukan hanya itu saja, setiap perbedaan pendapat harus
dihormati dan disikapi secara santun. Ungkapan seperti, mustahil, itu tidak
benar, pendapatnya tidak masuk akal, dan itu gagasan orang bodoh harus
dihindari. Ungkapan itu bukan saja dapat menyinggung mitra bicara, tetapi
juga bisa merendahkan harga diri orang.
Menyampaikan pendapat yang berbeda atau menyanggah pendapat
orang lain yang berbeda dengan pendapat kita dapat dilakukan secara
halus dengan mempertimbangkan hal-hal berikut.
(1) Nyatakan permohonan “maaf” dahulu.
(2) Berikan kesan mendukung gagasan yang akan disanggah sebelum
menyertakan kekurangannya.
(3) Ungkapkan kekurangan dengan perkataan yang halus seperti, “kurang”
atau “belum,” bukan kata-kata “tidak”.
(4) Ungkapkan kekurangan pendapat mitra bicara dengan alasan yang
logis.

Salam dan Ungkapan dalam Mengakhiri Percakapan

Ketika akan mengakhiri percakapan biasanya seseorang akan
menegaskan kembali hal-hal pokok yang berkaitan dengan materi
pembicaraan yang dianggap penting untuk diingat atau dilakukan kepada
kawan bicaranya. Selanjutnya baru menyampaikan ucapan penutup
pembicaraan.
Saat akan mengakhiri percakapan, biasanya pembicara mengucapkan
hal-hal seperti di bawah ini.
1. Menegaskan kembali yang hal penting dari apa yang telah dibicarakan
agar tetap diingat atau tak lupa untuk dilakukan.
Dalam situasi formal
Contoh:
1. Baiklah, jangan lupa datang di acara wisudaku.
2. Baiklah pemirsa di rumah, jika ada saran dan kritik, kirimkan
ke ...
3. Jadi, jangan sampai lupa rencana kita.
4. Baiklah, sampai bertemu besok di rapat.
5. Sebelum mengakhiri diskusi ini, saya ingatkan kembali ....
6. Sebelum menutup rapat ini, saya tegaskan kembali ....
7. Demikian yang bisa saya sampaikan, ingat ....
8. Sekian saja pertemuan kita hari ini, jangan lupa ....
9. Sebelum ditutup, saya ingatkan kembali ....
10. Sebagai penutup, kita simpulkan bahwa ....
11. Insya Allah, kita akan mengadakan pertemuan kembali ....
Dalam situasi nonformal
Contoh:
1. Oke, jangan lupa besok ketemu ....
2. Udah dulu, ya, pokoknya besok ....
3. Oke, jadi, kan besok?
4. Sampai minggu depan, ingat kita masih ada urusan
5. Sip deh, jadi kita besok berangkat ....

2. Mengucapkan terima kasih
Dalam situasi formal
Contoh:
1. Atas perhatian Bapak dan Ibu sekalian, kami mengucapkan terima
kasih.
2. Terima kasih atas waktu dan kesempatannya.
3. Terima kasih atas kesedian waktunya.
4. Terima kasih atas segala bantuan yang telah diberikan.
5. Terima kasih untuk pesan-pesannya.
Dalam situasi nonformal
Contoh:
a. Makasih banyak!
b. Makasih, ya!
c. Trims, yuk!
d. Thanks sudah mau kasih saran!
3. Permintaan maaf
Dalam situasi formal
Contoh:
1. Kami mohon maaf jika ada pelayanan yang tak berkenan.
2. Mohon maaf jika ada kata-kata yang tak pantas.
3. Sebelumnya kami mohon maaf bila tak berkenan ....
4. Mohon maaf atas keterlambatan ....
5. mohon dibukakan pintu maaf jika ada kesalahan ucapan ....
Dalam situasi nonformal
Contoh:
1. Maaf, ya, kalau ada salah ucap.
2. Maafn ya, kalau ada salah kata.
3. Maaf, ya!
4. Ungkapan perpisahan serta harapan
Dalam situasi formal
Contoh:
1. Selamat jalan semoga sampai ditujuan.
2. Semoga berhasil, sampai jumpa.
3. Selamat berpisah, semoga kita bertemu lagi.
4. Sampai berjumpa dalam kesempatan yang lain.
5. Sampai di sini dulu pertemuan kita, semoga sukses.
Ucapan perpisahan nonformal
Contoh:
1. Dada ...
2. Bye ...
3. Goodbye ..
4. Sampai nanti,ya ..
5. Dah, yuk!
6. Sampai nanti, ya!
7. Salam buat keluarga, ya!
5. Menutup percakapan dengan salam penutup. Salam penutup biasanya
disesuaikan dengan salam pembuka atau berdaarkan waktu.
Dalam situasi formal
Contoh:
1. Assalamu’alaikum.
2. Selamat malam.
3. Selamat siang.
Salam penutup dalam situasi nonformal
Contoh:
1. Met malam!
2. Malam.
3. Assalamu’alaikum.
4. Siang.

Salam dan Ungkapan dalam Mengakhiri Percakapan

Ketika akan mengakhiri percakapan biasanya seseorang akan
menegaskan kembali hal-hal pokok yang berkaitan dengan materi
pembicaraan yang dianggap penting untuk diingat atau dilakukan kepada
kawan bicaranya. Selanjutnya baru menyampaikan ucapan penutup
pembicaraan.
Saat akan mengakhiri percakapan, biasanya pembicara mengucapkan
hal-hal seperti di bawah ini.
1. Menegaskan kembali yang hal penting dari apa yang telah dibicarakan
agar tetap diingat atau tak lupa untuk dilakukan.
Dalam situasi formal
Contoh:
1. Baiklah, jangan lupa datang di acara wisudaku.
2. Baiklah pemirsa di rumah, jika ada saran dan kritik, kirimkan
ke ...
3. Jadi, jangan sampai lupa rencana kita.
4. Baiklah, sampai bertemu besok di rapat.
5. Sebelum mengakhiri diskusi ini, saya ingatkan kembali ....
6. Sebelum menutup rapat ini, saya tegaskan kembali ....
7. Demikian yang bisa saya sampaikan, ingat ....
8. Sekian saja pertemuan kita hari ini, jangan lupa ....
9. Sebelum ditutup, saya ingatkan kembali ....
10. Sebagai penutup, kita simpulkan bahwa ....
11. Insya Allah, kita akan mengadakan pertemuan kembali ....
Dalam situasi nonformal
Contoh:
1. Oke, jangan lupa besok ketemu ....
2. Udah dulu, ya, pokoknya besok ....
3. Oke, jadi, kan besok?
4. Sampai minggu depan, ingat kita masih ada urusan
5. Sip deh, jadi kita besok berangkat ....

2. Mengucapkan terima kasih
Dalam situasi formal
Contoh:
1. Atas perhatian Bapak dan Ibu sekalian, kami mengucapkan terima
kasih.
2. Terima kasih atas waktu dan kesempatannya.
3. Terima kasih atas kesedian waktunya.
4. Terima kasih atas segala bantuan yang telah diberikan.
5. Terima kasih untuk pesan-pesannya.
Dalam situasi nonformal
Contoh:
a. Makasih banyak!
b. Makasih, ya!
c. Trims, yuk!
d. Thanks sudah mau kasih saran!
3. Permintaan maaf
Dalam situasi formal
Contoh:
1. Kami mohon maaf jika ada pelayanan yang tak berkenan.
2. Mohon maaf jika ada kata-kata yang tak pantas.
3. Sebelumnya kami mohon maaf bila tak berkenan ....
4. Mohon maaf atas keterlambatan ....
5. mohon dibukakan pintu maaf jika ada kesalahan ucapan ....
Dalam situasi nonformal
Contoh:
1. Maaf, ya, kalau ada salah ucap.
2. Maafn ya, kalau ada salah kata.
3. Maaf, ya!
4. Ungkapan perpisahan serta harapan
Dalam situasi formal
Contoh:
1. Selamat jalan semoga sampai ditujuan.
2. Semoga berhasil, sampai jumpa.
3. Selamat berpisah, semoga kita bertemu lagi.
4. Sampai berjumpa dalam kesempatan yang lain.
5. Sampai di sini dulu pertemuan kita, semoga sukses.
Ucapan perpisahan nonformal
Contoh:
1. Dada ...
2. Bye ...
3. Goodbye ..
4. Sampai nanti,ya ..
5. Dah, yuk!
6. Sampai nanti, ya!
7. Salam buat keluarga, ya!
5. Menutup percakapan dengan salam penutup. Salam penutup biasanya
disesuaikan dengan salam pembuka atau berdaarkan waktu.
Dalam situasi formal
Contoh:
1. Assalamu’alaikum.
2. Selamat malam.
3. Selamat siang.
Salam penutup dalam situasi nonformal
Contoh:
1. Met malam!
2. Malam.
3. Assalamu’alaikum.
4. Siang.

Pilihan Kata atau Ungkapan untuk Memulai Percakapan

Proses penyampaian bahasa Indonesia dalam berkomunikasi secara
lisan dapat dilakukan dalam dua cara, yaitu secara langsung dan tidak
langsung. Secara langsung maksudnya berhadapan atau bertatap muka
dengan mitra bicara dan tidak langsung ialah dengan menggunakan sarana
seperti telepon atau media komunikasi yang lainnya. Apa pun caranya,
yang jelas setiap proses komunikasi dilakukan dengan tujuan agar pesan
yang disampaikan dapat dipahami oleh kedua pihak sehingga terjadi hasil
yang efektif dan memuaskan.
Agar dapat terjadi hubungan komunikasi timbal balik yang sesuai
dengan tujuan komunikasi, segala hal yang berkaitan dengan proses
komunikasi harus diperhatikan. Unsur utama dalam komunikasi adalah
bagaimana seseorang dapat menggunakan bahasa yang baik dan tepat.
Selain itu, perlu dipertimbangkan pula aspek situasi, waktu, tempat, dan
hubungan pembicara mitra atau kawan bicaranya, misalnya, saat membuka
percakapan, saat menyampaikan pesan, dan ketika akan menutup
pembicaraan. Hal ini biasanya memengaruhi pilihan kata dan ungkapan
yang digunakan dalam percakapan.
Untuk memulai percakapan dalam situasi formal biasanya meng-
gunakan ungkapan sebagai berikut.
1. Selamat pagi.
2. Selamat siang.
3. Selamat malam.
4. Assalamu’alaikum pemirsa di mana saja Anda berada.
5. Salam sejahtera bagi kita semua.
6. Selamat malam para pendengar radio.
7. Selamat datang.
Atau ucapan pembuka dengan sapaan:
1. Bapak-Bapak dan Ibu-Ibu serta hadirin ... selamat malam.
2. Para tamu undangan yang kami muliakan.
3. Assalamu ‘alaikum, Saudara-saudaraku ....
4. Yang terhormat dewan guru ....
5. Yang saya hormati Kepala Sekolah ....
6. Teman-teman yang saya cintai, selamat pagi ....
7. Siswa-siswi yang saya sayangi ....
8. Para pendengar setia radio Sonora, selamat berjumpa.
9. Hadirin yang berbahagia, selamat datang, selamat malam ....
10. Para karyawan PT. Sejahtera, selamat siang ....
11. Sahabat yang dimuliakan Allah, Assalamu’alaikum ....
12. Para pemirsa, kita berjumpa lagi selama tiga puluh menit ke depan
....
13. Selamat malam, Pak, saya Ardi. Bisa bertemu dengan ....
14. Selamat pagi, apakah saya bisa bertemu dengan Bapak ....
Ungkapan pembuka lewat telepon dalam ragam formal:
1. Assalamu’alaikum…
2. Selamat pagi. Bisa bicara dengan… saya dari…
3. Selamat sore, ada yang bisa saya bantu?
4. Halo, selamat siang…
5. Selamat pagi. Saya Ahmad. Bisa bicara dengan...
6. Wa’alaikum salam, Yayasan Restu Ibu, ada yang bisa kami bantu?
7. PT. Rahmat, Assalamu’alaikum, ada yang bisa dibantu?
8. Cafe Halal, Selamat Malam...
9. Selamat sore. Maaf mengganggu, bisa bicara dengan...
Ungkapan atau salam pembuka pada percakapan di telepon dalam
situasi nonformal:
1. Halo, gimana kabarnya?
2. Halo, Rahmatnya ada?
3. Halo, ada Wiwin, Bu?
4. Halo, Pak. Bisa dengan Zulkifi?

Pilihan Kata atau Ungkapan untuk Memulai Percakapan

Proses penyampaian bahasa Indonesia dalam berkomunikasi secara
lisan dapat dilakukan dalam dua cara, yaitu secara langsung dan tidak
langsung. Secara langsung maksudnya berhadapan atau bertatap muka
dengan mitra bicara dan tidak langsung ialah dengan menggunakan sarana
seperti telepon atau media komunikasi yang lainnya. Apa pun caranya,
yang jelas setiap proses komunikasi dilakukan dengan tujuan agar pesan
yang disampaikan dapat dipahami oleh kedua pihak sehingga terjadi hasil
yang efektif dan memuaskan.
Agar dapat terjadi hubungan komunikasi timbal balik yang sesuai
dengan tujuan komunikasi, segala hal yang berkaitan dengan proses
komunikasi harus diperhatikan. Unsur utama dalam komunikasi adalah
bagaimana seseorang dapat menggunakan bahasa yang baik dan tepat.
Selain itu, perlu dipertimbangkan pula aspek situasi, waktu, tempat, dan
hubungan pembicara mitra atau kawan bicaranya, misalnya, saat membuka
percakapan, saat menyampaikan pesan, dan ketika akan menutup
pembicaraan. Hal ini biasanya memengaruhi pilihan kata dan ungkapan
yang digunakan dalam percakapan.
Untuk memulai percakapan dalam situasi formal biasanya meng-
gunakan ungkapan sebagai berikut.
1. Selamat pagi.
2. Selamat siang.
3. Selamat malam.
4. Assalamu’alaikum pemirsa di mana saja Anda berada.
5. Salam sejahtera bagi kita semua.
6. Selamat malam para pendengar radio.
7. Selamat datang.
Atau ucapan pembuka dengan sapaan:
1. Bapak-Bapak dan Ibu-Ibu serta hadirin ... selamat malam.
2. Para tamu undangan yang kami muliakan.
3. Assalamu ‘alaikum, Saudara-saudaraku ....
4. Yang terhormat dewan guru ....
5. Yang saya hormati Kepala Sekolah ....
6. Teman-teman yang saya cintai, selamat pagi ....
7. Siswa-siswi yang saya sayangi ....
8. Para pendengar setia radio Sonora, selamat berjumpa.
9. Hadirin yang berbahagia, selamat datang, selamat malam ....
10. Para karyawan PT. Sejahtera, selamat siang ....
11. Sahabat yang dimuliakan Allah, Assalamu’alaikum ....
12. Para pemirsa, kita berjumpa lagi selama tiga puluh menit ke depan
....
13. Selamat malam, Pak, saya Ardi. Bisa bertemu dengan ....
14. Selamat pagi, apakah saya bisa bertemu dengan Bapak ....
Ungkapan pembuka lewat telepon dalam ragam formal:
1. Assalamu’alaikum…
2. Selamat pagi. Bisa bicara dengan… saya dari…
3. Selamat sore, ada yang bisa saya bantu?
4. Halo, selamat siang…
5. Selamat pagi. Saya Ahmad. Bisa bicara dengan...
6. Wa’alaikum salam, Yayasan Restu Ibu, ada yang bisa kami bantu?
7. PT. Rahmat, Assalamu’alaikum, ada yang bisa dibantu?
8. Cafe Halal, Selamat Malam...
9. Selamat sore. Maaf mengganggu, bisa bicara dengan...
Ungkapan atau salam pembuka pada percakapan di telepon dalam
situasi nonformal:
1. Halo, gimana kabarnya?
2. Halo, Rahmatnya ada?
3. Halo, ada Wiwin, Bu?
4. Halo, Pak. Bisa dengan Zulkifi?

Pria Punya Usaha

Dengan modal kecil membangun usaha
Roby Siswanto (22), pria kelahiran Bengkulu, bosan berkeliling Jakarta
mencari lowongan yang berujung pada ketidaksesuaian syarat iazah.
Banyak pekerjaan yang mematok persyaratan iazah sarjana. Berbekal
pengalaman saat menjadi santri di Pesantren Tebu Ireng, Jombang, Roby
mencoba membuat bisnis minuman sari tebu yang ia lihat saat masih menjadi
santri. Bisnis yang ia geluti ini terinspirasi makin banyaknya minuman
instan yang kini dilarang karena mengandung zat kimia dan pewarna.
Mulailah ia menyiapkan peralatan yang diperlukan. Ia harus membeli
peralatan giling tebu seharga Rp 5 juta per set, sudah termasuk mesin
kompresor berbahan bakar bensin yang ia peroleh dari seorang bos. Selain
itu, ia juga harus menyiapkan gerobak, wadah, atau gelas, serta payung
besar. Sekarang tinggal mencari tempat yang tepat untuk berjualan sari tebu.
Tempat yang paling pas, menurutnya ialah di dekat sekolah atau depan
supermarket yang banyak dilalui orang atau anak-anak. Untuk penyediaan
tebu, ia dapatkan dari penyuplai tebu dari Bengkulu atau Jambi. Tebu dari
kedua daerah tersebut mempunyai rasa yang manis dan tak membuat
batuk, katanya.
Modal yang dikeluarkan semua tak kurang dari Rp. 7 juta, masih
mendingan jika harus digunakan untuk menyogok bila ingin menjadi pegawai
negeri, seperti yang banyak dilakukan teman-temannya. Setelah dihitung
ternyata omzet yang dihasilkan dari berbisnis tebu bisa mencapai Rp. 200
ribu per hari, hampir menyamai keuntungan bisnis angkot atau warung
makan. Padahal bahan baku yang digunakan sangat sederhana hanya
batang tebu seharga Rp 4.500 per batang. Dari satu batang dapat diperoleh
5 -6 gelas sari tebu yang diual Rp 1.500-Rp 2.000 per gelas.
Modal seadanya yang membawa sukses
Lain lagi dengan wiraswastawan bernama lengkap Topo Goedel
Atmodjo (32) yang memiliki bengkel motor modifkasi “Tauco Custom”
di Jalan Raya Kebagusan Jagakarsa. Sejak lulus SMA, tahun 1994 dan
mengalami kesulitan mencari kerja, ia terjun ke bidang mesin khususnya
mesin motor. Dari SMA, Topo memang sudah menyukai mesin, mungkin
karena dulu kakeknya punya bengkel. Berangkat dari hobinya terhadap
mesin motor, ia kemudian mencoba membuka bengkel motor modifkasi.
Menurutnya, bengkel modifkasi motor masih jarang dan prospeknya cukup
bagus. Dengan modal semangat dan uang seadanya, ia memulai bisnis ini.
Bengkelnya dibuat pertama kali dengan menumpang pekarangan
rumah orang di gang sempit, bahkan ia pun tidur di tempat itu. Kemudia,
bersama temannya yang ingin membuka bengkel mobil, ia menyewa lahan.
Semua alat-alat bengkel, ia rakit sendiri.
Bengkel modifkasinya makin dikenal orang lewat mulut ke mulut.
Banyak yang memakai jasanya. Selain harganya murah, bengkel modifkasi
juga tepat untuk orang yang mau memperbaiki motor bermodal cekak.
Untuk perbaikan motor modifkasi ini, ia mencari barang-barang atau
onderdil ke lapak-lapak lalu ia memanfaatkan bahan-bahan reject dari lapak
tersebut untuk memperbaiki motor orang.
Untuk memodifkasi motor, pelanggan biasanya mempunyai keingi-
nan sendiri. Ia mendiskusikannya dengan pemilik motor, apa yang
diinginkannya. Setiap orang yang datang ke sini pasti ditanyakan dulu,
maunya seperti apa. Setelah itu, ia membuatkan konsepnya sesuai dengan
permintaan. Kalau orang tersebut tidak tahu sama sekali tentang modifkasi,
ia akan menjelaskan sedetail mungkin mengenai konsepnya. Jadi, ia selalu
berusaha memberikan yang terbaik buat pemilik motor agar puas.
Kalau mengenai harga, memang relatif bergantung pada konsepnya.
Tetapi, bagi penggemar motor modifkasi, itu sudah biasa. Pengalamannya
selama mengerjakan motor modifkasi, harga yang tinggi sudah mencapai
Rp 70 juta. Ada juga yang Rp 15 juta bergantung modelnya. Ia menerima
semua jenis motor yang bisa dimodifkasi untuk semua aliran. Ada aliran
trel, sport, super, dan klasik, sedangkan motornya bisa jenis tiger, scorpio,
shogun, thunder, mio, dan lain-lain. Modifkasi itu dibuat karena hobi
sehingga berapa pun biaya tidak jadi masalah bagi mereka. Kini, sekitar
seribu lebih desain telah dihasilkannya selama 13 tahun buka bengkel. Ke
depan, ia berencana ingin membuka lapangan kerja lebih luas lagi.
Setiap gagal selalu bangkit
Kemal Rozandi (42), pria kelahiran Jakarta ini termasuk interpreneur
atau wiraswastawan yang mau memetik hikmah kegagalan. Berkali-kali
usahanya jatuh, berkali-kali pula ia bangkit. Sebelum menjalani bisnisnya
yang sekarang, ia pernah bekerja di salah satu lembaga penunjang pasar
modal di Jakarta karena latar belakang pendidikannya berkaitan dengan
perbankan. Karena krisis moneter beberapa waktu yang lalu, perusahaannya
tutup. Ia pun kemudian mengembangkan usaha minimarket, itu pun gulung
tikar karena tak kuat bersaing dengan ritel-ritel yang ada. Setelah berkali-
kali gagal, ia lalu mencoba berbisnis jaket. Kemal tertarik membuat jaket
karena ia hobi naik sepeda motor. Dalam benaknya, ia melihat pengendara
motor, jumlahnya luar biasa besar. Jaket menurut Kemal juga merupakan
kebutuhan yang cukup penting. Setidaknya untuk naik sepeda motor,
seseorang harus memiliki satu jaket agar lebih aman dan nyaman. Dengan
pikiran itu, ia berpendapat bahwa bisnis jaket cukup prospektif.
Sebelum jaket dibuat, ia membuat desainnya terlebih dahulu. Setelah
desain dibuat, ia kemudian menjahit dan memproduksi dalam jumlah
terbatas. Biasanya ia mencoba hasil produksinya dulu, jika dirasakan cukup
enak, nyaman, dan punya nilai jual, ia segera memproduksi dalam jumlah
banyak dan dipasarkan. Saat ini, berkat ketekunan dan kesabarannya, Kemal
sudah mampu memproduksi tidak kurang dari 300 jaket setiap bulan.
(Sumber: Wirausaha &Keuangan, Ed.024, April 2007)

VISUAL BASIC .

NET Chapter 1 Variables, Procedure & Conditional BranchingMicrosoft pada mulanya mengeluarkan suatu bahasa program yang sederhana yang disebut Basic. Kelebihan dari Basic terutama adalah tata-bahasa yang sederhana sehingga mirip bahasa Inggris. Seiring kemajuan computer dan system operasi windows akhirnya dirasakan Basic banyak kekurangan maka di keluarkan bahasa program baru dengan nama Visual Basic dan disusul dengan Visual C++. Ditambah visual Interdev , paket ini disebut Visual Studio. Visual Basic dan Visual C++ ini memudahkan programer jika ingin membuat program yang jalan/run di lingkungan system Windows. Hal yang sulit dilakukan jika memakai bahasa program lain misalnya gpp atau gcc. Setelah berjalan beberapa tahun paket Visual Studio mengeluarkan versi Visual Studio.Net . Paket .Net(baca dot net) mempunyai beberapa kelebihan yaitu mudah dipakai baik untuk lingkungan windows maupun internet. Selain itu juga mendukung pemograman yang berjalan di Console (windows dos). Helpnya juga sudah bisa integrated dengan development environment, sehingga jika ada syntax yang kurang dipahami tinggal cari melalui index. Visual .Net ini sudah ada 2 versi yaitu versi 2002 dan versi 2003. Pada versi 2002 untuk pemograman Visual C++ belum ada form dan control visual tools drag and paste seperti tersedia untuk Visual basic. Versi yang 2003 sudah lengkap baik untuk Visual C++.Net sama dengan Visual Basic.Net bisa memakai basic controls dengan drag and paste. Dalam bahasan kita ini, kita akan mempelajari lengkap Visual Basic namun ditujukan untuk dicompile dengan Visual Basic.Net. Pemograman dilakukan di MDE yang bisa dijalankan dengan click Icon Visual Studio.Net, kemudian buat new project, pilih Visual Basic sebagai project type dan pilih Templates yang dinginkan misalnya Window Application atau Console Application. Atau lainnya yang ada dipilihan. Name dari project dan letak file project yang akan disave juga bisa diatur sebelum click OK. Sebagai contoh pertama , coba dipilih template Window Application dan project name misal WinSample1 dan directory misal test1 dan click OK. MDE akan membuat Solution WinSample1. Dikanan dari IDE nampak Solution explorer dan folder References dan 2 file, AssemblyInfo.vb dan Form1.vb . Sedang ditengah nampak Form1.vb dalam bentuk Design. Form1 ini jika diclick , maka dikanan bawah dari IDE bisa kita lihat Form1 properties. Pemrograman Visual adalah pemrograman Object Oriented. Jika pernah belajar C++ maka object dibuat dari definisi(turunan) suatu class. Class induknya adalah System dengan turunannya System.Data , System.Drawing, System.XML dan System.Windows. Sedangkan Formnya sendiri adalah turunan dari System.Windows.Forms. Ini nampak di References dari project explorer. Kembali ke Form1(select dulu dengan single click kalau belum). Dibaris bawah Solution Explorer kita bisa click View Designer atau View Code atas Form1. Dalam Designer View, pada Form ini bisa didrag and paste macam-macam standard controls yang disebut Windows Form Toolsbox (nampak pada kolom dikiri MDE). Sedang pada Code view , kita bisa tuliskan code untuk Form ini dan controls2-nya. Nah, untuk latihan kita yang pertama ini yaitu WinSample project kita select Form1 dalam Designer View. Lalu pilih misal Button control (ada lambang ab) dan click posisi awal(misal tengah atas) di Form1 lalu drag . Jadilah Button kita yang mana pada kolom properties kita bisa change properties sesuai keinginan kita. Misal text Button1 kita change jadi Start. Jika sekarang button Start ini kita double-click maka akan tampil Code view dimana di list code kita :Public Class Form1 Inherits System.Windows.Forms.Form Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click End SubEnd Class Note: harap diperhatikan buat yg baru belajar code baris kata Private adalah nyambung dalam satu baris sampai Button1.Click. Nampak bahwa Button1_Click object adalah terletak dalam Class Form1 dimana class ini adalah turunan dari System.Windows.Forms.Form. Sementara ini kita nggak usah pusing soal class ini, kita bisa tulis code kita untuk Button1_Click ini di sub Button1_Click. Untuk itu kita buat lagi 1 control di Form (kembali dulu ke Designer view) misalnya Label(lambang A), taruh dibawah button start. Kemudian di Label1 properties text dibuat blank. Nah sekarang kita sudah siap tulis code untuk Button1_Click (double click button Start). Tulis code seperti dibawah ini : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Label1.Text = "This is the text created by clicking Start button." End Sub Selanjutnya tinggal click Build WinSimple1 di Build menu. Jika tidak ada error di layar build output (bawah), maka tinggal click Start di menu Debug. Setelah Form muncul coba click button Start untuk memunculkan tulisan text tersebut ! Ok, sekarang close WinSample1 ini. Kembali ke Form1 dalam designer view, tambahkan 4 button dikiri dan 3 buah textbox dikanan atas kebawah . Susun button seperti tuts calculator dan perkecil jadi segiempat dan text dirubah masing2 jadi +, -, * dan /. Agar nampak lebih tegas font dirubah jadi bold dan size 12. Dan name dari button ganti jadi plus, minus, times and devide. Untuk textbox1 sampai 3 , name diganti jadi Text1, Text2 dan Text3. Sedang text propertynya ganti 0 dan align di set right. Tujuannya adalah kita akan membuat calculator sederhana. untuk mulai code view , double_click plus button dan muncul code seperti dibawah ini : Private Sub Plus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Plus.Click End Sub Kita buat 3 buah variable misal Num1, Num2 dan Num3. Dan agar variable ini punya scope berlaku untuk sub-routine dari beberapa button maka kita declare diluar sub_routine sebagai berikut. Sekalian didalam routine ditulis code untuk menjumlah nilai pada Text1 dan Text2. Karena Text1.text adalah string, maka perlu diambil value-nya dulu sebelum bisa dijumlah dengan benar. Dim Num1, Num2, Num3 As Integer Private Sub Plus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Plus.Click Num1 = Val(Text1.text) Num2 = Val(Text2.text) Num3 = Num1 + Num2 Text3.text = Str(Num3) End Sub Selanjutnya isikan code utk Sub Minus_Click dan seterusnya seperti diatas dan sesuaikan rumus kurang kali dan bagi masing2 button. Aplikasi diatas kalau dirun/start maka akan kelihatan bahwa hasilnya selalu bilangan bulat. Agar bisa menampilkan bilangan pecahan maka variables Num1, Num2 dan Num3 bisa diset sebagai Single atau Double jika perlu high precision: Dim Num1, Num2, Num3 As Single Nah jika contoh pertama sudah dicoba dan berjalan benar kita coba buat contoh kedua. Sebagai contoh kita yang kedua mari kita buat new project(sebelumnya close dulu WinSample1 Solution), dengan template Console Application. Kita namai ConSample1 Solution. Kali ini tidak ada Form1 melainkan Module1.vb. Karena ini dalam mode console maka tidak disediakan designer view. Cobalah masukan code berikut ke module1.vbModule Module1 Sub Main() Dim num1, num2 As Integer num1 = 3 num2 = 5 Console.Write(num1 / num2) End SubEnd ModuleNah application kita siap di build jadi ConSample1.exe(click build di Build menu). Untuk run aplikasi ini kita perlu ke dos prompt. Change directory ke tempat kita simpan ConSample1 files lalu cd ke bin. Run aplikasi dengan ketik ConSample1 dan enter. Hasilnya adalah 0.5 . Ternyata hasilnya adalah bilangan pecahan. Hasil pembagian ini oleh VB ditampung di variable double. Dari contoh kita diatas, kita lihat ada beberapa topic yang perlu kita bahas secara lebih detail dalam paragraph berikut ini. Selanjutnya jika kita membuat contoh latihan dalam windows application kita beri nama winsamp dan dalam console application kita sebut consamp. Variables Variable adalah tempat menampung isi/value di memory. Yang ditampung adalah data angka. Data angka ini bisa mewakili bentuk2 value lain misal kata maupun tanggal bahkan object. Karena Visual Basic dimaksudkan untuk mempermudah pemrograman maka kita nggak perlu telusuri bagaimana data angka bisa mewakili kata dan sebagainya. Yang perlu diketahui adalah supaya variable bisa menampung data type yang berbeda, memory untuk tiap type mempunyai ukuran memory tertentu. Misal type single butuh memory 32bits atau 4 bytes. Sedang type double butuh 64 bits.Type Variable type bisa dikelompokkan dalm bebrapa kelompok yaitu Numeric, String, Boolean, Date dan Object. Numeric data dibagi lagi atas short(int16), integer(int32), long(int64), single, double dan decimal. Integer hanya menampung angka bulat, sedang lainnya bisa pecahan. Decimal mempunya ketelitian paling tinggi tapi juga butuh memory sebesar 64bits(8bytes). String data untuk menampung data kata .Tiap string mampu menampung 2GB data huruf . Dalam VB.Net tiap huruf memerlukan 2 bytes karena memakai unicode. Lain dengan C yang memakai ASCCI yang cukup dengan 1 byte per huruf. Boolean data adalah hanya untuk menampung 2 nilai yaitu true atau false. Date data untuk menampung tanggal dan jam. Tanggal dan jam saat ini di computer tersimpan di BIOS ROM yang setiap saat bisa diaccess untuk mendapatkan tanggal dan jam saat ini. Object data adalah variable type yang bisa dipakai secara fleksible yang nanti akan bisa dilihat dari contoh pemakaian. Istilah-istilah diatas cukup membingungkan jika pertama kala baca,namun jika sudah sering membuat program maka akan terbiasa dengan istilah-istilah baru tersebut.Declaration Seperti terlihat pada WinSample1, sebelum bisa dipakai, variables perlu di-declare. Berikut adalah beberapa cara declaration yang bisa dipakai: Dim Num1, Num2, Num3 As Single Dim Value1 As Long, name As StringDeclaration bisa juga diikuti dengan assignment misalnya Dim name As String = "Achmad Sayudi" Dim count As Integer = 25000Jika kita hanya memerlukan variable 1 character, maka bisa dipakai Dim ch As Char = "a" Dim cn As Char = "das"Variable cn karena Char maka hanya d yang tertampung, a dan s tidak bisa disimpan di variable tersebut. Declare date bisa dilakukan sebagai berikut Dim myBirthday As Date = #12/30/1989# Dim date1 As Date = #6/12/2004 6:25:30 AM# Dim date2 As Date = "May 15, 1952" Dim sekarang As Date sekarang = Now()Karena variables dalam VB sebenarnya adalah object maka disediakan methode untuk beberapa pemakaian. Misalnya DateInterval.Day yang bisa dipakai dalam DateDiff function: Dim days As Long days = DateDiff(DateInterval.Day,myBirthday,Now())Cobalah di ConSample1 sebagai berikutModule Module1 Sub Main() Dim num1, num2 As Integer num1 = 3 num2 = 5 Console.WriteLine(num1 / num2) Dim myBirthday As Date = #12/30/1989# Dim days As Long days = DateDiff(DateInterval.Day, myBirthday, Now()) Console.Write(days) End SubEnd ModuleJika dirun hasil baris kedua adalah selisih hari antara hari ini dan myBirtday. Agar lebih interactive bisa juga ditulis Console.WriteLine("Jumlah hari sejak lahir : " & days) Variables bisa dimanipulasi dengan operator umum seperti +, & .Misalnya Dim num1, num2 As Integer Dim Num3 As Double, X As Stringnum1 =10X ="2003"Console.WriteLine(num1 + X)menghasilkan 2013dan Console.WriteLine(num1 & X)menghasilkan 102003Perlu diketahui bahwa Console.Write bisa mengenali type data dan menampilkan dengan tepat. Hal ini bisa karena methode-nya menggunakan tehnik overloading.Type conversion Pada Windows Application yang kebanyakan memakai controls. Dalam menampilkan data yang kebanyakan text, maka perlu ada conversion. Misalkan integer , untuk ditampilkan misalnya di Label1.text maka perlu di convers jadi string dengan Label1.text = Str (num)Sebaliknya data di Label.text jika ingin diambil nilai integernya menjadi num = Val (Label1.text)Karena sering terjadi type conversion dalam program maka VB menyediakan conversion lengkap untuk semua type yang ada yaitu CBool, CInt16, CInt32 , CStr dst.Misal Dim year As String = "1980" Dim num1 As Integermaka num1 = CInt32(year)akan mendapatkan angka 1980 dalam type integer 32 bits. Maka perlu diperhatikan jika data yang diconversi awalnya menempati memory 32 bits diconversi menjadi data memory 16 bits maka ada kemungkinan akan ada pembulatan jika itu pecahan. Jika didalam program kita ingin mengetahui type suatu variable bisa dengan num.GetType() maka hasilnya adalah IntegerIf num3.GetType Is GetType(System.Double)adalah mengecheck apakah num3 benar type double.Selain GetType() disediakan juga GetTypeCode dimana hasilnya dalam code numeric (int16)jika num adalah int16 makanum = num3.GetTypeCode() menghasilkan num = 14(jika num3 type double)Untuk melihat code numeric ini cobalah tampilkan dengan Console.Write(var.GetTypeCode()) dengan mendeclare var untuk berbagai type variable .Variables Lifetime dan Scope Seperti dalam C ,scope dari variables ini tergantung dimana variable ini di-declare. Jika di-declare diluar sub-routine tapi didalam Form1 module misalnya maka variable ini berlaku di seluruh module Form1. Jika di-declare didalam salah satu sub-routine maka scope variable ini hanya berlaku di dalam sub-routine tersebut. Jika ingin berlaku diseluruh bagian dari project, maka declare di suatu module dan beri prefix Public. Sebaliknya jika menginginkan suatu variable tidak bisa diaccess di luar module maka pakai prefix Private. Lifetime berkaitan juga seperti diatas, jika suatu variable dideclare lokal untuk suatu sub-routine maka variable tersebut hanya mempunyai lifetime selama program sedang process sub-routine.Begitu selesai sampai end sub maka memory tempat menampung data variable tersebutkan se-olah2 hilang. Hal ini karena tempat/alamat dari memory tersebut tidak diingat/disimpan lagi. Namun jika data variable ini ingin lifetimenya tidak habis bisa juga memakai prefix Static. Hanya perlu diingat bahwa memory static jangan sampai datanya tertulis oleh suatu sub-routine yang tidak sengaja memakai nama variable ini. Dalam hal ini program berjalan tanpa error tapi hasilnya bisa tidak sesuai dengan yang diinginkan. Constant Selain variable type memory VB mengenal juga Constant. Dalam program sering kita mempunyai data yang harus tetap maka kita declare sebagai constant. Cara declare sebagai berikut : Const size1 As Int16 = 2000maka size1 mempunyai nilai tetap sebesar 2000 Const pi As Double = 3.14159265358979 Const theCode = "s234k332~"jika diinginkan constant ini berlaku public Public Const theCode = "s999h765<>" Array Dalam menangani data yang banyak kita perlu mengelompokan data. Misalnya data murid disekolah atau data anggota suatu club. Array yang sederhana misal Dim name(20) As String Maka ada 20 variable string yaitu name(0) sampai name(19). Kita bisa memberikan nilai name(2)= "premium", name(3) = "optimal" dsb. Untuk kelompok yang lebih banyak bisa dipakai structure misal :Structure member Dim name As String Dim ID As String Dim fee As SingleEnd Structuremaka kelompok data ini bisa dibentuk dengan Dim student(40) As memberakan tercipta 40 student data dengan masing2 3 sub-data. student(12).fee = 65000.00menyatakan fee student ke 13 adalah sebesar 65000.00 Array bisa di-initialised dengan nilai awal misalDim Hari() As String = ["Minggu","Senin","Selasa" ....] Methode Karena variable kita adalah object maka tersedia methode dalam VB yang bermanfaat dalam program. Contoh pemakaian methode seperti GetType() sudah diberikan sebelum ini. Berikut contoh yang sering kita perlukan yaitu format. Data yang ingin ditampilkan dimonitor/printer sering berupa text/string. Misalnya nilai uang Dim payment As Single = 7563.25 Dim text As String text = payment.ToString("C")disini variable payment memiliki methode ToString(format), dimana "C" adalah format Currency.Agar lebih jelas kita open WinSample1 , lalu tambahkan satu textbox beri nama price, text = 0 dan text align = right. Dan 1 button dan beri name misal CheckPrice. Lalu tuliskan code seperti dibawah ini setelah double_click button CheckPrice . Private Sub CheckPrice_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckPrice.Click Dim payment As Single = 7563.25 Dim text As String text = payment.ToString("C") price.Text = text End SubCobalah ganti "C" dengan "Rp ###,###,###.##" Selain C formatter lain adalah N(number),G(general,F(fixed-point),E(scientific) dan X(hex number).Selain format string juga ada format date (untuk detail bisa lihat format function dates di help). Contoh pemakaian format date,Dim myBirthday As Date = #12/30/1989#Console.WriteLine(myBirthday.ToString("D")) Conditional Branching Kesamaan lain dengan bahasa program seperti C adalah VB mempunyai lengkap pengaturan test condition dan percabangan juga. Test condition yang disediakan adalah If .. Then.. If .. Then.. ElseIf Select CaseSedang percabangannya For .. Next Do.. Loop While .. Contoh berikut ini bisa memberikan gambaran pemakaian :Misalkan result adalah hasil ujian Dim text As String text = "failed" If result > 80 Then text = "excellent" ElseIf result > 65 Then text = "good" ElseIf result > 55 Then text = "passed" End If Cobalah test code diatas di winapplication sebagai latihan. Buatlah 2 buah textbox dan 1 button. textbox yang satu untuk mengisi result dan satunya untuk menampilkan text dengan click button. Jika mengalami kesulitan dan mau contoh lihat WinSample12.sln .Misalkan result = 80 maka if yang pertama tidak terpenuhi maka dicari ke elseif berikut, ternyata memenuhi maka text dari failed menjadi good. Elseif yang ketiga tidak dicheck karena code kita langsung ke End If. Contoh penggunaan select case Dim text As String Select Case Now.DayOfWeek Case DayOfWeek.Sunday text = "Ini hari libur." Case DayOfWeek.Wednesday text = "Rabu . Ini hari kerja." End Select Label2.Text = "Hari ini hari " & textCode lengkap ada di WinSample12.sln . Untuk hari2 lain, silahkan lengkapi sendiri sample diatas. Dalam case bisa dipakai test > atau >= , <>, <, < i =" 5" i="5," string =" {" i =" 0" i=" 0" i =" 4)"> 1) maka yang berlaku adalah i==2 dan 3 If (i < 2) or (i = 3) artinya jika i=0, i=1, dan i =3contoh :i = 0 Do Until (i = 4) If (i = 2) Or (i = 3) Then Console.Write("# ") Console.WriteLine(destination(i)) i += 1 LoopKelihatan If nggak perlu diberi End If karena loop sudah mewakili.While .. bisa dipasangi dengan End While i = 0 While (i<4) Console.WriteLine(destination(i)) i += 1 End WhileGabungan dari loop dan condition-test bisa menciptakan nested loop , sehingga macam2 condition yang diinginkan bisa dibuatkan code-nya. Selain itu jika suatu condisi terjadi dan kita ingin loop berhenti, maka bisa dipakai Exit. Exit Function, Exit For, Exit While dan Exit Do bisa dipakai sesuai dengan loop yang ada. Procedure Yang dimaksud dengan procedure adalah potongan code yang mengerjakan sesuatu yang bisa sering dipakai oleh beberapa bagian dari program. Misalnya kita bisa membuat procedur untuk menghitung selisih hari antara 2 tanggal. Sehingga jika diperlukan kita tinggal memanggil/call dari dalam program dan bisa dipakai berulang-ulang. Bahkan kita bisa copykan procedur ini ke module lain/ project lain jika diperlukan. Dalam VB procedure ini bisa merupakan sub-routine atau function. Kita sudah beberapa kali membuat sub-routine yang dibuat otomatis jika kita double-click suatu button atau box. Perbedaannya dengan function adalah, function bisa diharapkan mempunyai return. Artinya jika dipanggil function menghasilkan suatu nilai bisa string, numeric atau lainnya tergantung code di function yang kita buat. Sub-routine Pemakaian sub-routine adalah dengan syntax sub nama_routine(arg,arg)dan diakhiri end sub. Arg artinya argument/parameter dalam C adalah nilai/value yang ingin kita process melalui routine ini. Misal jika kita ingin routine ini menampilkan isi suatu silinder, maka arg1 adalah radius dan arg2 adalah tinggi. Sub Syl__Volume(ByVal R As Double, ByVal H As Double) Dim Vol As Double Vol = 3.14159 * R * R * H Console.Write(Vol) End SubRoutine diatas bisa dipaste ke atasnya sub main(), jika ingin memanggilnya cukup ketikkan di dalam sub main () dimana rad dan height adalah numeric sebaiknya single atau double variable. Syl_Volume(rad,height)ByVal pada argument artinya variable ini adalah copy sehingga rad dan height tidak bisa berubah nilainya, tapi R dan H bisa berubah kalau mau(dan perlu diingat begitu call selesai R dan H hilang dari memory). Function Pada function kita bisa mendapat return. Sehingga contoh diatas bisa dibuat demikian Function Syl_Volume(ByVal R As Double, ByVal H As Double) As Double Return(3.14159 * R * R * H) End FunctionJika ingin ditampilkan tinggal Dim vol As Double vol = Syl_Volume(4.2 , 5 ) Console.Write ( vol)4.2 adalah radius dan 5 adalah height. Sedangkan As Double dibelakang kurung menandakan function ini ada return berupa type double. Jika diinginkan type lain misalnya single tinggal ganti double dengan single. Return dari function bisa satu nilai, jika diinginkan lebih dari 1 parameter yang bisa dikembalikan oleh function ada tehnik lain yang akan dibahas berikut ini.Sebetulnya pemakaian routine dan function ini sudah sering dalam VB. Dalam pemrograman visual studio ini disediakan routine dan function built_in yang sangat lengkap. Karena routine adalah termasuk function maka selanjutnya kita pakai sebutan function saja, kecuali yang dimaksud adalah sub_routine VB secara khusus. Jadi pelajaran mengenai function ini juga membantu kita memahami bagaimana memakai function yang built_in. Passing Arguments Jika kita lihat kembali function kita diatas nampak bahwa argument R dan H ada kata ByVal, ini dimaksudkan yang diberikan ke function adalah value. Maksudnya adalah jika diandaikan argument itu adalah kotak penyimpan(ingat bahwa argument adalah data dan data memerlukan tempat/bisa memory atau sejenisnya) .Jadi byval bisa diartikan copy dari data yang diberikan, dan ini secara default diisi oleh wizard. Jika diinginkan lain, maka bisa dipakai byref. ByRef ini memberikan data asli tanpa dicopy dulu, sehingga data tersebut jika dirubah didalam function, maka data tersebut ikut berubah setelah function selesai dipanggil. Kita coba test dengan contoh program consamp13 . Module Module1 Function Testval(ByVal A As Integer, ByVal B As Integer) As Integer A += 3 B += 5 Return (A * B) End Function Function Testref(ByRef A As Integer, ByRef B As Integer) As Integer A += 3 B += 5 Return (A * B) End Function Sub Main() Dim Num1, Num2, Num3 As Integer Num1 = 7 Num2 = 5 Num3 = Testval(Num1, Num2) Console.WriteLine("Num1 = " & Num1 & " Num2 = " & Num2 & " Num3 = " & Num3) Num1 = 7 Num2 = 5 Num3 = Testref(Num1, Num2) Console.WriteLine("Num1 = " & Num1 & " Num2 = " & Num2 & " Num3 = " & Num3) End SubEnd Module Jika code diatas dibuild kemudian di run di Dos prompt , tampak bahwa setelah function kita call , untuk passing ByVal nilai argument Num1 dan Num2 tidak berubah, sedangkan jika dipanggil dengan ByRef,variables berubah setelah function di-call. Perlu diketahui bahwa pemakaian ByVal atau ByRef adalah sesuai kebutuhan, dalam 1 function bisa ber-macam2 combination diijinkan. Dengan tehnik passing ByRef kita bisa memprocess beberapa argument sekaligus untuk mendapatkan beberapa return berupa nilai argument yang telah kita process tersebut. Procedure bukan hanya bisa process variables sebagai arguments tapi juga object(misalnya Button1.Text ). Argument object ini diperlakukan sebagai argument ByRef sekalipun ditulis dengan ByVal ! Event Handler. Dalam windows, kita selalu berhubungan dengan event misal button_click. Untuk mengatur event ini disebut event_handler kita memakai sub routine karena nggak memerlukan return. Dan yang sering kita process adalah sender sebagai object dan e sebagai action seperti berikutPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click End Sub Dalam visual programming, potongan code diatas otomatis dibuat jika kita double_click Button1 ! Events yang sering kita temui misalnya mouse event. Code berikut ini adalah contoh code untuk event MouseUp dan MouseDown.Private Sub Button1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown Label1.Text = "Button click at " & e.X & "' " & e.YEnd SubPrivate Sub Button1_MouseUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseUp Label2.Text = "Button release at " & e.X & "' " & e.YEnd SubSelain mouse bisa juga kita program untuk event KeyDown atau KeyUpPrivate Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown End Sub Named ArgumentsArgument umumnya diisikan dengan urutan seperti ditulis di procedure. Namun jika diinginkan bisa juga dengan nama argument tanpa perlu sesuai urutannya seperti berikutPrivate Sub Client(ByVal Name As String, ByVal Telp As String TextBox1.Text = Name TextBox2.Text = TelpEnd SubKita bisa call procedure Client dengan Client(Telp:="021-4532345", Name:="Martha K.") Unknown number of ArgumentsJumlah argument yang ingin di pass melalui procedure bisa tidak tentu jumlahnya. Hal ini bisa dilakukan dengan paramarray seperti code berikutSub AddName(ByVal ParamArray NameArray() As Object) Dim x As Object For Each x In NameArray ListBox1.Items.Add(x) Next xEnd Sub Call sub diatas dilakukan misalnyaAddName ( "Jakarta", "Bandung", Semarang", "Surabaya")Demikianlah hal-hal yang penting mengenai procedure mengakhiri tulisan ini di bab1 .