PAKET TOUR HO CHI MINH CITY – CU CHI 3 HARI 2 MALAM

PAKET TOUR

HO CHI MINH CITY – CU CHI

3 HARI 2 MALAM

Hari ke – 1

Setelah tiba di bandara Internasional Tan Son Nhat, wakil dari kami akan menjemput dan antar anda mengunjungi kota Ho Chi Minh yang juga bernamaSaigon. Di kota Ho Chi Minh kita akan mampir ke Istana Reunifikasi, Gereja Notre Dame, Kantor Pos lama, pabrik laquerware dan museum perang.

Makan malam akan disajikan di restoran lokal.

Bermalam di kota Ho Chi Minh.

Hari Ke – 2

Setelah makan pagi di Hotel, kita akan menuju terowongan Cu Chi. Disini kita akan mendapat kesempatan untuk melihat pembuatan rice paper and menjelajahi terowongan yang sangat menarik yang digunakan dalam perang gerilya.

Makan siang di Restoran Ben Nay yang terletak di pinggiran sungai. Kembali ke kota Ho Chi Minh dan kita jalan-jalan di kota, mengunjungi pasar Ben Thanh dan Pagoda Thien Hau di Pecinaan.

Menikmati makan malam di kapal Saigon Cruise. Bermalam di kota Ho Chi Minh.

Hari Ke – 3

Setelah sarapan pagi, waktu bebas lalu antar anda ke Bandara kembali ke tanah air.

Paket wisata termasuk :

-       Hotel dengan kamar Twin/ Tripple dan sarapan pagi

-       Bis ber-ac selama perjalanan

-       Makanan sesuai dengan yang tertera

-       Pemandu wisata berbahasa Indonesia

-       Air putih selama tour ( 2 botol / hari )

-       Tiket masuk ke semua tempat wisata dan perjalan dengan perahu

Paket wisata tidak termasuk :

Tips, pembelian barang pribadi, dan lain-lain yang tidak tertera diatas.

15 Tempat Menarik di Cina Yang Bukan Tembok Besar

Danau gletser, hutan di pegunungan, pantai berpasir dan banyak lagi. Inilah daftar tujuan-tujuan dramatis yang mungkin belum pernah Anda pertimbangkan saat membayangkan Cina.
Ada lebih banyak tujuan di Cina dari sekadar Shanghai Expo, makanan murah, dan tembok besar. Pesan tiket kereta dan tiket pesawat, lalu lihatlah beberapa atraksi Cina ini.

1. Karakul Lake, Xinjiang

Karakul adalah danau gletser dengan ketinggian 3600 mdpl, tersembunyi di antara Pegunungan Pamir, dan terlihat seperti berada di pinggir dunia. Terletak di sepanjang jalan tol Karakorum dan sepelemparan batu dari perbatasan Tajikistan, Karakul adalah tempat banyaknya unta, yak, penggembala Kyrgyz dan...hanya itu. Berjalan di sekitar danau (Karakul berarti danau hitam dalam bahasa Kyrgyz) membutuhkan waktu sekitar 3 jam dan menawarkan pemandangan spektakuler akan Gunung Muztagh Ata dengan ketinggian 7500 meter.

Banyak pengunjung yang memilih menginap di yurt milik penduduk setempat. Dengan harga $10 per malam, Anda bisa makan nasi, sayur, daging yak dan tidur di ruang tidur yang hangat dari tungku api kecil. Berpakaianlah yang hangat.

2. Menara Tibet di Sichuan Barat

Menara-menara misterius ini mewarnai Koridor Suku di Provinsi Sichuan Barat. Ratusan menara masih berdiri -- beberapa mencapai ketinggian 50 meter dan menunjuk ke 13 titik -- dan yang tertua diperkirakan berusia 1200 tahun.

Tidak ada yang tahu kenapa menara-menara ini berdiri dan apa kegunaannya, tapi beberapa orang mengatakan bahwa menara ini adalah bagian dari struktur pertahanan untuk mengamati bukit-bukit di sekelilingnya. Yang lain memprediksi bahwa menara-menara ini adalah simbol status atau rumah penyimpanan, atau keduanya. Meski begitu, menara misterius Himalaya ini adalah salah satu rahasia Cina.

3. Sungai besar di Cina

Cina memiliki beberapa sungai terbesar di Asia -- Sungai Kuning, Yangtze, dan Mekong -- dan bagi banyak penduduk, proyek dam raksasa negara ini adalah sebuah tragedi. Tapi Cina masih memiliki beberapa jalur sungai yang terpelihara dan bisa memperlihatkan sisi Cina yang jarang tampil ke permukaan.

Ekspedisi Sungai Perjalanan Terakhir, dikelola oleh pemuda Amerika yang berusaha melestarikan warisan budaya sungai Cina, bisa menjadi titik awal. Perusahaan ini menawarkan tur-tur ke sungai-sungai di Barat Cina -- termasuk Tibet, Qinghai dan Yunnan -- yang mengombinasikan pariwisata dengan tujuan sosial dan lingkungan.

4. Danau Surga, Tempat Loch Ness Cina

Sejak awal abad lalu, Monster Danau Surga sudah beberapa kali 'muncul'. Pada 2003, sekelompok tentara mengaku melihat hewan berwarna hijau dan hitam dengan sisik di punggungnya dan tanduk di kepalanya. Pada 2007, seorang kamerawan TV mengambil gambar dan foto tiga pasang mahluk bersirip, berbentuk seperti anjing laut, dan berenang secepat kapal yacht.

Ada atau tidak ada monster, Danau Surga adalah sebuah keajaiban. Danau vulkanik di Provinsi Jilin ini dianggap sebagai tanah suci pada Dinasti Qing. Dari puncaknya, Anda bisa melihat sekilas Korea Utara di seberang perbatasan.

5. Jalan Burma, Yunnan

Jalan Burma pernah menghubungkan Mandalay sampai Kunming dan menjadi lokasi pertempuran berdarah pada Perang Dunia 2. Pada teritori Cina, jalan ini berawal di Riuli dan dikenal sebagai titik penghubung Segitiga Emas, dan kini populer sebagai pasar giok. Anda akan melewati bukit berpemandangan indah dan sawah bertingkat dalam perjalanan menuju Tongsheng, tempat terdapatnya Museum Perang AntiJepang Yunnan-Burma.

Sebelum menuju Dali, sisakan beberapa hari untuk berjalan melewati desa-desa tradisional di sepanjang bagian selatan Sungai Nu. Setibanya di Dali, bersantailah di salah satu kafe yang tersebar di Kota Tua sebelum sampai ke Kunming, Ibu Kota Yunnan dan salah satu kota paling keren di Cina.

6. Afrika Kecil, Guangzhou

Tersembunyi di salah satu pusat Kota Tua Guangzhou adalah sudut paling menarik di Cina yang tidak Anda ketahui: komunitas yang terdiri dari sekitar 20 ribu pedagang asal Nigeria, Senegal, Ghana, dan negara-negara lain di Afrika.

Terletak dekat Pusat Jual Beli Grosir Ekspor Pakaian Kanaan, Afrika Kecil atau Kota Cokelat -- seperti yang sering disebut oleh penduduk lokal meski terdengar agak rasis -- muncul pada 1990an. Ini adalah masa ketika para pedagang berbondong-bondong datang ke Provinsi Cina selatan yang diberi julukan 'pabrik dunia'. Kelompok sosial dan komunitas keagamaan berkembang pesat dan banyak pedagang yang akan bersedia bercerita pada Anda tentang kisah hidup mereka -- yang baik dan buruk -- di Guangzhou.

7. Telanjang di Bukit Moganshan

Pada awal abad lalu, orang-orang kaya asing yang tinggal di Shanghai datang ke Moganshan untuk bersantai saat musim panas di vila mereka, bermain tenis, dan berenang di kolam umum. Kini Moganshan kembali terkenal, sebagian karena Naked Retreats, sekumpulan rumah-rumah tradisional yang direnovasi. (Jangan tertipu dengan namanya -- jika Anda ingin telanjang, maka itu harus dilakukan di bungalow Anda saja)

Setelah datang, para tamu dibawa melewati 'jalan santai' dan disarankan untuk menghabiskan beberapa menit mengagumi pemandangan. Aktivitas yang tersedia termasuk bersepeda, memancing, dan hiking. Pengunjung bisa berjalan melewati perkebunan teh dan hutan bambu, atau berenang di penampungan air sambil mendengar bunyi serangga. Akomodasi yang disediakan cukup sederhana -- lantai kayunya berderak dan tidak ada pendingin ruangan -- tapi bungalow dilengkapi dengan dapur, TV layar datar dan internet nirkabel.

8. Pulau Gulangyu

Setiap turis ke Cina selalu punya cerita soal mobil -- atau beberapa -- dan jarang yang positif. Gulangyu, sebuah pulau lepas pantai Xiamen, bisa jadi satu-satunya tempat tenang yang tersisa di Cina yang terobsesi dengan mobil. 

Gulangyu, tempat tinggal sekitar 16 ribu orang pada satu kilometer persegi tanah, terkenal karena tidak memiliki kendaraan bermotor (dengan beberapa perkecualian). Sepeda pun tidak ada. Tidak ada klakson, macet, pengalaman hampir kecelakaan. Bisakah tempat ini disebut Cina? Pulau berbukit ini seolah setengah Havana, setengah Hawaii -- mimpi indah pejalan kaki.

KASUS PENDERITA ANENCHEPALY

Diambil dari sebuah Bloger

http://cahdinar-cahdinar.blogspot.com/2011/02/ketika-mitos-dan-adat-menjadi-panduan.html

Kami Mengalami Kasus Anenchepaly

Ini adalah anakku yang pertama.amanh Allah berjenis kelamin perempuan.Namun Allah mengambil kembali ke pangkuannya, karena ketidak sempurnaan bentuk. Dia telah meninggalkan kita di usia 6 bulan.

Cerita Singkat

1. Pada usia kandungan 4 bulan,istriku USG di salah satuu dokter spesialis dan belum diketahui ada gangguan pda kehamilan karena masih terlalu kecil
2. Pemeriksaan oleh bidan secara rutin 4 minggu sekali juga sehat dan vitamin tetap dikonsumsi
3. Saat USG pada usia 6 bulan (rencana untuk mengajukan cuti),oleh dokter praktek spesialis kandungan didiagnosa mengalami Anenchepaly. Tapi dokter ini belum yakin,maka dibuat surat rujukan ke dokter spesialis khusus di Rumah Sakit besar di Kota Semarang. Di sana diketahui memang ada gangguan Ananchepaly (tulang kepala tak terbentuk) karena ketidaksempurnaan kromosom, belum diketahui dari istri atau suami. Yang jelas jika lahir pasti cacat dan tidak bertahan lama. Oleh dokter rumah sakit disarankan diambil tindakan partus spontan (dipacu dengan obat), karena ini satu-satunya jalan, karena dilahirkan pada usia 9 bulanpun pasti kondisi sama. Karena kasihan pada bayi kami, maka diambil tindakan ini

1. Hari pertama masuk IGD dan diberi obat pemacu pervaginam

2. Hari kedua masih belum ada tanda-tanda, hanya kontraksi ringan

3. Hari ketiga,terjadi kontraksi hebat mulai dari malam dan paginyaa pecah ketuban. Maka lahirlah anak kami walau Allah mengambilnya kembali. Saat itu juga kami bersedih,aku, istri, keluarga besar kami ikut bersedih karena kehilangan anak dan cucu pertama

Pada kasus ini penyebabnya adalah ketidaksempurnaan kromosom bersatu dalam rahim. Bagaimana kejadiannya? Allah yang Maha Tahu....

7 Keajaiban Dunia Versi Terbaru

Dari 77 situs bersejarah di pilih 22 finalis yang berhak di pilih masyarakat dunia. dan akhirnya, walaupun mendapat kritikan dari UNESCO. terpilihlah 7 keajaiban baru.Ini nih ketujuh keajaiban dunia versi terbaru,hehe.. Cuman sayanganya Pulau Komodo tidak masuk kedalam salah satu keajaiban dunia versi terbaru ini.
1. Petra, Yordania (Tahun 9 SM – 40 M)

Kota ini berada di gurun pasir Yordania, di bangun pada masa raja Aretas IV. Kota ini terkenal karena strukturnya yang terbentuk dari lembah batu yang di pahat. Awalnya kota ini di bangun untuk persembahan bagi Obodas I dan berkembang menjadi tempat perdagangan. Di tempat ini juga terdapat teater terbuka yang dapat menampung 4.000 orang.
2. Tembok Raksasa Cina ( Abad ke-7 Masehi)

Tembok yang di bangun unruk pertahanan dinasti cina dari serangan mongol ini memiliki panjang sejauh 6.695 KM. Ribuan penduduk harus merelakan nyawanya untuk membangun tembok ini dan konon, Tembok Raksasa ini bisa terlihat dari Luar Angkasa.
3. Kristus Penebus : Brazil (1931 Masehi)

Patung Yesus Kristus ini menjulang setinggi 38 Meter di puncak pegunungan Corcovado dan menghadap ke kota Rio De Janeiro. Dengan wujudnya yang besar ini seolah yesus menghangatkan penduduk kota.
4. Taj Mahal, India (Tahun 1630 Masehi)

Taj Mahal adalah makam mumtaz mahal, permaisuri raja Mughal Shah Jehan yang meninggal di usia muda. Bangunan megah berasitektur Islam ini diarsiteki oleh Isa Khan, di buat dari marmer putih dan dikelilingi taman yang cantik. Konon, Taj Mahal adalah satu-satunya bangunan yang dapat di lihat oleh raja Shah Jehan dari dalam sel, ketika di tawan oleh anaknya sendiri.
5. Machu Picchu, Peru (Sekitar Tahun 1460 Masehi)

Machu Picchu ( yang artinya gunung tua) adalah kota suci milik kerajaan inca yang di bangun di puncak bukit pada gugusan pegunungan Andes. Di kota yang di bangun sangat rapi ini, terdapat bangunan istana, kuil-kuil yang dipersembahkan untuk dewa-dewi inca, dan bangunan pendukung lainya.
6. Colosseum, Italia (Sekitar Tahun 70 Masehi)

Di masa kejayaan kekaisaran romawi, aphiteater ini digunakan untuk menyaksikan pertarungan gladiator dan acara-acara lainya. Coloseum adalah bangunan yang besar dengan tinggi mencapai 48 Meter, Panjang 189 Meter, dan Lebar 156 Meter.
7. Piramida Chichen Itza, Meksiko (Tahun 800 Masehi)

Berada di semenanjung Yucatan Meksiko, komplek piramid Chichen Itza, adalah salah satu bangunan berarsitektur megah yang tersisa di pusat pemerintahan suku maya. Bangunan ini dulu digunakan sebagai tempat untuk mewadahi kegiatan politik dan ekonomi.

Modifikasi Tubuh Manusia Paling Ektrim di Dunia

10 Modifikasi Tubuh Manusia Paling Extreme

Inilah modifikasi tubuh yang paling extreme yang pernah dilakukan manusia. Maaf kalau ada beberapa gambar yang mengerikan untuk dilihat.
10. Branding

Branding adalah proses untuk memberi simbol, hiasan atau tanda atau bahkan pola ke tubuh manusia, dan itu dilakukan dengan harus membakarnya langsung ke kulit. Hasil itu akan menjadi tanda permanen pada kulit. Branding dilakukan dengan besi yang sangat panas. (Mungkin setrika dirumah juga bisa kali ya dipakai buat branding)

9.Subdermal Implan

Implan subdermal pada tubuh adalah semacam perhiasan yang diletakkan di bawah kulit, sehingga memungkinkan tubuh untuk menyembulkan implan dan menciptakan desain diatas kulit. Implan jenis ini berada di bawah kategori modifikasi tubuh. Banyak orang yang memiliki implan ini menggunakannya bersama-sama dengan jenis lain untuk menciptakan modifikasi tubuh yang dikehendaki, dan menimbulkan efek dramatis. Proses ini juga dikenal sebagai 3-D implan.

8. Earlove Stretching

Kebanyakan orang hanya dapat meregangkan daun telinga mereka 0,25 inci

7. Tongue Splitting

Apakah itu seni? Seni untuk memotong lidah menjadi dua bagian? Anda akan terlihat seperti memiliki lidah ular. Metode ini benar-benar sulit untuk dilakukan. Dan saat melakukan itu sakit sekali.

6. Tooth Filing

Tooth Filing adalah sebuah metode untuk mengubah bentuk gigi menjadi bentuk lain yang Anda inginkan .. (mirip ritual potong gigi di Bali ya)

5. Ightlacing

Nama lainnya adalah pelatihan Corset Pinggang, mereka menggunakan korset yang sangat ketat untuk membuat bentuk tubuh yang sangat unik.

4. Anal stretching

Ini merupakan modifikasi tubuh benar-benar aneh. Mereka menggunakan teknik ini dengan bantuan sebuah alat untuk memberikan kenikmatan seksual yang lain. (???)

3. Skin-Cut Tattoo

Ini adalah seni tato yang dibuat dengan memotong kulit Anda. Anda akan mendapatkan tanda tato merah. Ini benar-benar Xtreme..!

2. Extraocular Implant

Anda dapat menganggapnya sebagai ide gila. Ini adalah pembedahan di mana Anda memotong lapisan permukaan mata anda tetap terbuka untuk meletakkan perhiasan kecil masuk. (ada yang berminat?)

1. Corneal Tatooing

Ini adalah seni tato di mata Anda sendiri. Teknik ini biasanya digunakan untuk bedah kosmetik untuk orang buta. Proses dapat dilakukan dengan jarum suntik yang biasa, buka saja lebar mata Anda dan ketika itu pigmen warna disuntikkan ke mata Anda. (wah, bisa buat mata saringgan dong?)

Bonus:

Pierced Glasses

Lihat ini . Kacamata ini tertusuk langsung ke hidung, James Sooy dan Oliver Gibson adalah orang pertama yang menggunakan teknik aneh ini. (kalo behini, kacamatanya gak mungkin jatuh ya)

Penis Splitting.

Saya tidak mengerti mengapa mereka mencoba untuk memodifikasi penis mereka?? (kalo kencing nanti mau lewat mana?)

Program Kalkulator Sederhana

1.    PADA LABEL KALKULATOR

Private Sub Label3_Click()

Label3.BackColor = purple

End Sub

Private Sub Timer1_Timer()

Label2.BackColor = RGB((Rnd * 255), Int(Rnd * 255), Int(Rnd * 255))

End Sub

Private Sub Timer2_Timer()

Label3.Left = Val(Label3.Left) - 20

If Val(Label3.Left) < -7000 Then Label3.Left = 70

End Sub

Private Sub txtDisplay_Change()

txtDisplay.SelStart = Len(txtDisplay.Text)

End Sub

Private Sub txtDisplay_GotFocus()

txtDisplay_Change

End Sub

2.    PADA TOMBOL ANGKA

Private Hasil As Double

Private Const opNol = 0

Private Const opTambah = 1

Private Const opKurang = 2

Private Const opKali = 3

Private Const opBagi = 4

Private Operator As Integer

Private NilaiBaru As Boolean

Private Sub Hapus()

Dim txt As String

Dim min_len As Integer

txt = txtDisplay.Text

If Left$(txt, 1) = "-" Then

min_len = 2

Else

min_len = 1

End If

If Len(txt) > min_len Then

txtDisplay.Text = Left$(txt, Len(txt) - 1)

Else

txtDisplay.Text = "0?"

End If

End Sub

Private Sub cmdAngka_Click(Index As Integer)

If NilaiBaru Then

txtDisplay.Text = Format$(Index)

NilaiBaru = False

Else

txtDisplay.Text = _

txtDisplay.Text & Format$(Index)

End If

End Sub

Private Sub cmdClear_Click()

cmdClearEntry_Click

Hasil = 0

Operator = opNol

End Sub

Private Sub cmdClearEntry_Click()

txtDisplay.Text = ""

End Sub

Private Sub cmdKoma_Click()

If InStr(txtDisplay.Text, ".") Then

Beep

Else

If NilaiBaru Then

txtDisplay.Text = "."

NilaiBaru = False

Else

txtDisplay.Text = txtDisplay.Text & "."

End If

End If

End Sub

Private Sub cmdOperator_Click(Index As Integer)

cmdSamaDengan_Click

Operator = Index

NilaiBaru = True

End Sub

Private Sub cmdPlusMinus_Click()

If NilaiBaru Then

txtDisplay.Text = "-"

ElseIf Left$(txtDisplay.Text, 1) = "-" Then

txtDisplay.Text = Right$(txtDisplay.Text, 2)

Else

txtDisplay.Text = "-" & txtDisplay.Text

End If

End Sub

Private Sub cmdSamaDengan_Click()

Dim HasilBaru As Double

If txtDisplay.Text = "" Then

HasilBaru = 0

Else

HasilBaru = CDbl(txtDisplay.Text)

End If

Select Case Operator

Case opNol

Hasil = HasilBaru

Case opTambah

Hasil = Hasil + HasilBaru

Case opKurang

Hasil = Hasil - HasilBaru

Case opKali

Hasil = Hasil * HasilBaru

Case opBagi

If HasilBaru = 0 Then

MsgBox "Tidak bisa dibagi 0?", vbOKOnly + vbCritical, "Kalku ERROR"

Call cmdClear_Click

Else

Hasil = Hasil / HasilBaru

End If

End Select

Operator = opNol

NilaiBaru = True

txtDisplay.Text = Format$(Hasil)

End Sub

Private Sub Command1_Click()

End

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

txtDisplay_KeyPress KeyAscii

End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

txtDisplay_KeyUp KeyCode, Shift

End Sub

Private Sub Label1_Click()

End Sub

Private Sub Label3_Click()

Label3.BackColor = purple

End Sub

Private Sub Timer1_Timer()

Label2.BackColor = RGB((Rnd * 255), Int(Rnd * 255), Int(Rnd * 255))

End Sub

Private Sub Timer2_Timer()

Label3.Left = Val(Label3.Left) - 20

If Val(Label3.Left) < -7000 Then Label3.Left = 70

End Sub

Private Sub txtDisplay_Change()

txtDisplay.SelStart = Len(txtDisplay.Text)

End Sub

Private Sub txtDisplay_GotFocus()

txtDisplay_Change

End Sub

3.    UNTUK MASING _ MASING PENJUMLAHAN

Private Hasil As Double

Private Const opNol = 0

Private Const opTambah = 1

Private Const opKurang = 2

Private Const opKali = 3

Private Const opBagi = 4

Private Operator As Integer

Private NilaiBaru As Boolean

Private Sub Hapus()

Dim txt As String

Dim min_len As Integer

txt = txtDisplay.Text

If Left$(txt, 1) = "-" Then

min_len = 2

Else

min_len = 1

End If

If Len(txt) > min_len Then

txtDisplay.Text = Left$(txt, Len(txt) - 1)

Else

txtDisplay.Text = "0?"

End If

End Sub

Private Sub cmdAngka_Click(Index As Integer)

If NilaiBaru Then

txtDisplay.Text = Format$(Index)

NilaiBaru = False

Else

txtDisplay.Text = _

txtDisplay.Text & Format$(Index)

End If

End Sub

Private Sub cmdClear_Click()

cmdClearEntry_Click

Hasil = 0

Operator = opNol

End Sub

Private Sub cmdClearEntry_Click()

txtDisplay.Text = ""

End Sub

Private Sub cmdKoma_Click()

If InStr(txtDisplay.Text, ".") Then

Beep

Else

If NilaiBaru Then

txtDisplay.Text = "."

NilaiBaru = False

Else

txtDisplay.Text = txtDisplay.Text & "."

End If

End If

End Sub

Private Sub cmdOperator_Click(Index As Integer)

cmdSamaDengan_Click

Operator = Index

NilaiBaru = True

End Sub

Private Sub cmdPlusMinus_Click()

If NilaiBaru Then

txtDisplay.Text = "-"

ElseIf Left$(txtDisplay.Text, 1) = "-" Then

txtDisplay.Text = Right$(txtDisplay.Text, 2)

Else

txtDisplay.Text = "-" & txtDisplay.Text

End If

End Sub

Private Sub cmdSamaDengan_Click()

Dim HasilBaru As Double

If txtDisplay.Text = "" Then

HasilBaru = 0

Else

HasilBaru = CDbl(txtDisplay.Text)

End If

Select Case Operator

Case opNol

Hasil = HasilBaru

Case opTambah

Hasil = Hasil + HasilBaru

Case opKurang

Hasil = Hasil - HasilBaru

Case opKali

Hasil = Hasil * HasilBaru

Case opBagi

If HasilBaru = 0 Then

MsgBox "Tidak bisa dibagi 0?", vbOKOnly + vbCritical, "Kalku ERROR"

Call cmdClear_Click

Else

Hasil = Hasil / HasilBaru

End If

End Select

Operator = opNol

NilaiBaru = True

txtDisplay.Text = Format$(Hasil)

End Sub

Private Sub Command1_Click()

End

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

txtDisplay_KeyPress KeyAscii

End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

txtDisplay_KeyUp KeyCode, Shift

End Sub

Private Sub Label1_Click()

End Sub

Private Sub Label3_Click()

Label3.BackColor = purple

End Sub

Private Sub Timer1_Timer()

Label2.BackColor = RGB((Rnd * 255), Int(Rnd * 255), Int(Rnd * 255))

End Sub

Private Sub Timer2_Timer()

Label3.Left = Val(Label3.Left) - 20

If Val(Label3.Left) < -7000 Then Label3.Left = 70

End Sub

Private Sub txtDisplay_Change()

txtDisplay.SelStart = Len(txtDisplay.Text)

End Sub

Private Sub txtDisplay_GotFocus()

txtDisplay_Change

End Sub

SELAMAT MENCOBA YuAH..............

 (^_^).... yipIIIYipPiii....