Parte da programação de uma aplicação desktop está dando aos usuários a capacidade de imprimir . Antes que os usuários imprimir um documento, você pode querer listar todas as impressoras disponíveis configurados na máquina. Isso dá aos usuários a capacidade de escolher onde eles podem imprimir o documento. Você pode obter uma lista de impressoras configuradas usando o Visual Basic (VB) objeto " Impressora". O objeto Printer mantém uma lista de impressoras , de modo que você pode percorrer e exibir cada um. Instruções
1
Criar uma variável inteira e atribuir-lhe a contagem total das impressoras . Isto é necessário para que você saiba quantas vezes para percorrer o objeto Printer . O código para criar uma variável VB está abaixo: Dim i como Integeri = Printer.Count
2
Display " Nenhuma impressora configurado" se o usuário não tem dispositivos instalados. Este é um método de verificação de erro para evitar a exibição nada para o utilizador . Se a variável i criada na Etapa 1 é zero, então você sabe que há impressoras são configuradas. O código a seguir informa ao usuário que não há impressoras instaladas : Se i = 0 ThenMsgBox "Nenhum impressoras instaladas " End If
3
loop através do objeto da impressora e adicione a lista de impressoras a um controle de caixa de listagem . Isto dá ao usuário a possibilidade de clicar em uma impressora. O código para exibir cada impressora está abaixo: Dim j como IntegerFor j = 0 para i - 1listbox1.AddItem Impressoras ( j) DeviceNameLoop
4
Salve o novo código e pressione a tecla "F5" . . A tecla " F5" executa o aplicativo no depurador e permite que você verifique o novo código. Quando é executado , você vê cada impressora listado no controle de caixa lista.