Visual Basic (VB) contém um objeto interno chamado de " caixa de diálogo comum . " Esta janela fornece aos usuários um "Save" diálogo onde se pode nomear e salvar um arquivo no disco rígido. O objeto de diálogo é jogado em um formulário do Windows com uma caixa de texto eo botão "Browse" . Os usuários escolhem um local e um nome de arquivo, ele salvou a esta caixa de texto e , em seguida, para o disco rígido . Você pode colocar esse objeto em seu formulário do Windows para fornecer uma maneira rápida para salvar os arquivos em seu código. Instruções
1

Criar um novo objeto de caixa de diálogo . Qualquer objeto que você usa na linguagem VB primeiro precisa de uma definição e atribuição a uma variável . O código a seguir cria o objeto VB:

Dim diálogo Como CommonDialog
2

Defina as propriedades da janela de diálogo. A primeira propriedade define o texto visto na parte superior da janela de diálogo . O segundo filtra os tipos de extensões de arquivos permitidos. Por exemplo , se seu aplicativo só permite aos usuários salvar como um arquivo de texto , o filtro permite apenas "*. Txt" na caixa " Salvar como tipo" drop-down . O código a seguir define o seu VB "salvar" propriedades:

dialog.DialogTitle = " Salve o arquivo " dialog.Filter = " arquivo de texto (* txt . ) "
3

Mostrar caixa de diálogo ao usuário. A caixa de diálogo está configurado, mas não é visível para o usuário até que você exibi-lo manualmente. O código a seguir mostra a janela para o usuário :

dialog.ShowSave

A caixa de diálogo é aberta usando este código , e quando o usuário clica em " Salvar ", o arquivo é salvo no disco rígido .
4

mostrar uma caixa de mensagem, se houve um erro ou o usuário cancela o perigo. O código a seguir exibe um alerta se a função de salvar falha:

Se Err ThenMsgbox "Houve um erro ao salvar o arquivo " End If