Pembuatan Aplikasi Pemanggil CSV VB

Praktek !!!!!!!!!!!!!!

1.Buat data excel yang memiliki format CSV,format dapat di ubah dengan cara berikut

2.lalu perhatikan pada pilihan format CSV berikut :

Terpadat Pilihan Macintosh dan MS-DOS,ini adalah pilihan untuk OS(operating system) yang anda gundakan jika menggunakan linux pilih macintosh dan jika gunakan Windows gunakan MS-DOS

3.Pembuatan aplikasi,pada blank form harus mengisinya dengan atribut pada toolbox yang tertunjuk pada ilustrasi berikut

tampilan "default" pada attribut dapat di ubah pada tabel propertis ini.

Contoh design seperti ini

pada nomer 1 adalah textbox,nomer 2 adalah richtextbox,3 dan 4 adalah button.ke-4 attribut tersebut berasal dari toolbox yang anda pilih

4.Selanjutnya menggunakan ilustrasi diatas,tahap coding atau pemberian perintah pada attribut button"Open"

Klik 2x dan akan muncul seperti ini

Kemudian isikan seperti ini

5.selanjutnya pada button "Simpan",pengcodingan nya sama ! anda klik 2x pada button ini

lalu akan muncul seperti ini

kemudian isikan pada Button2_click seperti ini

6.anda dapat mencobanya dengan memilih tombol ini

kemudian muncul hasil seperti ini

pilih "open" dan akan muncul tampilan seperti ini

pilih file yang anda simpan kemudian klik "Open",lalu akan keluar hasil seperti ini

kemudian cobalah klik "Simpan,maka akan muncul pesan seperti ini

NB:"Jika anda Tidak Mengganti nama  File atau direktori pada textbox,maka aplikasi akan error"

SELESAI TERIMAKASIH !!!!

Membuat list Dealer Toyota Dengan VB 8.0

LANGSUNG PRAKTEK !!!!!!!!!!!!!!!

1.buka program VB klik pada windows form seperti ini

2.tambahkan atribut pada form anda dengan memilihnya pada toolbox dan dapat edit dengan cara ubah di propertis nya seperti ini

3.tambahkan atribut seperti di bawah ini

 pada nomor 1 adalah combobox,2 adalah label,4 adalah textbox,5 adalah checkbox,6 adalah label,7 adalah combobox,8 adalah button,dan 9 adalah picturebox. semua itu adalah yang anda drag dari toolbox
4.tahap pengodingan,anda klik 2x pada Form lalu anda isikan Seperti ini

Pada "Dim Harga As integer" itu adalah variabel harga dalam bentuk integer yang maknanya berisikan bilangan.dan "harga=170000000" itu adalah harga terendah yang ditawarkan untuk merek Toyota.lalu,"Do While <=400000000" itu adalah harga nya tidak lebih dari 400000000.dan "combobox.items.add(harga)" adalah menambahkan item secara manual pada variabel harga.lalu loop adalah kondisi harga ditambah dengan 80000000 (kenapa 80000000? karena interval rata2 harga adalah sebanyak itu).dan dibawah nya "Dim tipe as Integer" adalah sama seperti harga yang maknanya berisikan bilangan.dan "For tipe = 1 to 3" adalah untuk tipe hanya bilangan 1 sampai 3.dan "Combobox.items.add(tipe)" sama dengan sebelumnya menambahkan item secara manual
5.lalu pengodingan pada "checkbox",klik 2x pada form lalu isikan seperti ini

 select case adalah memilih dari atribut tsb lalu pada Case adalah memilih dari isi atribut tsb.fungsinya adalah jika kita tekan tombol checkbox akan nampak jenis mobil pada textbox
6.selanjut nya pada button,klik 2x pada Form dan isikan seperti dibawah ini

ini menggunakan Fungsi if jika diartikan dari atribut maka maknanya adalah jika pada textbox 1 bertuliskan avanza maka pada case akan memilih tipe yang berada di combobox.dan jika yang terpilih pada case 1 maka akan nampak ilustrasi pada picturebox.pada picturebox anda dapat membuka foto/gambar pada directory tempat penyimpanaan foto/gambar tsb.lakukan ini untuk semua tipe mobil seperti contoh diatas
7.lalu anda dapat melihat hasil dengan pilih debug pada taskbar.jika berhasil,hasil seperti ini

8.selamat mencoba

Pembuatan Aplikasi Acak Angka Dapat Hadiah

Langsung Praktek menggunakan VB 2008

Langkahnya adalah

1.buka Visual Studio 2008 dan pilih seperti ini :

2.Design lah Form dengan cara Klik Toolbox dan Edit lah sesuka Anda pada Propertis,Seperti ini :

3.Klik 2x Timer yang di drag dari Toolbox ke Form,dan isikan skrip seperti ini:

  makna dari textbox1.text=int(Rnd()*10) adalah pada textbox 1 tulisan teks berisikan 10 bilangan      random
4.kemudian pada form1 design klik 2x pada form,lalu isikan seperti ini:

  makna Dim tanggal,bulan,tahun As integer adalah variabel tersebut sama dengan bilangan dan di bawahnya adalah kondisi dari variabel tsb.jika dilihat pada "Do While tanggal <=31" maksudnya adalah tanggal tidak melebihi angka 31
 jika dilihat pada kondisi tanggal dan bulan/tahun memang berbeda.tetapi hasil nya jika skrip tertulis benar maka hasilnya pun sama.demikian anda dapat memilih salah satu tipe kondisi
5.pada CheckBox "Mainkan Angka"(Seperti gambar sebelumnya).anda klik 2x,lalu isikan skrip seperti ini

  Pada gambar tersebut menggunakan Fungsi  IF,Else,Select Case dan maksud dari Case adalah jika yang muncul adalah Bilangan tersebut makan Kondisi dari TextBox akan bertuliskan,Contoh "1 Unit Toyota Alphard" dan dapat dilihat pada kondisi If dan Else itu maksudnya adalah mengganti nama Checkbox("Mainkan Angka"pada contoh diatas) dan status nya dapat enable/disable.Jika dilihat dari Kondisi tsb ada yang bertuliskan "Form2.show()" itu adalah membuka form2 dengan cara seperti ini :

Tambahkanlah sampai menjadi 3 Form dengan tujuan agar lebih menarik hasilnya dengan cara klik 2x pada Form2 dan Form3 Ubah Backgroundimage seperti cara dibawah Ini

 

8.Jika Sudah Berhasil Hasilnya Seperti ini

Selamat Mencoba

Membuat Aplikasi Dasar "Rumus Trapesium" Visual Basic 8.0

• Buka visual basic 8.0 dan ikuti langkah berikut ini 

• Buat Project Baru Pilih seperti ini 

•   Design pada form,Berikan  seperti :

•  Ganti nama text dan nama design pada form seperti ini

• label 1 

tulisan text diganti menjadi "Sisi Pertama"

•  label 2

Tulisan text diganti menjadi "Sisi Kedua"

• label 3

Tulisan text diganti menjadi "Tinggi"

• label 4

Tulisan text diganti menjadi "Luas"

• Button 1

Tulisan text diganti menjadi "Hapus" dan Design name di ganti menjadi "BtnHapus"

• Button 2

Tulisan Text diganti menjadi "Hitung" dan Design name diganti menjadi "BtnHitung"

• Button 3

Tulisan Text diganti menjadi "Selesai" dan Design name diganti menjjadi "BtnSelesai"

• klik 2x pada "HAPUS"/"Btnhapus" di form,lalu tuliskan format seperti ini

Private Sub Btnhapus_Click()
txtsisipertama.Text = “”
txtsisikedua.Text = “”
txttinggi.Text = “”
txtluas.Text = “”
txtsisipertama.SetFocus
End Sub

•  klik 2x pada "Btnhitung"/"HITUNG" di form,lalu tuliskan format seperti ini

txtLuas.text = 0.5*(txtSisiPertama.text*txtSisikedua.text)*txtTinggi.text

• klik 2x pada " BtnSelesai"/"SELESAI" di form,lalu tuliskan format seperti ini

If MsgBox("Anda yakin ingin keluar", vbYesNo, "Konfirmasi") = vbYes Then
Me.Close()
Exit Sub
End If
End Sub

• Selesai

L3K (legend of three kingdom)

 sebuah game yang menceritakan tentang 3 kerajaan cina yaitu shu,wei,dan wu.game ini ber genre MMORPG hampir mirip dengan perfect world dan sama sama di bedakan dengan ras tetapi yang ada di L3K hanya 2 ras yaitu Yan dan Miao dilihat dari segi pet tunggangan
- Yan secara default menunggangi kuda
- Miao secara default menunggangi Singa ( singanya gaje gan warna ungu ) hahaha....
dan job/class dari L3K hampir 10 lebih gan dan setiap Class jika melebihi pangkat Lord IX akan mendapatkan Weapon Tome gunanya adalah untuk Reset Class dan lebihnya lagi setiap 1 class melebihi pangkat Lord IX mendapatkan 1 Weapon tome jadi Reset Class tidak perlu mengeluarkan biaya rupiah

Guide Hero ( Ranger )

Di mulai dari stats dan mastery skill. Pada prinsipnya, ranger ini akan menggunakan (hampir) semua skill yang dimiliki. Baik dengan sp maupun mp. Lagipula karena sistem game nya memaksa makin tinggi stats makin banyak point, maka lebih efektif kalau sedikit disebar.

                     GAMBAR STATUS YANG TELAH DI EDIT INI ADALAH PENDAPAT SAYA

Dan ini Pohon Mastrynya 

YANG WAJIB DI NAIKIN :
- Bow Expert 10. Yah, bagaimanapun butuh jalan ke bawah menujur Frost Arrow Mastery 10
- Spiritual Expert 10. Perlu untuk nambah mag. Ajaran Tao 10, hanya jika anda mau maen magic mengikuti jejak pembuat guide.. 

- Embrave 10. Prinsipnya memang untuk nge buff diri sendiri, soldier dan kawan seperjuangan. Kalau dianggap nda guna, ambil 5 saja alokasikan 5 ke tempat lain. Tujuan utama untuk morale accession memang.
- Morale Accession X. Menambah atk dan def 5 karakter (anda + 4 soldier). Err...anda pakai 4 soldier kan ? 
- Twin Bolt Mastery X. Damage utama....




KALAU YANG INI LVL SKILLNYA AJA TAMBAHIN MUNGKIN ADA BEBERAPA ORANG YANG MENAIKANNYA SOALNYA BERGUNA BUAT JAGA" PAS LAWAN sorcerer pke skill god hand 
- Thunder Assault. Dipakai terutama saat lagi cari kill melalui properti dan mau ngirit / keabisan sp. Juga nembak warrior2 yang notabene lemah magic. 

- Heavy Blow dan Split Arrow. Hey, Twinbolt ada jeda dan Heavy B. lumayan damage dan agak nyebar. Walau tidak senyebar Split Arrow. Split A. Biasa dipakai buat beres2 anak buah bos. 

- Blade Storm. Dicari untuk sifat area nya. Area nya seperti Split Arrow. 

- Lotus (jika main Int). Sama untuk sifat areanya. Berbeda dengan Blade Storm, Lotus memberi damage di sekitar. 

- Thunder Explotion. Digunakan paling utama untuk hit and run sat war. Sebagai Ranger yang notabene lembek, sangatlah bodoh untuk menerjang ke daerah yang banyak lawan kan... 

- First Aid, Disrupt, Esuna. First A dipakai sebagai second healer setelah Spirit A. Disrup sebagai third heal dan buat kabur dari bos ketika dikejar atau ngisengin orang heheheh. Esuna hanya untuk ilangin debuff, jadi terserah mau dinaikkan atau tidak. 

- Blood Rage. Dipakai pada saat kepepet kehabisan mp, tapi ada sisa sp. Sejauh pengalaman, kondisi ini paling sering terjadi saat bossing (mp sekitar 70%). Kalau lagi duel pas war sih, yang ada sp abis... 

- Militia. Buff supaya lebih crit lagi (wedeh..). Tapi fungsi utama memang untuk nge buff soldier.. 

- Ice Frost, Assault Strike, Double Strike, Cross X. Kaget ya ada jurus pedang diambil ? Ini biasa dipakai pada saat hit statue, terutama karena aspd nya (dan magis kan nda peduli jenis wpn). Juga ketika duel diatas kapal, saat dimana soldier nda isa dipakai (grrr) dan nda ada tempat untuk hit and run.. 


YANG TERKAHIR ADA AUTOBATTLE DENGAN AMAN ada 2 cara ... (BANYAK ORANG YANG SETTINGNYA SEPERTI INI JIKA CHAR ANDA MOKAD JANGAN SALAH KAN SAYA )

Element kemungkinan damage besar saat lawan boss epic

TianZhu Mountain

Wei zi : Dark

Zhang Miao : Holy

Dian Wei : Water

Baima General Resident

Gong Sun Yue : Fire

Gong Sun Zan : Fire

Zhao Yun : Smash, Dark

Huainan Camp

Ze Rong : Fire

Liu Yao : Smash, Pierce

Tai Shi Ci : Holy

Yellow Hideout

Zhang Liang : Fire

Yellow Altar

Zhang Bao : Water

Yellow Tiantai

Zhang Jiao : Holy

KongRong Garrison

Wo An Guo : Dark, Pierce

Kong Rong : Dark

North HongNong

(Lupa Nama) : Dark

Zhao Zhong : Holy

Zhang Rang : Holy

LuoYang

Xu Rong : Holy, Pierce

Guide Warrior (Lancer) Long weapon ... !!!

yang saya berikan hanya penggambaran saja ...

dari semua Pohon mastry Menurut saya pribadi :
-Battle fury naikkan saja sampai 5 poin tidak usah lebih karena tidak effisien saat war terlebih saat melawan    sorcerer
-jika di gambar tersebut 10 point .. dan pendapat saya sampai 5 point saja .. maka 5 pointnya bisa digunakan ke skill shield smash untuk memenihu point skill shield bash untuk mendambah stun menjadi 2.5 detik
Permainan yang menurut saya paling benar :
caranya adalah menambah 10 point shield bash karena untuk menstun lawan.karena dengan adanya stun lawan tidak dapat berbuat apa" dan anda bisa menyerang bebas di tambah jika anda meng Full kan point assault rush untuk 1 detik stun ... DAN KE UNTUNGAN besar adalah di mana saat anda memakai Full equip tiger war yang menambah stun assault rush menjadi 3 detik lebih jika di jumlahkan dan anda bermain dengan benar maka waktu total stun adalah 5.5 .saat itu anda mempunyai peluang besar membunuh

NB:semua pendapat saya tergantung bagaimana bagusnya equip anda ( add + enchanced )

Guide 3 Kingdom online indonesia Wave Game

game ini menceritakan 3 kerjaan .. hampir sama seperti game Dinasty Warrior 5..  dari segi permainannya game ini mirip RF hanya jobnya aja yang berbeda dan ngak ada yang namanya robot :D hahahaha
jobnya antara lain :
-Warrior
-Hero
-Strategist
-Sorcerer
 kalau mau tau lebih lanjut klik disini udah Berserta Client nya ... semoga menarik ..