Tampilkan postingan dengan label Dasar-dasar Visual Basic. Tampilkan semua postingan
Tampilkan postingan dengan label Dasar-dasar Visual Basic. Tampilkan semua postingan

Rabu, 02 Mei 2012

Syntax FileCopy Kill dan Name



Pada pembahasan syntax kali ini, ada 3 (tiga) syntax yang akan kita bahas yakni FileCopy, Kill dan Name. Ketiga syntax tersebut berhubungan dengan file (file nya umum lho, terserah ekor (ekstensi) nya apa). Kali ini kita akan menggunakan ekstensinya notepad yakni ".txt" (dot txt), buat dulu file dari notepad lalu simpan pada direktori "D:/" (terserah juga seh mo disimpan dimana yang penting inget aja tempatnya) dengan nama "tutorial.txt" (isinya notepad nya juga terserah lho mo di isi apa kosongan yang penting simpen pake nama tutorial.txt)

Syntax FileCopy
Digunakan untuk menyalin (copy) sebuah file menjadi file lain.

Syntax dasar :
FileCopy source, destination

Contoh :
- Bukalah Micros*ft Visual Basic 6.0 anda lalu pilihlah StandardExe;
- Tambahkan commandbutton pada lembar aplikasi lalu tekan 2 kali sehingga muncul code editor;
- Lalu masukkan source code dibawah ini!
FileCopy “D:/tutorial.txt”, ”D:/visual_basic.txt”
- Kalau sudah tekan F5, kemudian tekan commandbutton nya.
- Lihat lah file "tutorial.txt" pada direktori "D:/" masih ada khan!tetapi file hasil salinan dengan nama "visual_basic.txt" juga ada (inget lho biasanya ".txt" nya nggak keliatan karena memang di sembunyikan, baca juga postingan Show Super Hidden). Yah itu lah contoh syntax untuk menyalin file.

Syntax Kill
Upss.. bukan untuk membunuh orang lho tetapi syntax ini digunakan untuk menghapus (delete) sebuah file hehehe...

Syntax dasar :
Kill pathname

Contoh :
Kill “D:/tutorial.txt”
- Maka file yang ada dengan nama "tutorial.txt" pada direktori "D" akan terhapus jika syntax tersebut dijalankan.

Syntax Name
Digunakan untuk mengubah nama (rename) sebuah file.

Syntax dasar:
Name oldpathname As newpathname

Contoh :
Name “D:/tutorial.txt” As “D:/belajar_vibi.txt”
- Syntax di atas kalo dijalankan akan mengubah nama file "tutorial.txt" menjadi "belajar_vibi.txt"

Oke sekian dulu pembahasan syntax yang berhubungan dengan file kali ini.

Ditulis ulang oleh paijo_jr(sumber Syntax)


Minggu, 29 April 2012

Syntax untuk membuat dan menghapus Folder




Uitssss... lamaaaa skali nggak update nieh blog (maaf lagi sibuuuk skali ^^). Nah pembahasan kali ini syntax yang berhubungan dengan folder, yakni untuk menyatakan "cinta" (upss salaahhh...) menyatakan folder [Dir$()], membuat folder [MkDir] dan menghapus folder [RmDir]. Emang nieh pembahasan kali ini sangaaattt dasar bangets hehehe....
Oke mari kita bahas satu-satu!

Syntax Dir$()
Digunakan untuk menyatakan sebuah direktori. Statemen ini juga dapat digunakan untuk pencarian file.

Syntax dasar :
stringvar = Dir$(path[,attributes])

Contoh :
If Dir$(“C:/tempe.log”) = “” Then
    MsgBox “File tidak ditemukan”
Else
    MsgBox “File ditemukan”
End if
Penjelasan :
Maksud dari contoh di atas yakni penggunaan fungsi if then else yang kalo di jelasin jika file pada alamat C:/tempe.log adalah kosong ("" tuh maksutnya 0 nol atau kosong) maka akan muncul message box yang isinya "File tidak ditemukan", else tuh kalau sebaliknya jika file dengan alamat tersebut ada maka yang muncul message box "File ditemukan", kira-kira begitu penjelasannya hehehe...

Syntax MkDir
Digunakan untuk membuat folder baru.

Syntax dasar :
MkDir path

Contoh :
MkDir “c:\VisualBasic\”
Penjelasan :
Saya rasa cukup jelas lah, cuman yang harus diperhatiin untuk penulisan path nya yang agak berbeda dari syntax Dir$(), kalo untuk mencari file atau menyatakan direktori tuh path nya pake tanda "/" tetapi untuk membuat dan menghapus folder memakai tanda "\", inget yah beda banget tuh!

Syntax RmDir
Digunakan untuk menghapus folder.

Syntax dasar :
RmDir path

Contoh :
RmDir “c:\VisualBasic\”
Penjelasan :
hehehe...idem lah seperti penjelasan syntax MkDir.

Oke sekian dulu pembahasan syntax kali ini, thank's udah ngebaca...^^
Ditulis ulang oleh paijo_jr (sumber Syntax)

Sabtu, 24 September 2011

Syntax Len Mid$() Left$() Right$()


Photobucket
Setelah membahas syntax Do...Loop dan For... Next, kali ini kita akan membahas syntax yang lainnya yakni syntax Len, Mid$(), Left$(), Right$(). Keempat syntax tersebut dibahas karena sering kali digunakan dalam sebuah project aplikasi visual basic. Mari yuk mari dibahas dan dibongkar satu persatu (kek gudang aje hohohoho...) :


1.       Syntax Len
Digunakan untuk mendapatkan informasi panjang dari sebuah string.

Syntax dasar :
Len (string)

Contoh :
Dim x as String
x = “Tutorial Visual Basic”
MsgBox x & “ = “ & Len(x) & “ karakter”
Penjelasan :

Dim x as String
‘yakni mendefinisikan bahwa “x” bernilai string;

x = “Tutorial Visual Basic”
‘yakni “x” tersebut berisi kalimat Tutorial Visual Basic;

MsgBox x & “ = “ & Len(x) & “ karakter”
 ‘yakni membuat MsgBox yang menampilkan pesan “x” (Tutorial Visual Basic), “& “=”&” (“& “untuk menggabungkan karakter  “x” dengan karakter “ = “(spasi = spasi)), “Len (x)” (mendapatkan informasi panjang dari “x”(Tutorial Visual Basic) yang kalau dihitung adalah 21 (termasuk spasi juga dihitung)), “& “ karakter” (penjelasan sama dengan “& “=”&”).

Hasilnya dalam MsgBox :
Tutorial Visual Basic = 21 karakter

2.       Syntax Mid$()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string.

Syntax dasar :
Mid$ (string, start[, length])

Contoh :
Dim x as String
x = Mid$ (“Tutorial Visual Basic”, 17, 5)
MsgBox x
Penjelasan :

Dim x as String
‘yakni mendefinisikan bahwa “x” bernilai string;

x = Mid$ (“Tutorial Visual Basic”, 17, 5)
‘ yakni  dalam string “Tutorial Visual Basic” tersebut mulai dihitung dari kiri ke kanan 17 karakter (termasuk spasi juga dihitung), setelah didapat 17 karakter tersebut maka itu merupakan titik awalnya (yakni huruf “B”) sedangkan “5” merupakan panjangnya dimulai dari  titik awal (yakni “Basic”).

Hasilnya dalam MsgBox :
Basic

3.       Syntax Left$()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string, yang dimulai dari sisi kiri string.

Syntax dasar :
Left$ (string), length)

Contoh :
Dim x as Sting
x = Left$ (“Tutorial Visual Basic”, 15)
MsgBox x
Penjelasan :

x = Left$ (“Tutorial Visual Basic”, 15)
‘yakni angka 15 maksudnya dari kalimat Tutorial Visual Basic tersebut dibaca dari kiri 15 karakter (termasuk spasi) dan didapat Tutorial Visual.


Hasilnya dalam MsgBox :
Tutorial Visual

4.       Syntax Right$()
Digunakan untuk mendapatkan bagian tertentu dari sebuah string, yang dimulai dari sisi kanan string.

Syntax dasar :
Right$ (string, length)

Contoh :
Dim x as String
x = Right$(“Tutorial Visual Basic”, 12)
MsgBox x
Penjelasan :

x = Right$(“Tutorial Visual Basic”, 12)
‘yakni angka 12 maksudnya dari kalimat Tutorial Visual Basic tersebut dibaca dari kanan 12 karakter (termasuk spasi) dan didapat Visual Basic.

Hasilnya dalam MsgBox :
Visual Basic

Ditulis oleh paijo_jr (sumber Syntax)

Syntax Do... Loop dan For... Next


Photobucket 
Syntax atau dalam bahasa Indonesia Sintaksis adalah ilmu mengenai prinsip dan peraturan untuk membuat kalimat dalam bahasa alami. Selain aturan ini, kata sintaksis juga digunakan untuk merujuk langsung pada peraturan dan prinsip yang mencakup struktur kalimat dalam bahasa apapun.
Dalam hal ini Syntax yang akan dibahas merupakan Syntax untuk pemrograman Visual Basic 6.0. Dalam Syntax Visual Basic 6.0 terdapat banyak sekali Syntax yang salah satunya adalah syntax perulangan yakni Do... Loop dan For... Next (satu-satu ngebahasnya kalo semua bahhh bisa panjang banget page nya hehehe...)

Syntax Do… Loops
Digunakan sebagai statemen perulangan.

Syntax 1 :
Do Until (Expression)
                (code to execute)
Loop
Contoh : 
Dim x as Integer
x=0
Do Until x = 50
      x = x+1
Loop
Syntax 2 :
Do While (expression)
                (code to execute)
Loop
Contoh :
Dim x as Integer
Do While x = 100
      x = x+1
Loop
Syntax 3 :
Do
                (code to execute)
Loop While (expression)
Contoh :
Dim x as Integer
Do
      x = x+1
Loop While x = 100
Syntax For… Next
Digunakan sebagai statemen perulangan

Syntax dasar :
For counter = start To end [ step step ]
                (code to execute)
Next [ counter ]

Contoh 1 :
Dim x as Integer
For x = 0 To 10
                MsgBox “Nilai x = “ & x
Next x

Contoh 2 :
Dim x as Integer
For x = 0 To 10 step 2
                MsgBox “Nilai x = “ & x
Next x

Ditulis ulang oleh paijo_jr (sumber Syntax) 

Kamis, 17 Desember 2009

If Then Else





Statement bercabang digunakan untuk melakukan suatu tindakan di dalam suatu program berdasarkan kondisi tertentu. Salah satu percabangan yang tidak asing di telinga kita adalah percabangan if then else karena pada aplikasi excel percabangan tersebut juga kita gunakan. Percabangan if then else ini digunakan untuk menjalankan satu blok perintah yang nilainya tergantung pada kondisi yang diuji. Penulisannya adalah sebagai berikut :

If kondisi then
pernyataan 1
Else
pernyataan 2
End if

Atau kita bisa menambahkan statement ElseIf, sehingga menjadi :

If kondisi 1 then
pernyataan 1
ElseIf kondisi 2 then
pernyataan 2
Else
pernyataan 3
End If

Bingung khan?!?aku aja juga bingung sob hehehe…
Nie kan aku coba jelasin yah, yang namanya percabangan khan pasti ada pilihan lebih dari satu(pernyataan), bisa A, B, C sampe seterusnya. Untuk percabangan If-Then-Else-End If ini, pertama kita mendeklarasikan satu kondisi terlebih dahulu, sesudah itu pasti ada pilihan jawabannya bisa benar ato bisa salah. Jadi percabangan If-Then-Else-End-If ini memerlukan kondisi yang tempatnya setelah perintah If, dan jawaban dari kondisi tadi jika benar maka dijawab dengan pernyataan 1 yang terletak setelah Then tapi jika salah maka pernyataan 2 tempatnya terletak setelah Else dan yang terakhir menutup perintah If dengan End If. Misal jika paijo_jr cowok maka paijo_jr ganteng tapi jika paijo_jr bukan cowok maka paijo_jr cantik(hiks…). Tuh tadi soalnya, jika soal itu diubah menjadi bahasa kayak di atas tadi maka bunyinya begini :

If paijo_jr=cowok then
paijo_jr ganteng
Else
paijo_jr cantik
End if

Hm…udah berkurang bingungnya?!?wah masih belum jelas, oke kita buat project baru saja untuk mempraktekkan percabangan if then else ini.


Pertama buat project baru, buka Microsoft Visual Basic nya lalu klik StandardEXE;
Kedua tambahkan satu buah Label, satu buah TextBox dan satu buah CommandButton kemudian atur seperti gambar dibawah ini:



Ketiga atur properties masing-masing komponen sebagai berikut:




Form
Name
frmCabang
Caption
Contoh Percabangan

Label1
Name
lblCabang
Alligment
Center
AutoSize
True
Caption
“” Dikosongi
Font
Size 12
ForeColor
Pilih Warna Biru

CommandButton
Name
cmdCabang
Caption
Test Cabang

TextBox
Name
txtCabang
Text
“” Dikosongi



Keempat, klik cmdCabang atau pindah ke Code Window lalu isikan source code di bawah ini :

Private Sub cmdCabang_Click()
If txtCabang.Text = "" Then
lblCabang.Caption = "TextBox Kagak Ada Isinya"
Else
lblCabang.Caption = "Wah Tuh Ada Isinya Boz"
End If
End Sub

Kelima, klik F5 dan klik Test Cabang lihat hasilnya ketika textbox kosong dengan ketika textbox ada hurufnya;




Penjelasan Source Code :

Private Sub cmdCabang_Click()
Maksud dari perintah diatas adalah apabila cmdCabang (CommandButton) di klik maka akan menjalankan perintah dibawahnya dan End Sub untuk mengakhiri perintah.


If txtCabang.Text = "" Then
Disini perintah percabangan dimulai, dimana pada awalnya di lihat apakah txtCabang.Text tidak ada isinya (tanda petik dua berarti kosong “”), kalau txtCabang.Text ternyata kosong maka memberi perintah kepada lblCabang.Caption untuk mengisi "TextBox Kagak Ada Isinya" , tetapi jika ternyata txtCabang.Text tersebut tidak kosong atau berisi minimal satu karakter (huruf atau angka) maka memberi perintah untuk mengisi lblCabang.Caption menjadi "Wah Tuh Ada Isinya Boz". Dan perintah If tersebut diakhiri dengan End If

Nah pasti sekarang udah agak paham ya, hehehe…gak sia-sia aku buat tutorial percabangan if then else ini.


Dapatkan Source Code nya di bawah ini atau masuk pada halaman Download
 Photobucket


Ditulis oleh paijo_jr

Minggu, 13 Desember 2009

Operator Logika



Sedikit berbagi aja dari yang pernah aku baca di buku, sebenarnya seh aku kurang paham ma operator logika ini tapi semoga yang baca tulisan di bawah ini lebih paham ya hehehe… Operator logika itu mengikuti aritmatika dalam pengutamaan perhitungan. Adapun operator-operator tersebut adalah :

Operator

Keterangan

Not

Logika bukan

And

Logika dan

Or

Logika atau

Xor

Exclusive Or

Eqv

Ekivalen

Imp

Implikasi


Keterangan :
  1. Operator Not akan menghasilkan nilai true jika ungkapannya memang salah;
  2. Operator And akan menghasilkan nilai true jika semua ungkapan benar dan akan menghasilkan false, jika salah satu ungkapan salat atau semua ungkapan salah;
  3. Operator Or akan menghasilkan nilai true jika salah satu ungkapan benar dan akan menghasilkan false jika semua ungkapan salah;
  4. Operator Xor akan menghasilkan nilai true jika satu ungkapan salah dan satu ungkapan lain benar dan akan menghasilkan nilai false apabila semua ungkapan benar atau semua ungkapan salah;
  5. Operator Eqv adalah kebalikan dari operator Xor, akan menghasilkan nilai true jika kedua ungkapan sama-sama benar atau sama-sama salah, dan akan menghasilkan false jika satu ungkapan salah dan satu ungkapan lain benar;
  6. Operator Imp akan menghasilkan nilai true jika ungkapan pertama benar dan ungkapan kedua salah, selain kondisi tersebut akan menghasilkan false.
Ditulis ulang oleh paijo_jr (sumber computer worm1)

Selasa, 24 November 2009

Apa sih Visual Basic itu?


Splash Screen


Pertanyaan itu terbersit ketika pertama kali aku membaca buku Computer Worm yang diterbitkan oleh Jasakom. Sederet pertanyaan pun timbul apakah visual basic tuh sama kayak delphi 7 (tuh pas aku masih kuliah tahun 2006). Setelah mencari software (walaupun kagak asli, maaf microsoft hehehe…) kemana-mana akhirnya ketemulah sama software Microsoft Visual Basic 6.0 dan ehm...ternyata hampir sama tetapi ada juga perbedaannya. Persamaannya yakni keduanya merupakan program development untuk membangun aplikasi dalam lingkungan Windows dan keduanya menggunakan pendekatan visual untuk merancang user interface atau biasa kita kenal GUI (Graphic User Interface).

Sedangkan perbedaannya yah jelas sekali kalo Visual Basic tuh buatan Microsoft sedangkan Delphi tuh buatan Borland (hehehe…). Tetapi tidak itu saja, dari segi ukuran file aplikasi yang dihasilkan Visual Basic mempunyai output ukuran yang lebih kecil dibandingkan ukuran file yang dihasilkan oleh Delphi karena Visual Basic mempunyai support di windows (yah yang buat aja sama Microsoftnya) yakni file msvbvm60.dll (coba cari di folder \Windows\System32\msvbvm60.dll) sehingga banyak yang berpendapat kalo Visual Basic tuh lebih labil (nggak stabil) daripada Deplhi. Walaupun ukuran Delphi lebih besar tetapi aplikasi yang dihasilkan oleh Delphi dapat berjalan stabil karena tidak tergantung oleh file msvbvm60.dll (inget kan worm-worm pada masa 2006an yang pake visual basic akan rontok kalau file msvbvm60.dll didelete hehehe…). Eits kok malah membahas perbedaan Visual Basic ma Delphi, balik ke pembahasan Visual Basic.

Pertama kali program visual basic di buka akan kelihatan seperti ini :

Pilih Project

Gambar di atas merupakan dialog pilihan terhadap jenis project yang akan dibuat, biasanya untuk proses awal memilih project Standard EXE.

Setelah memilih standard EXE lalu muncullah jendela berikut ini:

IDE

Penjelasan singkat :
  • Menu Bar : digunakan untuk memilih tugas-tugas tertentu seperti menyimpan project, membuka project dsb;
  • Main Toolbar : digunakan untuk melakukan tugas-tugas tertentu dengan cepat;
  • Project Window : merupakan gambaran semua modul yang terdapat dalam aplikasi (dapat dikelompokkan secara group maupun urut berdasarkan nama);
  • Form Designer : merupakan tempat untuk merancang user interface dari aplikasi;
  • Toolbox : berisi komponen yang digunakan untuk mengembangkan user interface;
  • Properties Window : merupakan daftar properties dari objek yang sedang terpilih;
  • Code Window : merupakan jendela yang berisikan source code yang berisi instruksi-instruksi program yang mendukung tampilan dan proses yang dilakukan;
  • Form Layout Window :jendela ini akan menunjukkan bagaimana form bersangkutan ditampilkan ketika runtime.
Untuk sementara itu dulu perkenalan dasar dari tampilan program visual basic.

Ditulis oleh paijo_jr