✓ Prosedur Function Visual Basic 2010

Prosedur Function Visual Basic 2010

Hasil gambar untuk Visual Basic wallpaper

Fungsi MsgBox - Function mirip dengan sebuah prosedur normal dengan tujuan utama dari sebuah fungsi adalah untuk menerima masukan tertentu dan mengembalikan nilai yang diteruskan ke program utama untuk menyelesaikan eksekusi.

Ada dua jenis fungsi dalam Visual Basic 2010 yaitu fungsi Built In (fungsi internal) dan fungsi-fungsi yang dibuat oleh programmer.

Daftar Fuction :

  1. MsgBox
  2. Input Box


Syntax umum dari sebuah Function adalah

FunctionName (Argumen)
Argumen merupakan nilai yang diteruskan ke fungsi. Pada sub bab ini kita akan mempelajari dua buah fungsi internal dasar Visual Basic 2010 yaitu fungsi MsgBox () dan inputBox ().
  • Fungsi MsgBox ()

Kegunaan dari sebuah MsgBox adalah untuk menampilkan message box (kotak pesan) dan meminta pengguna untuk mengklik tombol perintah sebelum mereka dapat melanjutkan.

Sintaks dari MsgBox () adalah :

yourMsg = MsgBox(Prompt, Style Value, Title)

Pada argumen pertama yaitu Prompt, akan menampilkan pesan pada message box, Style Value akan menentukan tipe dari tombol perintah yang muncul pada message box, sedangkan Title akan menampilkan judul dari kotak pesan. Tabel dibawah ini jenis dari tombol perintah yang ditampilkan pada tampilan message box :

Style Value
Nama Konstanta
Tampilan Tombol



0
vbOkOnly
Tombol OK



1
vbOKCancel
Tombol OK dan Cancel



2
vbAbortRetryIgnore
Tombol Abort, Retry, Ignore



3
vbYesNoCancel
Tombol Yes, No dan Cancel



4
vbYesNo
Tombol Yes dan No



5
vbRetryCancel
Tombol Retry dan Cancel



Kita dapat menggunakan konstanta bernama untuk bilangan bulat pada argumen kedua agar program lebih mudah dibaca. Visual Basic 2010 secara otomatis akan muncul daftar nama konstanta dan Anda dapat memilih salah satu diantaranya.

Contoh :
yourMsg = MsgBox (“Klik OK Untuk Melanjutkan”, 1, “Startup Menu”)
dan
yourMsg = Msg (“Klik OK Untuk Melanjutkan”, vbOKCancel, “Startup Menu”)

Fungsi dari kedua potongan script program diatas adalah sama. yourMsg adalah variabel yang menyimpan nilai-nilai yang dikembalikan oleh fungsi MsgBox (). Nilai-nilai tersebut ditentukan oleh jenis tombol yang diklik oleh pengguna. Nilai-nilai tersebut telah dideklarasikan sebagai tipe data Integer pada suatu prosedur.

Tabel dibawah ini menunjukkan nilai-nilai, nama konstanta dan tombol :

Nilai
Nama Konstanta
Tampilan Tombol



1
vbOK
Tombol OK



2
vbCancel
Tombol Cancel



3
vbAbort
Tombol Abort



4
vbRetry
Tombol Retry



5
vbIgnore
TombolIgnore



6
vbYes
TombolYes



7
vbNo
TombolNo




Contoh program :

     Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim testmsg As Integer

testmsg = MsgBox("Click untuk test", 1, "Test message")

If testmsg = 1 Then
MessageBox.Show("Anda telah menekan tombol
OK")

Else
MessageBox.Show("Anda telah menekan tombol
Cancel")
End If

End Sub

End Class

Buatlah project dan form baru yang terdiri dari satu buah tombol button kemudian ketiklah script program diatas. Debug atau jalankan programm diatas sehingga muncul jendela aplikasi seperti berikut.



Tampilan gambar diatas muncul ketika pertama kali program dijalankan. Pilih tombol button “Test” dan kliklah tombol tersebut sehingga muncul jendela baru seperti gambar dibawah ini.

Tampilan jendela baru diatas adalah representasi kode program baris ke tiga

testmsg = MsgBox("Click untuk test", 1, "Test mes-sage")


Script diatas berfungsi untuk memunculkan function MsgBox() yang diberi judul “Test message” dan terdapat tampilan teks “Click untuk test”. Jika tombol “OK” ditekan maka nilai variabel “testmsg” akan bernilai “1” dan bernilai “0” jika tombol “Cancel” ditekan.




Jendela di atas akan muncul jika kita menekan tombol “OK”. Tampilan jendela baru diatas adalah representasi kode program baris ke empat dan ketiga

If testmsg = 1 Then
MessageBox.Show("Anda telah menekan tombol OK")


Kode program diatas menunjukkan jika nilai variabel “testmsg” bernilai “1” maka akan memunculkan function MsgBox() yang memberi informasi “Anda telah menekan tombol OK”.

Jika tombol “Cancel” ditekan maka variabel “testmsg” akan bernilai “0” sehingga kode program berikut akan di eksekusi.

Else
MessageBox.Show("Anda telah menekan tombol Cancel")
End If

Program diatas dieksekusi karena nilai “testmsg” tidak bernilai “1” sehingga program “Else” akan dijalankan dan akan muncul function MsgBox() yang memberi informasi “Anda telah menekan tombol Cancel” seperti tampak pada gambar dibawah ini


Dan itulah Fungsi MsgBox, Next Kita bahas Input Box

Belum ada Komentar untuk "Prosedur Function Visual Basic 2010"

Posting Komentar

Komentarlah Dengan Relavant

Iklan Atas Artikel

Iklan Tengah Artikel 1

Iklan Tengah Artikel 2

Iklan Bawah Artikel