VB.NET - Usando a classe TextBox
No VB.NET temos um conjunto de classes que em muito facilita a vida do programador. Tarefas que antes exigiam codificação hoje é feita apenas configurando uma propriedade ou acionando um método.
Para quem trabalha com aplicações Windows Forms , creio que o controle mais usado seja a caixa de texto ou TextBox. Pois no VB.NET este componente é uma classe com propriedades e métodos que implementa muitas funcionalidades que antes exigiria um código extra.
A primeira coisa que você deve ter em mente é que como TextBox é uma classe temos que criar uma instância da classe para acessar seus métodos e propriedades, assim podemos fazer:
Dim txt as New TextBox()
aqui txt é um objeto instanciado da classe TextBox(). A seguir a relação das principais propriedades/métodos da classe TextBox.
| txt.Text = "macoratti.net" | Atribui um texto ao controle. |
| txt.AccepsReturn = True | Permite o Return com criação de uma nova linha no componente |
| txt.AcceptsTab = True | Permite a inclusão de TAB no controle |
| txt.Clear() | Limpa o texto no controle |
| txt.ScrollBars = ScrollBars.Both | Inclui
barras verticais e horizontais no controle. Podemos ter os valores : Horinzontal, Vertical , None. |
| txt.Select(0, 4) | Seleciona texto do inicio até o quarto caractere |
| txt.SelectAll() | Seleciona todo o texto no controle |
| txt.Size = New Size(300, 500) | Define um novo tamanho para o controle |
| txt.Undo() | Desfaz a última operação de edição no controle |
| txt.TextAlign = HorizontalAlignment.Center | Faz o
alinhamento de texto no controle. Podemos ter os valores: Left e Rigth |
| txt.WordWrap = True | Permite a quebra de texto no controle. |
| txt.Cursor = Cursors.Arrow | Define o icone do mouse quando o mesmo for movido sobre o controle. Alguns valores possíveis : Cross, Hand , Help , No , etc. |
| txt.MaxLength = 10 | Define o tamanho máximo de caracteres que o controle irá suportar. |
| Dim texto As String = txt.SelectedText | Atribui a variável texto o texto selecionado no controle |
| txt.CharacterCasing =CharacterCasing.Lower | Define que
os caracteres informados no controle serão caixa baixa. Podemos ter os valores : CharacterCasing.Upper e CharacterCasing.Normal |
| txt.AllowDrop = True | Indica se o controle irá poder suporta a operação de drag do usuário. |
| txt.AppendText(vbCrLf & " macoratti") | Inclui o texto 'macoratti' no controle. |
É claro que não mencionei as propriedades visible, enable, Autosize e outros mais usados.
Até a próxima dica VB... 
José Carlos Macoratti