|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
 |
Título da Dica: Uso Geral do Controle RichTextBox
|
 |
|
|
|
Postada em 14/8/2000 por Webmaster
webmaster@vbweb.com.br
'Para abrir um arquivo:
CommonDialog1.ShowOpen
RichTextBox1.LoadFile (CommonDialog1.FileName)
'Para salvar um arquivo:
CommonDialog1.ShowSave
RichTextBox1.SaveFile (CommonDialog1.FileName)
'Para mudar a fonte usada (muda apenas p/ o pedaço
'de texto selecionado, ou para todo o texto que vier
'a ser digitado apartir daquele ponto):
CommonDialog1.Flags = cdlCFBoth + cdlCFEffects
CommonDialog1.ShowFont
With RichTextBox1
.SelFontName = CommonDialog1.FontName
.SelFontSize = CommonDialog1.FontSize
.SelBold = CommonDialog1.FontBold
.SelItalic = CommonDialog1.FontItalic
.SelStrikeThru = CommonDialog1.FontStrikethru
.SelUnderline = CommonDialog1.FontUnderline
End With
|
|
|
|
|
