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