Controles de Dialogo
-
Upload
roly-manuico-flores -
Category
Documents
-
view
215 -
download
3
description
Transcript of Controles de Dialogo
Tipo Bloc De Notas:Text [*.txt]|*.txt|All Files [*.*]|*.*Tipo Imgenes: "jpeg (*.jpg,*.jpeg)|*.jpg;*.jpeg|gif (*.gif)|*.gif|bitmap (*.bmp)|*.bmp"Tipo WordPad:Documento De WordPad (*.Rtf)|*.Rtf| All files (*.*)|*.*"ABRIR IMAGEN EN PICTUREBOX
OFDAbrir.Filter = "jpeg (*.jpg,*.jpeg)|*.jpg;*.jpeg|gif (*.gif)|*.gif|bitmap (*.bmp)|*.bmp"OFDAbrir.CheckFileExists = TrueOFDAbrir.Title = "Abrir Imagen"OFDAbrir.FileName = ""OFDAbrir.ShowDialog(Me)
Try OFDAbrir.OpenFile() PictureBox1.ImageLocation = OFDAbrir.FileName PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage Catch ex As Exception OFDAbrir.FileName = Nothing End Try
COLOR DE FONDO SELECCIN
Try CDColorFondo.Color = RichTextBox1.BackColor If CDColorFondo.ShowDialog = System.Windows.Forms.DialogResult.OK Then RichTextBox1.SelectionBackColor = CDColorFondo.Color End If Catch ex As Exception End Try
COLOR DE FUENTE - SELECCIN
Try CDColorFondo.Color = RichTextBox1.BackColor If CDColorFondo.ShowDialog = System.Windows.Forms.DialogResult.OK Then RichTextBox1.SelectionColor = CDColorFondo.Color End If Catch ex As Exception End Try
TIPO DE FUENTE - SELECCIN
Try FDTipoFuente.Font = RichTextBox1.Font If FDTipoFuente.ShowDialog = System.Windows.Forms.DialogResult.OK Then RichTextBox1.SelectionFont = FDTipoFuente.Font End If Catch ex As Exception End Try