Membuat Tulisan Berkedip/ menyala (Visual Basic 6.0)

 Membuat Tulisan Berkedip/ menyala (Visual Basic 6.0)

    1.Buat from yg berisikan sperti gambarr..

     Yang diperlukan :

     Label1,

     timer1 : Intervavl =500

     Berikan Source pada Timer1 : double klik pada time1

Label1.ForeColor = RGB(255 * Rnd, 255 * Rnd, 255 * Rnd)

     Kemudian coba jalakan programnya dengan menekan tombol F5 pada keyboard .

     Selesai deh, Selamat Mencoba kawan :-)

Cara Membuat Teks Berjalan Maju Mundur di Visual Basic

  Membuat Teks Berjalan Maju Mundur di Visual Basic

sebelumnya silahkan baca terlebih dahulu Tutorial sebelumnya yaitu Membuat Teks Berjalan Lurus. karena kode di dalam tutorial ini adalah kelanjutan dari Tutorial tersebut, dalam tutorial ini, kita akan membuat teks yang berjalan maju-mundur atau bolak-balik ke kanan dan ke kiri, atau bisa juga di sebut "kanan-kiri oke" hehe :D .
berikut langkah-langkahnya:

1. buat new project, standard EXE
2. masukan 1 buah Label dan 2 buah Timer, ingat!!! 2 buah Timer,, hehe.

3. ganti interval Timer1 dan Timer2 menjadi 100.
4. Masukan code programnya : double klik pada form

Private Sub Form_Load()

Timer1.Enabled = True

Timer2.Enabled = False

End Sub
Private Sub Timer1_Timer()

If Label1.Left >=  +Label1.Width Then   

Label1.Left = +Label1.Width   

Timer1.Enabled = False   

Timer2.Enabled = True 

Else   

Label1.Left = Label1.Left + 100 

End If 

End Sub
Private Sub Timer2_Timer()   

If Label1.Left <= -Label1.Width Then   

Label1.Left = -Label1.Width   

Timer2.Enabled = False   

Timer1.Enabled = True

Else   

Label1.Left = Label1.Left - 100 

End If 

End Sub

5. Jalankan Programnya !!
cara kerja kode :

·                     Timer1 bertugas mengatur Label1 berjalan ke kanan

·                     Timer2 bertugas mengatur Label1 berjalan ke kiri

·                     ketika program baru berjalan (Sub Form_load) yang aktif adalah Timer1(True) dan Timer2 tidak aktif(False)

·                     Lihat pada code "Private Sub Timer1_Timer()" . ketika tugas Timer1 sudah kelar, Timer1 akan menonaktifkan dirinya (Timer1.Enabled=False) dan Timer2 menjadi aktif (Timer2.Enabled=True).

·                     begitu juga sebaliknya yang terjadi pada "Private Sub Timer2_Timer()" sehingga kondisi ini terus terjadi berulang-ulang.

·                     ,,, begitulah kira-kira, selesai sudah. :D

Terimakasih ! Selamat Mencoba Kawan :-)

Cara Membuat Text Berjalan di Visual Basic 6.0

Cara Membuat Text Berjalan di Visual Basic 6.0

Visual Basic 6.0, pada kesempatan kali ini saya akan membahas bagaimana Cara Membuat Text Berjalan di Visual Basic 6.0. Caranya cukup mudah, kenapa saya bisa bilang bahwa cara ini cukup mudah? karena anda hanya tinggal mencopaste Source Codenya, dan menambahkan 2 object ada program Visual Basic. 

Untuk tampilan text berjalan disini adalah ketika program di jalankan maka tulisan pada object Label1 akan berjalan dari ke kiri lalu ke kanan, dan untuk menambah keindahan pada kasat mata kita, tulisan tersebut akan menjadi warna warni.

Dan untuk cara pembuatannya, silahkan anda buka aplikasi Visual Basic 6.0 dengan cara :

Klik Start- pilih All Programs - pilih Microsoft Visual Studio Basic 6.0 - lalu klik Microsoft Visual Basic 6.0, maka tampilannya seperti di bawah ini :

Lalu tambahkan Object Label1 dan Timer1, kemudian letakkan di Form1, untuk lebih jelasnya lihat gambar di bawah ini :

Selanjutnya Isi Source Code dibawah ini, anda bisa Copy lalu Pastekan Codenya di Form1, caranya klik 2 kali pada Form1 :

Private Sub Form_Load()

Label1.FontSize = 20

Label1 = "Cara Mudah Membuat Text Berjalan di Visual Basic 6.0"

End Sub

Private Sub Timer1_Timer()

Label1.ForeColor = RGB(Rnd * 250, Rnd * 250, Rnd * 250)

    If (Label1.Left + Label1.Width) <= 0 Then

        Label1.Left = Me.Width

    End If

    Label1.Left = Label1.Left - 100

End Sub

Setelah itu rubah nilai Interval di property Timer1 Menjadi 100, lalu jalankan projectnya dengan cara menekan tombol F5 di keyboard anda. atau bisa langsung klik tombol yg segitiga di atas/tombol ran

Terimakasih ! selamat mencoba kawan :-)

Macam Macam Teks Berjalan(marquee) Menggunakan kode program HTML

Macam-Macam teks berjalan atau bergerak

1.berjalan ke kiri
2.berjalan ke kiri+background
3.ke kiri langsung berhenti
4.berjalan ke kiri ke kanan
5.ke kiri+pesan
6.ke kiri lambat
7.ke kiri cepat
8.ke kiri sedang
9.berkedip
10.berjalan ke kanan 10.berjalan ke kanan yg cepat
11.kanan kiri mantul 11.kanan kiri mantul dengan cepat
12.atas bawah mantul
13.ke bawah
14. ke atas
14.berjalan ke atas
15.ke bawah
15.Hello world.!


H
E
L
L
O


H
E
L
L
O

19.kanan dan kiri hanya di tengah saja
20.teks berjalan dengan keren
<<<teks>>>
berlawanan+backgroundbaerlawanan+background
ke atas dan
ke bawah

<<< MACAM-MACAM MACAM-MACAM >>>

ke atas mantul ke samping tembuas
memantul
KALIMAT INI AKAN BERJALAN
KALIMAT INI AKAN BERJALAN

28.berjalan dalam kotak/form

v  Macam macam teks berjalan

<marquee bgcolor="red">Tulisan Disini</marquee>

maju ke kiri+background warna

Ø  direction="left/right/up/down"
untuk mengatur arah gerakan text/marquee

      <marquee direction="up">Tulisan Disini</marquee>

              berjalan Ke atas

Ø  behavior="scroll/slide/alternate"
Untuk mengatur  perilaku gerakan.

Ø  behavior="scroll"
Kode untuk membuat text bergerak berputar.

<marquee behavior="scroll">Tulisan Disini</marquee>

berjalan ke kiri

Ø  behavior="slide"
Kode untuk membuat text bergerak sekali lalu berhenti.

<marquee behavior="slide">Tulisan Disini</marquee>

berjalan ke kiri langsung berhenti

Ø  behavior="alternate" 
Kode untuk membuat text bergerak bolak-balik kekanan-kekiri.

<marquee behavior="alternate">Tulisan Disini</marquee>

berjalan ke kiri ke kanan

Ø  title="pesan"
Untuk memberi teks saat mouse berada di atas text.

<marquee title="Pesan">Tulisan Disini</marquee>

berjalan ke kiri+pesan

Ø  scrollamount="kecepatan"
untuk mengatur kecepatan text/marquee
contoh       :    scrollamount="3"

<marquee scrollamount="3">Tulisan Disini</marquee>

Berjalan ke kiri lambat

Ø  scrolldelay="jumla waktu tunda"
untuk mengatur waktu tunda gerakan dalam mili detik

Ø  contoh  : scrolldellay="2"

<marquee scrolldellay="2">Tulisan Disini</marquee>

    berjalan ke kiri cepat

Ø  loop="angka|-1|infinite" 
Mengatur jumlah loop

<marquee loop="infinite">Tulisan Disini</marquee>

berjalan ke kiri sedang

Ø  width="jumlah angka lebar"Mengatur lebar blok teks dalam pixel atau persen

<marquee width="3" >Tulisan Disini</marquee>

Berkedip kedip

Dan juga bisa diketahui, bahwa kode-kode diatas adalah kode dasar dari efek-efek dari marquee itu sendiri. Dan, bisa dikombinasikan.
Dengan Susunan :
<marquee(spasi)kode efek1(spasi)kode efek2>Tulisan Disini</marquee>

Kode efek bisa banyak sekali.
1. Jika sobat mau  kalau marquee tsb. jika di sorot mouse akan berhenti maka tinggal menambahkan
    kode dibawah ini : 
onmouseover="this.stop()" onmouseout="this.start()"

 Dengan susunan
<marquee onmouseover="this.stop()" onmouseout="this.start()">Tulisan</marquee>
Jadinya :
berjalan ke kiri biasa
2. Jika sobat mau Marquee dengan Link simak sob :
kode Dasar :
<marquee><a href="alamat Web">judul</a>

Dan jika ingin Link nya Banyak
bisa kok :
Kode Dasar  :

<marquee onmouseover="this.stop()" onmouseout="this.start()" scrollamount="2" direction="up" width="100%" height="100" align="center">

<a href="http://esbepe-sbp.blogspot.com/">cara membuat blog</a><br/>

<a href="http://esbepe-sbp.blogspot.com/2007/04/bikin-blog.html">Membuat blog </a><br/>

<a href="http://esbepe-sbp.blogspot.com/2007/08/membuka-program-periklanan.html">Pasang Iklan</a><br/>

</marquee>

<marquee onmouseover="this.stop()" onmouseout="this.start()" scrollamount="2" direction="down" width="100%" height="100" align="center">

<a href="http://esbepe-sbp.blogspot.com/2007/08/membuka-program-periklanan.html">Pasang Iklan </a>

<a href="http://esbepe-sbp.blogspot.com/2007/04/bikin-blog.html">Membuat blog </a><br/>

<a href="http://esbepe-sbp.blogspot.com/">cara membuat blog</a><br/>

</marquee>

Jadinya  :
ke atas
dan

Ke bawah