Tutorial Belajar VB.Net : cara penggunaan Common Dialog Control, dialog boxes pada Vb.Net khusu Pemula, tutorial vb.net selengkapnya di blog sector code
Tutorial Vb.Net - Dalam pemrograman berbasis GUI, kita mengenal banyak sekali kotak dialog yang yang digunakan untuk berbagai tugas seperti membuka dan menyimpan file, untuk mencetak suatu halaman, memberikan pilihan warna, font, Jendela setup, dll, dalam sebuah aplikasi. Dialog Box akan berguna bagi pengguna dan memudahkan pengguna untuk memahami kesalahan atau perintah.
Dari sekian banyak dialog box, Semua itu memiliki kontrol class yang diwarisi dari class CommonDialog untuk box dialog tertentu.
Untuk Metode ShowDialog digunakan untuk menampilkan semua kontrol dialog box pada saat aplikasi run-time. Akan Menjalankan nilai tipe DialogResult enumeration. Berikut Nilai-nilai DialogResult enumeration :
Share jika bermanfaat ya, terima kasih
Tutorial Visual basic khusus pemula lainnya :
- Tutorial Vb.Net : Penggunaan Arrays di Vb.Net Lengkap
- CRUD VB.Net (Create,Read,Update, Delete) Database Ms Access
- Belajar Vb.Net : Looping Statement Vb.Net Lengkap
Dari sekian banyak dialog box, Semua itu memiliki kontrol class yang diwarisi dari class CommonDialog untuk box dialog tertentu.
Untuk Metode ShowDialog digunakan untuk menampilkan semua kontrol dialog box pada saat aplikasi run-time. Akan Menjalankan nilai tipe DialogResult enumeration. Berikut Nilai-nilai DialogResult enumeration :
DialogResult
|
Description
|
Abort
|
Menjalankan nilai DialogResult.Abort, ketika
pengguna mengklik tombol Abort
|
Cancel
|
Menjalankan DialogResult.Cancel, ketika pengguna mengklik tombol
Batal
|
Ignore
|
Menjalankan DialogResult.Ignore, ketika pengguna
mengklik tombol Ignore
|
No
|
Menjalankan DialogResult.No, ketika pengguna mengklik tombol No
|
None
|
Tidak menjalankan apa-apa, kotak dialog berjalan
terus
|
OK
|
Menjalankan DialogResult.Ok, ketika pengguna mengklik tombol OK
|
Retry
|
Menjalankan DialogResult.Retry, ketika pengguna
mengklik tombol Retry
|
Yes
|
Menjalankan DialogResult.Yes, ketika pengguna mengklik tombol Yes
|
Penggunaan ColorDialog Control Vb.Net
buat sebuah form menggunakan visual studio kamu dan beri 1 buah button dan label, untuk percobaan kita silahkan desain seperti tampilan berikut :Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If ColorDialog1.ShowDialog <> Windows.Forms.DialogResult.Cancel Then Label1.ForeColor = ColorDialog1.Color End If End Sub End Class
Font Dialog Control dalam Vb.Net
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If FontDialog1.ShowDialog <> Windows.Forms.DialogResult.Cancel Then RichTextBox1.ForeColor = FontDialog1.Color RichTextBox1.Font = FontDialog1.Font End If End Sub End Class
Open File Dialog
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If OpenFileDialog1.ShowDialog <> Windows.Forms.DialogResult.Cancel Then PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName) End If End Sub End Class
Save Dialog
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click SaveFileDialog1.Filter = "TXT Files (*.txt*)|*.txt" If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK _ Then My.Computer.FileSystem.WriteAllText _ (SaveFileDialog1.FileName, RichTextBox1.Text, True) End If End Sub End Class
Print Dialog Control
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click PrintDialog1.Document = PrintDocument1 PrintDialog1.PrinterSettings = PrintDocument1.PrinterSettings PrintDialog1.AllowSomePages = True If PrintDialog1.ShowDialog = DialogResult.OK Then PrintDocument1.PrinterSettings = PrintDialog1.PrinterSettings PrintDocument1.Print() End If End Sub End Class
Share jika bermanfaat ya, terima kasih
COMMENTS