VB .NET - Usando o controle FolderBrowserDialog
 |
Ocasionalmente você tem que permitir em suas aplicações que o usuário possa selecionar diretórios para realizar uma operação de backup, ou para salvar um arquivo temporário ou mesmo para armazenar algum arquivo de dados. |
O VB .NET possui um controle que se encaixa perfeitamente neste perfil. O controle FolderBrowserDialog permite abrir um janela de diálogo exibindo diretórios que podem ser selecionados pelo usuário. O controle não exibe arquivos , somente diretórios.
As principais propriedades do controle FolderBrowserDialog são:
| Propriedade | Descrição |
| Description | Fornece uma mensagem de descrição na caixa de diálogo |
| RootFolder | Indica o diretório raiz a partir da onde a caixa de diálogo começará a exibição dos demais diretórios. |
| SelectedPath | Indica a pasta selecionada pelo usuário |
| ShowNewFolderButton | Informa se o botão - Criar Nova Pasta - será exibido na caixa de diálogo |
| ShowDialog | Exibe a caixa de diálogo |
Vamos mostrar um exemplo prático de como usar este controle. Inicie um novo projeto no VB .NET do tipo Windows Application dando o nome folderBrowserDialogAppNet ao projeto.
No formulário padrão inclua os controles Label , Button, TextBox e FolderBrowserDialog conforme o leiaute da figura a seguir:
 |
Controles Usados: Label1 TextBox - txtPastas Button - btnProcurar FolderBrowserDialog = fbd1 |
A seguir no evento Click do botão de comando Procurar insira o seguinte código:
|
Private
Sub
btnProcurar_Click(ByVal
sender As System.Object,
ByVal e
As System.EventArgs)
Handles
btnProcurar.Click 'Define as propriedades do controle FolderBrowserDialog fbd1.Description =
"Selecione uma
pasta para realizar o Backup" If fbd1.ShowDialog = Windows.Forms.DialogResult.OK Then 'Exibe a pasta selecionada txtPastas.Text = fbd1.SelectedPath End If End Sub |
No código acima antes de exibir a caixa de diálogo para os diretórios, estamos definindo algumas propriedades básicas para o controle FolderBrowserDialog.
O diretório raiz usa a constante MyComputer a qual exibe todos os drivers do seu computador.
A propriedade ShowNewFolderButton definida como True irá exibir na caixa de diálogo o botão Criar Nova Pasta.
Ao executar o projeto quando o usuário clicar no botão Procurar teremos o seguinte resultado:
Embora seja muito simples de usar e fácil de configurar o controle FolderBrowserDialog pode ser muito útil em certas ocasiões.
Até breve...
|
Veja os
Destaques e novidades do SUPER DVD Visual Basic (sempre atualizado) : clique
e confira !
Quer migrar para o VB .NET ?
Quer aprender C# ??
Quer aprender os conceitos da Programação Orientada a objetos ? Quer aprender o gerar relatórios com o ReportViewer no VS 2013 ? Quer aprender a criar aplicações Web Dinâmicas usando a ASP .NET MVC 5 ? |
Gostou ? 
Compartilhe no Facebook
Compartilhe no Twitter
Referências: