Menggunakan Timer di VB.NET

Menggunakan Timer di VB.NET

Tutorial kali ini,kita akan belajacar cara menggunakan "timer"
apa sih timer?
Timer dalam bahasa indonesia "alat pengatur waktu"
Digunakan untuk memberikan waktu pada aplikasi,
Contoh sederhananya kita buat hitungan per-detik

Ok langsung saja buka VB.NET

Pilih File->New Project->Windows Form Application->beri nama Contoh Timer->OK

Tambahkan 1 buah timer dan 1 buat label

Edit bagian properties sebagai berikut :

Timer :
 Interval = 1000

Label1 :
 Text = 0

masuk ke coding,Click 2 kali Form1

Public Class Form1 Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick Label1.Text = Label1.Text + 1 If Label1.Text Mod 10 = 0 Then 'Jika label1 dibagi 10 sisa 0 maka akan muncul pesana Welcome,contohnya 10,20,30,40,50,dst MessageBox.Show("Welcome") End If End Sub Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing Timer1.Stop() End Sub Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Timer1.Start() End Sub End Class

Demikian tutorial saya kalau ada kekurangan mohon dimaafkan,saya juga masih belajar.
-----------------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Read more »

Struktur Pengulangan di VB.NET

Lanjutan dari tutorial sebelumnya,tentang struktur pemrograman di VB.NET

Ada 4macam struktur pengulangan :
1.For-Next
2.Do While - Loop
3.Do Until - Loop
4.While - End While

untuk mencobanya mari kita buka VB.NET

Pilih New Project->Windows Form Application->beri nama Struktur Pengulangan VB.NET->OK

tambahkan 5 button dan 1 listbox.
Edit text button seperti ini :

Masukan coding berikut :
disertai penjelasan sederhana

Public Class Form1 Dim i As Integer Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click ListBox1.Items.Clear() For Me.i = 1 To 10 'Pengulangan dilakukan dari 1 sampai 10 ListBox1.Items.Add(i) Next End Sub Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click ListBox1.Items.Clear() i = 1 Do While i <= 10 'kondisi i <= 10 true jadi program akan berkerja selama kondisi masih true ListBox1.Items.Add(i) i = i + 1 Loop End Sub Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click ListBox1.Items.Clear() i = 1 Do Until i > 10 'kondisi i > 10 adalah false karena i = 1 karena itu program akan berkerja hingga kondisi true ListBox1.Items.Add(i) i = i + 1 Loop End Sub Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click ListBox1.Items.Clear() i = 1 While i <= 10 'sama dengan do While ListBox1.Items.Add(i) i = i + 1 End While End Sub Private Sub Button5_Click(sender As System.Object, e As System.EventArgs) Handles Button5.Click ListBox1.Items.Clear() End Sub Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load End Sub End Class 


Hasil :

Selamat Mencoba ^_^
---------------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Read more »

Stuktur Case di VB.NET

Tutorial kali ini,kita akan membahas cara menggunakan Case di VB.NET,tutorial saya buat semudah mungkin sehingga anda dapat mudah memahaminya...

Ok langsung saja,buka VB.NET

 

Buat Project baru dengan cara pilih New Project->Windows Form Application->beri nama Hari to Day->Click OK

Saya jelaskan terlebih dahulu  program Hari to Day,saat kita memasukan input(nama hari dalam Bahasa Indonesia) di Textbox kemudian tekan Button maka outputnya adalah nama hari dalam Bahasa Inggris,dengan menggunakan select case

Buat tampilan Form seperti berikut :

Tambahakan 1 label,1 textbox,1 button di bagian Toolbox

Di bagian Properties ubah :

Form

Text : Hari to Day

label1 

Text : Masukan nama hari

button1 

Text : ok

Silakan jika anda mau kreasi sendiri,memberi background,dan lain sebagainya

untuk codingnya sebagai berikut :

Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim hari As String hari = TextBox1.Text Select Case hari Case "senin" MessageBox.Show("Monday") Case "selasa" MessageBox.Show("Tuesday") Case "rabu" MessageBox.Show("Wednesday") Case "kamis" MessageBox.Show("Thursday") Case "jumat" MessageBox.Show("Friday") Case "sabtu" MessageBox.Show("Saturday") Case "minggu" MessageBox.Show("Monday") Case "" MessageBox.Show("Kosong") End Select End Sub End Class

untuk menjalankannya tekan F5

Selamat mencoba ^_^
--------------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Read more »

Operasi Matematika Sederhana dengan VB.NET

Ini tutorial ketiga saya,tutorial sederhana ini membahas tentang operasi matematika sederhana dalam VB.NET

ada perkalian dengan simbol "*"
ada pembagian dengan simbol "/"
ada pengurangan dengan simbol "-"
ada pertambahan dengan simbol "+"

untuk lebih jelasnya mari kita coba membuat program sederhana dengan operasi matematika ini :D

Seperti biasanya buka dahulu VB.NET(disini saya menggunakan versi express)

Pilih File->New Project->beri nama "Operasi Matematika"->Windows Forms Application->Click Ok

Tampilan akan sebagai berikut :

Di bagian toolbox tambahkan 1 button
Click 2 kali button tersebut untuk mulai kita coding

masukan coding sebagai berikut :

Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim x As Integer Dim y As Integer x = 9 y = 10 MessageBox.Show(x * y) MessageBox.Show(x + y) End Sub End Class


Untuk menjalankannya tekan F5

Pesan yang muncul pertama adalah 90 kemudian 19
Silakan dimodifikasi sendiri untuk pengurangan atau pembagian

Selamat mencoba ^_^
-----------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Read more »

Membuat InputBox di VB.NET

Ini Tutorial ke-dua ,hari ini kita akan membuat program sederhana yaitu program input box

seperti biasa buka VB.NET

Buat Project baru dengan cara : File->New Project->beri nama "Program ke-dua saya"->pilih Windows Forms Application->OK

tampilan akan seperti berikut :

 

Di bagian Toolbox sebelah kanan atas,tambahkan satu button,beri nama button tersebut "buka aku" dengan cara dibagian properties "Text" lalu beri nama.

Click 2 kali Button tersebut dan masukan coding sebagai berikut :

Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim x As String 'membuat x sebagai variable String x = InputBox("Masukan kata : vbnetsite.blogspot.com", "Masuk") 'bagian dimana inputbox dibuat If x = "vbnetsite.blogspot.com" Then 'bila memasukan vbnetsite.blogspot.com MessageBox.Show("Success") 'pesan muncul success System.Diagnostics.Process.Start("http://vbnetsite.blogspot.com") 'membuka laman http://vbnetsite.blogspot.com Else MessageBox.Show("It's Wrong") 'pesan muncul jika salah memasukan site tersebut End If End Sub End Class 



 Untuk menjalankan program tersebut tekan F5

Jika Anda masih bingung silakan KOMENTAR di bawah :)
-----------------------------------------------------------------------------------------------------------------------
sumber : http://vbnetsite.blogspot.com

Read more »

Program pertama Hello World

Ini posting pertama saya,saya ingin berbagi cara membuat pesan Hello World di vb.net langsung saja :

Pertama buka vb.net anda seperti ini

Pilih File->New Project->Windows Form Application->Ok
Jangan lupa diberi nama : Hello World

Tampilan Project :

Pada bagian Toolbox cari "Button"

Click 2kali(posisi button langsung di tengah form) atau dengan cara click sekali saja buttonnya di bagian toolbox kemudian click sekali ke Form1 teserah posisinya dimana.

Click button di Form1 2kali

masukan coding sebagai berikut :

MessageBox.Show("Hello World")


tekan F5 untuk menjalankan program tersebut

Bagi Anda yang belum mempunyai Visual Basic.Net anda dapat mendownloadnya secara gratis versi express disini
Catatan : Penulis menggunakan Visual Basic 2010 versi Express


------------------------------------------------------------------------------------------------------------------------
 SUMBER : http://vbnetsite.blogspot.com

Read more »

Pengenalan QBASIC

Pengertian QBASIC

Qbasic adalah salah satu bahasa pemrograman yang menggunakan bahasa basic, Qbasic sendiri singkatan dari Quick Basic yang merupakan salah satu produk Microsoft Qbasic yang cukup baik untuk belajar dasar pemrograman.

 Tipe data pada Qbasic :
Tipe data numerik integer
Tipe Ukuran memory jangkauan nilai
Byte 1 byte 0 .. 255
Shortint 1 byte -128 .. 127
Integer 2 byte -32768 .. 32767
Word 2 byte 0 .. 65535
Longint 4 byte -2147483648

Tipe data numerik real
Tipe konstanta numerik real berkisar dari 1E-38 sampai dengan 1E+38, nilai numerik
real menempati memory sebesar 6 byte.

Tipe data karakter
Nilai karakter berupa sebuah karakter yang ditulis diantara tanda petik tunggal.

Tipe data string
Berupa kumpulan beberapa karakter yang terletak diantara tanda petik tunggal.

Tipe data boolean.
Tipe data ini mempunyai dua nilai yaitu true & false.

STATEMEN KONDISI

- Goto (kondisi tak bersyarat),seperti telah dijelaskan diatas

- if then + goto (kondisi bersyarat, hanya satu syarat)

- if then + else (kondisi bersyarat dengan 2 atau lebih syarat

- select case : menyeleksi atau mengeksekusi kondisi yang ditest

STATEMEN PERULANGAN

- For .. next

Mengulangi suatu perintah / instruksi dalam jumlah yang telah ditentukan, serta besar kenaikannya.

- Do while … loop

Mengulangi perintah selama suatu kondisi memenuhi syarat (true) dan berhenti bila tidak lagi memenuh syarat (false)

- Do until … loop

mengulangi instruksi selama kondisi tidak memenuhi syarat (false) dan berhenti bila kondisi memenuhi syarat (true)

- While … wend

sama dengan do while … loop tetapi bentuk penulisannya hanya satu dan tidak memiliki perintah exit untuk menghentikan proses yang berulang sebelum berakhir

-----------------------------------------------------------------------------------------------------

contoh progam basic input data atau memasukkan data :

‘program input data’

Cls

INPUT “masukan nama anda” ; nama$

INPUT “masukan npm anda” ; npm$

PRINT “nama anda anda adalah” ; nama$

PRINT “npm anda adalah” ; npm$

END

Lalu buat program basic yang untuk case yang kedua

Contoh program basic untuk menentukan bilangan ganjil atau genap:

‘program latihan basic’

CLS

PRINT “program untuk menentukan suatu bilangan ganjil atau genap”

PRINT “===========================================”

INPUT “masukan bilangan”; a

B= a MOD 2

IF B=0 THEN 5 ELSE 10

5 PRINT a; “adalah bilangan genap”

GOTO 20

10 PRINT a; “adalah bilangan ganjil”

20 END

-----------------------------------------------------------------------------------------------------

sekian untuk Pengenalan QBASIC pada hari ini, semoga makin bertambah pengetahuan kalian.

untuk mengetahui lebih dasar tentang QBASIC klik disini => ceckidot

Read more »

Dasar Bahasa Program (QUICK BASIC)

Quick Basic Buat Pemula Yang Mau Belajar

      Sobat, yang lagi pengen belajar dasar-dasar Quick Basic atau QBasic, di atas adalah contoh tampilan Program Quick basic.. Kali ini Saya ingin share buat temen-temen belajar Quick Basic untuk pemula, jujur saya sendiri  juga masih pemula.. Dan disini saya hanya berbagi sedikit pengetahuan saya kepada kalian. Dengan belajar dan bertanya kita bisa jadi lebih tau dan mengerti banyak hal tentang IT. Betul Khan..!

ok kita mulai  dari tahap awal :

Sebelum kita belajar buat program sederhana dari Quick basic kita harus tau bagian-bagian dari Quick Basic itu sendri..Kan kalau ga kenal maka tak sayang, tak sayang maka tak cinta, tak cinta maka tak nikah, tak nikah maka tak punya anak wkwkwk [LOH] kok jadi kesitu yaa?

hehe maaf, khilaf abang dek :D 

Ok ceckidot!

Menu Pada Aplikasi Quick Basic yaitu:

1. File, pada menu ini kita dapat membuat lembar kerja baru,membuka program yang masih dalam format bas  bukan exe, buat simpan program,mencetak, dan keluar atau selesai dari aplikasi Quick Basic..lanjut
2. Edit, pada meni edit kita dapat menyalin/copy, memindahkan/cut koding atau syntac pada aplikasi Quick basic.
3. View, pada menu ini ya namanya view pasti gunanya untuk penglihatan,dan juga kita bisa melihat sub program kita.
4. Search, pada menu ini kita dapat mencari koding yang sangad membantu kita bila koding kita sulit untuk dicari koding apa yang kita cari.
5. Run, pada menu ini untuk menjalankan atau mencoba program anda..
6. Options, Menu ini memuat tentang display, dan juga menampilkan menu yang hilang.

Setelah Belajar dan Tau Menu pada Quick basic..Langsung aja lanjut ke pembuatan program sederhana..karena mulai dari kesederhanaan kita bisa lebih berjuang.

Contoh Program Menghitung Luas Persegi Panjang

Syantac atau koding seperti dibawah ini:

 Penjelasannya :
 - Dim =itu deklarasi
 - Luas,panjang,lebar merupakan variabel [variabel tidak harus di buat objek.a, namu bisa juga 
                                                                      dibuat dengan huruf yang mewakilinya saja. 
                                                                      comtoh : a,b,c,d. dll]
 - As integer = itu berati variabel panjang,luas,dan lebar menggunakan angka yang akan kita input,
                          masukan proses dan output.
 - Print = merupakan perintah untuk mencetak,misalnya mencetak text "program menghitung luas
                 persegi panjang".
 - luas = panjang*lebar ( merupakan proses  untuk menghasilkan output )
 - output ( hasil akhir dari data yang di inpput dan di proses oleh rumus )

Nah ini dia setelah prgram dijalankan Tekan F5

  Akhirnya kamu bisa buat 1 program deh..mayan sebagai pemblajaran Quick basic
  Sedikit demi sedikit lama"jadi gunung kan...
  Udah Dulu ntar kalo ada ilmu komputer baru saya share lagi.. (^_^)

Mengetahui  type data pada program Quick Basic => ceckidot

Read more »