Usando a caixa de diálogo Imprimir
A caixa de diálogo Imprimir permite ao usuário especificar o método de impressão da saída. Os usuários podem especificar o intervalo de páginas impressas, qualidade de impressão, número de cópias, etc. Esta caixa de diálogo também exibe informações sobre as impressoras atualmente instaladas e permite ao usuário configurar ou reinstalar uma nova impressora padrão.
Observe que esta caixa de diálogo não envia dados para a impressora. Ele permite que o usuário especifique como imprimir os dados. Você deve escrever um código para imprimir os dados no formato selecionado.
Para obter mais informações sobre impressão de dados, consulte o Capítulo 12, “Trabalhando com texto e gráficos”. Em tempo de execução, após o usuário fazer uma seleção na caixa de diálogo Imprimir, as propriedades a seguir conterão informações sobre as opções do usuário.
Para exibir a caixa de diálogo Imprimir
1. Defina as configurações padrão desejadas para a caixa de diálogo definindo as propriedades apropriadas da caixa de diálogo Imprimir. Por exemplo, para exibir 2 na caixa Número de cópias quando a caixa de diálogo for exibida, defina a propriedade Cópias como 2:
CommonDialog1.Copies=2
2. Use o método ShowPRinter para exibir a caixa de diálogo "Imprimir".
Quando o usuário clica no botão de comando Command1, o código a seguir exibe a caixa de diálogo Imprimir:
PrivateSubCommand1_Click()
DimBeginPage,EndPage,NumCopies,Orientation.i
'Defina Cancelar como Verdadeiro.
CommonDialog1.CancelError = Verdadeiro
OnErrorGoToErrHandler
'Exibe a caixa de diálogo "Imprimir".
CommonDialog1.ShowPrinter
'Obtém o valor selecionado pelo usuário na caixa de diálogo.
BeginPage=CommonDialog1.FromPage
EndPage=CommonDialog1.ToPage
NumCopies=CommonDialog1.Copies
Orientação=CommonDialog1.Orientação
Fori=1toNumCópias
'Coloque aqui o código para enviar dados para a impressora.
Próximo
NxitSub
ErrHandler:
'O usuário pressionou o botão "Cancelar".
SairSub
Fim Sub
Observe que se você definir a propriedade PrinterDefault como True, poderá imprimir no objeto VisualBasicPrinter. Além disso, quando a propriedade PrinterDefault for True, todas as alterações feitas na seção "Configurações" da caixa de diálogo "Imprimir" alterarão as configurações da impressora nas configurações de "Impressora" do usuário.
Use o método ShowHelp para exibir arquivos de ajuda
Os arquivos de ajuda podem ser exibidos usando o método ShowHelp do controle CommonDialog.
Para exibir um arquivo de ajuda usando o método ShowHelp
1. Defina as propriedades HelpCommand e HelpFile.
2. Use o método ShowHelp para exibir o arquivo de ajuda especificado.
Quando o botão de comando "Command1" é clicado, o código a seguir exibe o arquivo de ajuda especificado:
PrivateSubCommand1_Click()
'Defina Cancelar como Verdadeiro.
CommonDialog1.CancelError = Verdadeiro
OnErrorGoToErrHandler
'Define a propriedade HelpCommand
CommonDialog1.HelpCommand=cdlHelpForceFile
'Especifique o arquivo de ajuda.
CommonDialog1.HelpFile=c:/Windows/Cardfile.hlp
'Mostra o mecanismo de ajuda do Windows.
CommonDialog1.ShowHelp
SairSub
ErrHandler:
'O usuário pressionou o botão "Cancelar".
SairSub
Fim Sub
Para obter mais informações sobre o arquivo de ajuda que exibe o controle de caixa de diálogo comum, consulte "Manual de referência da linguagem Visual Basic 6.0", "Propriedade HelpCommand", "Propriedade HelpFile" e "Método ShowHelp".
Usando o controle de dados
O controle de dados inerente implementa o acesso a dados usando o mecanismo de banco de dados Jet da Microsoft - o mesmo mecanismo de banco de dados usado pelo Microsoft Access. Essa tecnologia fornece aos usuários acesso contínuo a muitos formatos de banco de dados padrão e permite que os usuários criem aplicativos de reconhecimento de dados sem escrever nenhum código. Esse controle de dados inerente é mais adequado para bancos de dados menores (desktop), como bancos de dados Access e ISAM.
Você pode usar esse controle de dados integrado para criar aplicativos que exibem, editam e atualizam informações de vários bancos de dados existentes. Esses bancos de dados incluem Microsoft Access, Btrieve, dBASE, Microsoft FoxPro e Paradox. Você também pode usar esse controle para acessar o Microsoft Excel, o Lotus 1-2-3 e arquivos de texto ASCII padrão, da mesma forma que acessa um banco de dados real. Além disso, o controle Data também pode acessar e operar bancos de dados remotos de Open Database Connectivity (ODBC), como Microsoft SQL Server e Oracle.
Observe que o controle Data e o controle RemoteData estão incluídos no Visual Basic para fornecer compatibilidade com versões anteriores. Entretanto, devido à maior adaptabilidade do ActiveX Data Objects (ADO), é recomendado usar o controle ADOData para criar novos aplicativos de banco de dados. Consulte "Usando o controle ADOData" para obter detalhes.
O controle Data, o controle RemoteData e o controle ADOData são conceitualmente semelhantes: todos os três são "controles de dados" que conectam uma fonte de dados a um controle vinculado a dados. Todos os três também compartilham a mesma aparência - um conjunto de quatro botões que permitem aos usuários ir diretamente para o início do conjunto de registros, o final do conjunto de registros e rolar para frente ou para trás no conjunto de registros.
Crie um aplicativo de banco de dados simples usando o controle Data
Para criar um aplicativo de banco de dados simples usando o controle Data
1. Coloque um controle Data no formulário. O controle Dados é um controle intrínseco e, portanto, está sempre disponível.
2. Clique e selecione o controle Dados e pressione a tecla F4 para exibir a janela "Propriedades".
3. Na janela Propriedades, defina a propriedade Conexão para o tipo de banco de dados que deseja utilizar.
4. Na janela Propriedades, defina a propriedade DatabaseName como o nome do arquivo ou diretório do banco de dados ao qual deseja se conectar.
5. Na janela Propriedades, defina a propriedade RecordSource com o nome da tabela do banco de dados que você deseja acessar.
6. Coloque um controle de caixa de texto no formulário.
7. Clique e selecione o controle TextBox e defina a propriedade "Fonte de Dados" para o controle Dados em sua janela "Propriedades".
8. Na janela Propriedades, defina a propriedade Campo de Dados com o nome do campo neste banco de dados que você deseja visualizar ou modificar.
9. Repita as etapas 6, 7 e 8 para cada campo que você deseja acessar.
10. Pressione a tecla F5 para executar este aplicativo.
Definir propriedades relacionadas a dados do controle Data
As seguintes propriedades relacionadas a dados podem ser definidas em tempo de design. Esta lista fornece uma ordem lógica para definir estas propriedades:
Observe que a tecnologia de banco de dados é uma ciência complexa e as sugestões a seguir não devem ser usadas como regras.
1.RecordsetType — O atributo RecordsetType determina se o conjunto de registros é uma tabela, um conjunto dinâmico (dynaset) ou um instantâneo. Esta seleção afeta quais propriedades do conjunto de registros estão disponíveis. Por exemplo, os conjuntos de registros do tipo instantâneo têm mais restrições que os conjuntos de registros do Dynaset.
2.DefaultType — O atributo DefaultType especifica se o espaço de trabalho JET ou o espaço de trabalho ODBCDirect é usado.
3.DefaultCursorType — O atributo DefaultCursorType determina a posição do cursor. Você pode usar o driver ODBC para determinar a posição do cursor ou especificar um servidor ou cursor ODBC. A propriedade DefaultCursorType é válida somente ao usar a área de trabalho ODBCDirect.
4.Exclusivo — Determina se os dados são para um ambiente de usuário único ou para um ambiente multiusuário.
5.Opções — Este atributo determina as características do conjunto de registros. Por exemplo, em um ambiente multiusuário, você pode definir a propriedade Opções para desabilitar alterações feitas por outras pessoas.
6.BOFAction, EOFAction—Essas duas propriedades determinam o comportamento deste controle quando ele está localizado no início ou no final do cursor. As opções possíveis incluem permanecer no início ou no final, passar para o primeiro ou último registro ou adicionar um novo registro (apenas no final).
->