Cara membuat traffic light dengan visual basic

Halo sobat blogger dan anak-anak RPLA kali ini saya akan memberikan tutorial cara membuat animasi trafffic light dengan visual basic

Pertama buatlah shape lalu kreasilah dengan gayamu sendiri lalu bentuklah seperti Traffic Light
Kedua buatlah label yang bertuliskan angka
Ketiga buatlah timer










Preview nya :

Berikut ini source codenya :



Private Sub Command1_Click()
Unload Me
End Sub


Private Sub Form_Load()
Label1.Caption = 1
End Sub


Private Sub Timer1_Timer() '
If Label1.Caption = 1 Then
Label1.Caption = 2
Shape1.FillColor = vbRed 'merah(1)
Shape2.FillColor = &H8080& 'kuning(1)
Shape3.FillColor = &H8000& 'hijau(1)
Shape4.FillColor = &H80&  'merah(2)
Shape5.FillColor = &H8080& 'kuning(2)
Shape6.FillColor = vbGreen 'hijau(2)
Else
If Label1.Caption = 2 Then
Label1.Caption = 3
Shape1.FillColor = vbRed
Shape2.FillColor = vbYellow
Shape3.FillColor = &H8000&
Shape4.FillColor = &H80&
Shape5.FillColor = vbYellow
Shape6.FillColor = &H8000&
Else
If Label1.Caption = 3 Then
Label1.Caption = 4
Shape1.FillColor = &H80&
Shape2.FillColor = &H8080&
Shape3.FillColor = vbGreen
 Shape4.FillColor = vbRed
Shape5.FillColor = &H8080&
Shape6.FillColor = &H8000&
Else
If Label1.Caption = 4 Then
Label1.Caption = 1
Shape1.FillColor = &H80&
Shape2.FillColor = vbYellow
Shape3.FillColor = &H8000&
Shape4.FillColor = vbRed
Shape5.FillColor = vbYellow
Shape6.FillColor = &H8000&
End If
End If
End If
End If
End Sub


Download projectnya

Read More

Pembuatan kalkulator sederhana

Halo sobat blogger dan anak-anak RPLA kali ini saya akan memberikan tutorial pembuatan kalkulator sederhana


Pertama kita buat label dahulu yang bertuliskan ( caption ) Angka 1 , Angka 2 , Jumlah
Kedua kita buat sebuah textbox lalu letakkanlah disamping label
Ketiga buatlah commandbutton yang bertuliskan ( caption ) + , - , X , :  , Hapus , Keluar

Preview

Source codenya :

Private Sub Command1_Click() 'menjelaskan commandbutton +

Text3.Text = Val(Text1.Text) + Val(Text2.Text)

End Sub

Private Sub Command2_Click() 'menjelaskan commandbutton -

Text3.Text = Val(Text1.Text) - Val(Text2.Text)

End Sub

Private Sub Command3_Click() 'menjelaskan commandbutton x

Text3.Text = Text1.Text * Text2.Text

End Sub

Private Sub Command4_Click() 'menjelaskan commandbutton :

Text3.Text = Text1.Text / Text2.Text

End Sub

Private Sub Command5_Click() 'menjelaskan commandbutton keluar

Unload Me

End Sub

Private Sub Command6_Click() 'menjelaskan commandbutton hapus

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

Download projectnya

Read More

Program Sederhana Pembuatan Biodata ( Konsep Dasar )

Halo sobat blogger dan anak-anak RPLa yang seru aja nih haha kali ini saya akan memberikan tutorial cara membuat program sederhana pada visual basic ya seperti membuat biodata

Pertama kita buat dulu label label nya dulu seperti Nama , Nis , Kelas , dan Kompetensi Keahlian

Kedua kita buat command button seperti Tampilkan data saya , Sembunyikan Huruf , Ubah Warna , dan Keluar

Comman button masih ingatkan fungsinya ?? Command button ialah suatu tombol untuk memerintahkan program tersebut

Lalu buatlah textbox lalu letakkan disamping masing masing label . 

Textbox disini digunakan untuk menampilkan hasil dari command button yang kita klik nanti

Setelah itu buatlah sebuah combobox yang digunakan untuk mengganti warna background pada form visual basic 

Berikut ini tampilannya 

Berikut ini source code nya :

Public Function warna(wrn) 'menjelaskan ketika kita memilih warna dari combobox

Select Case wrn

Case "putih"

warna = "&HFFFFFF"

Case "merah"

warna = "&H0000FF"

Case "hijau"

warna = "&H00FF00"

Case "kuning"

warna = "&H00FFFF"

Case "biru"

warna = "&HFF0000"

Case "lembayung"

warna = "&HC000C0"

Case "biru laut"

warna = "&HFFFF00"

Case "hitam"

warna = "&H000000"

End Select

End Function

Private Sub Combo1_Click()

End Sub

Private Sub Command1_Click()

Unload Me

End Sub

Private Sub Command2_Click() 'menjelaskan commandbutton dari tampilkan data saya

Text1.Text = "azizal" 'kita tahu bahwa peletakan text1 berada di sebelah label nama maka untuk menampilkannya kita harus mengetik text1.text , .text disini menjelaskan dari properties dari text1 tersebut kalo kita tulis text1.text = "azizal" maka jika kita klik perintah dari commandbutton otomatis text nya akan menampilkan teks yang bertuliskan azizal

Text2.Text = "10001960"

Text3.Text = "XRPLA"

Text4.Text = "rekayasa perangkat lunak"

End Sub

Private Sub Command3_Click()

bdata.BackColor = vbBlue 'menjelaskan dari commandbutton ubah warna

End Sub

Private Sub Command4_Click() 'menjelaskan dari commandbutton sembunyikan huruf

Text1.Text = "" 'menjelaskan dari karakter kosong bila kita klik maka nantinya akan tertampil karakter kosong yang berarti tidak ada huruf/angka sama saja kita dengan menghapusnya

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

End Sub

Private Sub Form_Load() 'menambahkan list dari combobox

Combo1.AddItem "putih" 'fungsi additem disini adalah menambahkan list dari combobox , harus diletakkan di form load

Combo1.AddItem "merah"

Combo1.AddItem "hijau"

Combo1.AddItem "kuning"

Combo1.AddItem "biru"

Combo1.AddItem "lembayung"

Combo1.AddItem "biru laut"

Combo1.AddItem "hitam"

End Sub

Download projectnya

Read More

Pengenalan Visual Basic 6

Halo Sobat Blogger dan semua orang yang sedang mengujungi blog saya hehehehe perkenalan orang

dulu yah hehehe pengenalan visual basic nya nanti dahulu hahaha

    

Nama saya Azizal sekolah saya berada di SMKN2 SURAKARTA alias STMN 1 SOLO

saya baru saja duduk di kelas 1 saya termasuk jurusan RPL(Rekayasa Perangkat Lunak)

     

Nah disini sekarang saya akan mengenalkan prinsip dasar/pengenalan pada Visual Basic 6

Visual Basic 6 adalah sebuah software/program yang digunakan untuk membuat software. Weh jangan

bingung ya software/program yang digunakan untuk membuat software haha

     

Sudah tau belum maksutnya ???

     

Visual Basic disini menggunakan bahasa basic yah mungkin sudah agak dipahami dan dimengerti dalam

     

source codenya untuk graphic user interface yang telah dikembangkan oleh Microsoft Windows sendiri

     

Hahaha namanya aja Microsoft Visual Basic 6 yah pasti buatan Microsoft masak buatanku sendiri

hahaha

     

Membuat Project Baru

           

Kawan-kawan jika kita ingin membuat program aplikasi di Visual Basic 6 kita harus menentukan yang mana yang kita pilih dahulu yang dimana nantinya akan terbentuk sebuah Project baru . Atau bisa saja kita membuat project baru dengan cara memilih menu FILE – > NEW PROJECT atau bias saja dengan menekan tombol ikon new project

            

Hemt

Banyak banget ya ternyata project yang tertampil pada Visual Basic 6

Saya akan menjelaskan beberapa komponen project yang ada didalam Visual Basic

Berikut penjelasannya :

      

(1) Standard EXE: Project standar dalam Visual Basic dengan komponen-komponen

standar. Jenis project ini sangat sederhana, tetapi memiliki keunggulan bahwa

semua komponennya dapat diakui oleh semua unit komputer dan semua user

meskipun bukan administrator. Pada buku ini akan digunakan project Standard

EXE ini, sebagai konsep pemrograman visualnya.

      

(2) ActiveX EXE: Project ini adalah project ActiveX berisi komponen-komponen

kemampuan intuk berinteraksi dengan semua aplikasi di sistem operasi windows.

      

(3) ActiveX DLL: Project ini menghasilkan sebuah aplikasi library yang selanjutnya

dapat digunakan oleh semua aplikasi di sistem operasi windows.

      

(4) ActiveX Control: Project ini menghasilkan komponen-komponen baru untuk

aplikasi Visual Basic yang lain

      

(5) VB Application Wizard: Project ini memandu pengguna untuk membuat aplikasi

secara mudah tanpa harus pusing-pusing dengan perintah-perintah pemrograman.

      

(6) Addin: Project seperti Standard EXE tetapi dengan berbagai macam komponen

tambahan yang memungkinkan kebebasan kreasi dari pengguna.

      

(7) Data project: Project ini melengkapi komponennya dengan komponen-komponen

database. Sehingga bisa dikatakan project ini memang disediakan untuk

keperluan pembuatan aplikasi database.

      

(8) DHTML Application: Project ini digunakan untuk membuat aplikasi internet

pada sisi client (client side) dengan fungsi-fungsi DHTML.

      

(9) IIS Application: Project ini menghasilkan apliaksi internet pada sisi server

Sekian dulu dari pengenalan VISUAL BASIC 6 dari saya :D

Tapi maaf saja saya disini hanya memberikan pengenalan ya jadi hanya penjelasan kompnen dari visual basic sendiri

Nanti yang lebih lanjut saya akan memberikan tutorial visual basic

Download Pengenalan Visual Basic 6 (PDF FILE)

Read More