Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como determinar a contagem de páginas para diálogo de impressão em VB.NET
Determinar a contagem de página para um controle " PrintDialog " em seu aplicativo Visual Basic.NET pode ser facilmente conseguido usando algumas propriedades. A classe " PrintDialog " permite aos usuários selecionar uma impressora e escolher quais seções do documento para imprimir a partir de um aplicativo do Windows Forms. Receba as configurações da impressora , utilizando a propriedade " PrinterSettings " . Você pode determinar o número de páginas para o número de cópias , ou o mínimo e contagem máxima de páginas , usando a mesma propriedade. Coisas que você precisa
Microsoft Visual Studio
Show Mais instruções
1

Abra o Microsoft Visual Studio , clique em " New Project" no painel esquerdo da tela do computador , e expandir " Visual Basic" abaixo " modelos instalados ". Clique em " Windows" e clique duas vezes no centro da janela de diálogo para criar um novo projeto "Windows Forms Application " .
2

Clique duas vezes em "Button" no painel "Toolbox " para adicionar um novo botão ao seu formulário. Direito do mouse no formulário e clique em "View Code " para abrir um módulo de código
3

Adicione a seguinte linha de código para criar uma variável global para este ficheiro: .

WithEvents privados docToPrint as New Printing.PrintDocument
4

Copie e cole o seguinte código para criar um novo evento clique:

Private Sub Button1_Click (sender System.Object , _

ByVal e As System.EventArgs ) Handles Button1.Click
5

Copiar e colar o seguinte código para determinar o número de páginas a partir do controle " PrintDialog1 " :

PrintDialog1.AllowSomePages = True

Dim minPage = PrintDialog1.PrinterSettings.MinimumPage

Dim maxPage = PrintDialog1.PrinterSettings.MaximumPage

Dim pageCnt = PrintDialog1.PrinterSettings.Copies

MessageBox.Show (" página Min :" & _ minPage

& " página Max :" & _ maxPage

& "Num dos exemplares :" & pageCnt ) < br >

PrintDialog1.ShowHelp = True

PrintDialog1.Document = docToPrint

Dim result As DialogResult = PrintDialog1.ShowDialog ()

Se ( resultado = DialogResult.OK ) Então

docToPrint.Print ()

End If End Sub


6

Pressione " F5" para executar o programa e clique em " Button1 "para exibir uma caixa de mensagem com a página min, max página eo número de cópias a serem impressas.

Anterior :

Próximo : No
  Os artigos relacionados
·Tutorial Visual Basic em Sentença Espaço 
·Como desbloquear um Script Conta 
·Inteiros long double em Visual Basic 
·Como importar VBScript no VB Express 
·Como fazer um atalho para um frasco em VBS 
·Como Ler Porta até que um caractere especial é passad…
·Como obter uma resposta de uma caixa de mensagem em VB.…
·Ferramentas VB6 
·Substring Funções em VBS 
·Como receber o sinal de saída em VB6 usando uma porta …
  Artigos em destaque
·Como executar o PHP em Perl 
·Como usar um cliente de serviços Web 
·Como encontrar mínimos Algoritmos Genéticos 
·Como limitar a quantidade de caracteres em uma String e…
·Como escrever um programa em C que irá ler em um arqui…
·Função VB6 Temporizador 
·O que são leves de layout e Linguagens de marcação 
·O que é uma assinatura Compilado 
·Como não efetuar login no XP com uma senha 
·Como Fazer Bookmark Sistemas em PHP e MySQL 
Cop e direita © Conhecimento computador https://ptcomputador.com Todos os Direitos Reservados