Sabtu, 12 November 2011

MEMBUAT TULISAN BERJALAN DENGAN VB6


Gampang kok…
Oke langsung kita mulai.
Kita akan membuat Tulisan berjalan untuk mempercantik tampilan program yang kita buat dengan Visual Basic.
::( Logika Program.
——————————
Logika Program ini yaitu adalah meletakan huruf terakhir pada posisi pertama setiap 0.1 detik (100 milisecond). Efek yang dihasilkan adalah text berjalan dari kiri ke kanan.
Sedangkan untuk text yang berjalan dari Kanan – ke Kiri, dilakukan dengan meletakan huruf pertama pada posisi terakhir,
::( Interface.
———————————
  1. Jalankan Program Visual Basic.
  2. Pilih Standard EXE.
  3. Masukan dua buah Label beri nama Txt_satu dan Txt_dua di properties.
  4. Masukan sebuah Timer ganti Interval menjadi 100.
  5. Masukan sebuah Cammand Button bari nama cmd_Exit dan Caption EXIT.
  6. Untuk Warna atur sesuka anda di bagian Properties.

Gambar 1. Rancangan Tampilan Program.
::( Coding
—————————-
  1. Klik dua kali di Tombol EXIT lalu tuliskan kode berikut.Private Sub cmd_exit_Click()
    End
    End Sub
  2. Klik timer1 lalu tuliskan kode berikut.Private Sub Timer1_Timer()
    s$ = lbl_satu.Caption
    s$ = Right(s$, 1) & Mid$(s$, 1, Len(s$) – 1)
    lbl_satu.Caption = s$s$ = lbl_dua.Caption
    s$ = Mid$(s$, 2, Len(s$)) & Left$(s$, 1)
    lbl_dua.Caption = s$
    End Sub
Lalu jalankan dengan menekan tombol F5 di keyboard.

Gambar 2. Text berjalan.
Ini bisa anda sisipkan di program yang anda buat agar Tampilan Program lebih asik.

CONTOH TATA IBADAH PEMUDA


I.                    Panggilan Beribadah :                        
PF :              Puji dan syukur kita naikan kepada Allah yang Maha Kuasa atas segala kebaikan dan  kemurahan yang dilimpahkan kepada kita. Cinta dan Kasih Tuhan merangkul dan mengumpulkan kita dalam persekutuan saat ini, untuk itu mari kita memuji dan mengagungkan segala kebaikanNya.
JM :             Kita jalani hidup dalam sukacita, karena kita mengalami kasihNya setiap saat, kita menyatakan kebersamaan dan persekutuan, kita berkumpul dan menyembahNya, kita bersyukur atas kehidupan dan berkatNya. Ya Tuhan ! Layakkanlah kami datang menyembahMu dalam seluruh keberadaan kehidupan kami.        

Menyanyi :   Yesus memanggil mari seg’ra
Yesus memanggil mari seg’ra, ikutlah jalan s’lamat baka
Jangan sesat dengar sabdaNya, hai marilah seg’ra
Reef :
Sungguh nanti kita kan senang bebas dosa hatipun tent’ram
Bersama Yesus dalam terang dirumah yang kekal
II.                  Tahbisan dan Salam :
PF :               Allah adalah pencipta dan pemelihara, Dialah pengharapan bagi kehidupan kini
                                      Dan nanti, Yesus Kristus adalah Juruselamat dan Roh Kudus penolong yang setia
                                      Amin. Anugerah dan Damai sejahtera manaungi kita sekalian.
                                      (Jemaat duduk)

Menyanyi :   “ Kubawa Hidupku S’karang “
Kubawa hidupku s’karang ketempat kudusMu Tuhan
Di MezbahMu kuserahkan seluruh hidupku
Penuhi hatiku s’karang dengan urapan yang baru
Agar aku lebih lagi mendengar suaraMu
Reff  :
Jadikan aku Tuhan rumah doaMu agar semua suku bangsa
Datang menyembahMu
Jadikan aku Tuhan rumah doaMu agar semua suku bangsa
Datang menyembahMu
III.                Pelayanan Firman :

Menyanyi :   “ Mari Masuk 
                                Mari masuk.. Mari masuk.. masuk hatiku Ya Yesus
                                Datang s’karang datang tinggal dalam hatiku Ya Yesus
                           -   Berdoa
                           -   Pembacaan Alkitab
                           -   Renungan
IV.                Persembahan Syukur :
                PF :         Marilah kita memberi persembahan dengan mengingat firman Tuhan : Siapa yang
                                Mempersembahkan syukur sebagai korban, ia memuliakan Allah, siapa yang
                                Jujur jalannya keselamatan dari Allah akan kuperlihatkan kepadaNya.

Menyanyi :   “ Besarlah Untungku “
Besarlah untungku jika Yesus milikku
Bersuka jiwaku karna damai yang penuh
Meskipun angin kras, badai dunia menderu
Tak goyah hatiku karna Yesus milikku
Reef :
Benar, benar, besarlah untungku
Benar, benar, besarlah untungku
Benar, benar, besarlah untungku
Ketika Yesus sunggulah tetap milikku

                                Doa  Safaat
V.                  Pengutusan dan Berkat : “ Jemaat Berdiri”
                PF :         Saudara-saudara...! Yesus memanggil kita bukan hanya untuk datang kepadaNya
                                Tetapi juga pergi bagi Dia.
                JM :        Inilah kami ! Utuslah kami untuk memberitakan kuasaMu yang menyelamatkan dan
                                RencanaMu yang kekal bagi segenap umat manusia
                PF :         Pergilah dan layanilah Tuhan dengan setia, sesuai dengan karunia yang ada padamu

Menyanyi :   Kasih setiaMu yang kurasakan
                                Kasih setiaMu yang kurasakan, lebih tinggi dari langit biru
                                KebaikanMu yang tlah Kau nyatakan lebih dalam dari lautan
                                BerkatMu yang telah ku terima sempat membuat ku terpesona
                                Apa yang tak pernah ku pikirkan itu yang Kau sediakan bagiku
                                Siapakah aku ini Tuhan jadi biji mataMu, dengan apakah kubalas Tuhan
                                Slain puji dan sembah Kau (2x)

                PF :         Saudara-saudara ,,! Kembalilah dengan sejahtera dan terimalah berkat Tuhan :
                                “Semoga Allah sumber pengharapan memenuhi kamu dengan segala sukacita
                                Dan damai sejahtera dalam iman kamu, supaya oleh kekuatan Roh Kudus
                                Kamu berlimpah-limpah dalam Pengharapan.” Amin.
                JM :        A-min, A-min, a....min !                 (Jemaat duduk)

Rabu, 09 November 2011

SUBNETTING


Subnetting adalah sebuah teknik membagi alamat jaringan menjadi sub-sub yang lebih kecil. Tujuannya adalah agar jika ada paket data yang datang atau dikirimkan tidak hanya melewati sebuah jaringan saja. Analoginya adalah jika sebuah komplek perumahan yang terdiri dari 1000 rumah yang hanya di kepalai oleh seorang ketua komplek maka jika ada pak pos yang ingin mengirimkan suratnya ke alamat 712 maka harus mencari dari alamat 1 hingga ke 712. Hal ini pasti akan sangat menyulitkan dan membuat pekerjaan pak pos tersebut menjadi lambat. Maka dari itu sebaiknya komplek perumahan tersebut di bagi menjadi beberapa blok misalnya tiap 100 rumah dikepalai oleh 1 orang ketua komplek maka jika ada pak pos yang ingin mengirim surat k alamat 712 maka pak pos tersebut hanya perlu datang ke alamat yang dikepalai oleh ketua komplek yang k 7. Dengan cara ini maka tugas pak pos akan semakin mudah dan cepat.
Contoh Soal:
192.168.7.12/26
Berapakah jumlah subnet ?
Rubah dulu CIDR menjadi Desimal dan Biner
255.255.255.192
11111111.11111111.11111111.1700000
maka gunakan rumus : 2^x-2= 2 –> 2^2 – 2 = 2
X = jumlah angka 1 pada subnet setelah subnet default
Berapakah jumlah host per subnet ?
Maka gunakan rumus : 2^y – 2 –> 2^6-2 = 62
Y = jumlah angka nol setelah subnet default
Apa saja Subnet yang Valid ?
Maka gunakan rumus : 256-n –> 256 – 192 = 64
N =angka decimal untuk angka 1 setelah subnet default
Apa saja alamat broadcast setiap subnet ?
Alamat broadcast adalah alamat subnet berikutnya – 1
192.168.7.127
192.168.7.191
Apa saja alamat host valid setiap subnet?
Subnet 192.168.7.64
Ip pertama 192.168.7.65
Ip terakhir 192.168.7.126
Broadcast 192.168.7.127
Subnet 192.168.7.128
Ip pertama 192.168.7.129
Ip terakhir 192.168.7.190
Broadcast 192.168.7.191
*CIDR –> Classless Inter-Domain Routing (disingkat menjadi CIDR) adalah sebuah cara alternatif untuk mengklasifikasikan alamat-alamat IP berbeda dengan sistem klasifikasi ke dalam kelas A, kelas B, kelas C, kelas D, dan kelas E atau berapa banyak angka 1 pada subnetmask
*subnetmask default –> Adalah alamat subnet yang biasa terdapat pada masing2 kelas alamat IP
kelas A = 255.0.0.0 atau /8
kelas B = 255.255.0.0 atau /16
Kelas C =255.255.255.0 atau /24
Bicara mengenai subnetting pasti kita akan mengacu pada sebuah jaringan komputer. Biasanya subnetting digunakan untuk mengefisiensikan IP address. Hal tersebut harus dilakukan karena jumlah IP Address sangat terbatas namun jumlah host pada suatu jaringan terutama jaringan internet sangatlah banyak.
Dalam kehidupan sehari-hari yang menggunakan subnetting biasanya adalah perusahaan skala menengah hingga besar ataupun instansi pendidikan seperti universitas yang memiliki beberapa ruangan yang memiliki jaringan komputer sendiri yang lebih kecil.