DEFINIR O TAMANHO DO PAPEL NA IMPRESSAO USADO VB.N
Definir o tamanho do papel na impressao usado vb.nt, alguem poderia me ajudar com este problema.
agradeço desde ja.
agradeço desde ja.
enconteri este codigo num forum e o que eu preciso, mas nao consegui fazer funcionar alguem poderia me ajudar com ele.
comboPaperSize.DisplayMember = [Ô]PaperName[Ô]
Dim pkSize As PaperSize
For i = 0 to printDoc.PrinterSettings.PaperSizes.Count - 1
pkSize = printDoc.PrinterSettings.PaperSizes.Item(i)
comboPaperSize.Items.Add(pkSize)
Next
[ô] Create a PaperSize and specify the custom paper size through the constructor and add to combobox.
Dim pkCustomSize1 As New PaperSize([Ô]Custom Paper Size[Ô], 100, 200)
comboPaperSize.Items.Add(pkCustomSize1)
comboPaperSize.DisplayMember = [Ô]PaperName[Ô]
Dim pkSize As PaperSize
For i = 0 to printDoc.PrinterSettings.PaperSizes.Count - 1
pkSize = printDoc.PrinterSettings.PaperSizes.Item(i)
comboPaperSize.Items.Add(pkSize)
Next
[ô] Create a PaperSize and specify the custom paper size through the constructor and add to combobox.
Dim pkCustomSize1 As New PaperSize([Ô]Custom Paper Size[Ô], 100, 200)
comboPaperSize.Items.Add(pkCustomSize1)
Qual o Erro?
Error 1 [ô]PaperSize[ô] is ambiguous, imported from the namespaces or types [ô]System.Drawing.Printing, CrystalDecisions.Shared[ô]. E:\SISTEMA NET\RUBI\Transystem\Transystem\ClsRel.vb 90 23 Transystem
ja resolvi e so retirar imports CrystalDecisions.Shared do projeto
Acredito que a classe PaperSize tá definida em mais de um namespace ....
Então experimenta usar o caminho completo
Dim pkCustomSize1 As New System.Drawing.Printing.PaperSize([Ô]Custom Paper Size[Ô], 100, 200)
Então experimenta usar o caminho completo
Dim pkCustomSize1 As New System.Drawing.Printing.PaperSize([Ô]Custom Paper Size[Ô], 100, 200)
Tópico encerrado , respostas não são mais permitidas