|
|
Postada em 20/02/2006 10:09 hs
Analista, troca Combo1 pelo nome do seu ComboBox...
Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net
e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
 "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
|
|
|
|
|
Postada em 20/02/2006 11:54 hs
Caro Alfterra.. Fiz um teste com o código que vc me passou, e deu erro no form_Load(), logo na linha: .Combo1.Clear Dá o seguinte erro: Invalid or unqualifiend reference Help.. estou necessitando urgente de fazer isso.. mas como? Até mais.. Desde já agradeço Luciano. |
|
|
|
|
|
Postada em 20/02/2006 13:29 hs
analista, mesmo vc nao respondendo as indagações postei na area de transferencia de arquivos/vb com nome: "sel ecionar_Printer.zip" um exemplinho que tinha aki antes de zipar testei e tava tudo bala.... |
|
|
|
|
|
Postada em 20/02/2006 15:00 hs
Logo abaixo da linha Dim i as Printer digite
With Me
Private Sub Form_Load()
'carrega impressoras no combo
Dim i As Printer
With Me
.Combo1.Clear
For Each i In Printers
.Combo1.AddItem i.DeviceName
Next i
.Combo1.Text = Printer.DeviceName
.LblPorta.Caption = Printer.Port
.LblDriver.Caption = Printer.DriverName
170 End With
End Sub
|
|
|
|
Alfterra
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 20/02/2006 15:25 hs
Marcelo cuidado com o plágio, até o 170 kkkkkkkkkkkkk |
|
|
|
MARCELO
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 20/02/2006 16:24 hs
Não se trata de plágio, Alfterra. É que na dica que você deu está faltando o With Me e provavelmente essa é a razão do erro. Eu copiei o seu exemplo e alertei pro erro. Só isso!!!! Um abraço |
|
|
|
