Nombres de constantes
Publicado por Genaro (31 intervenciones) el 12/11/2002 23:07:04
Hola amigos!
Tengo un problemita y no he podido solucionarlo.
Con las siguientes instrucciones yo listo los tipos de
tamaño de papel disponibles.
Private Sub Command1_Click()
On Error GoTo recal
List1.Clear
For mi = 1 To 256
Printer.PaperSize = mi
If Printer.PaperSize = mi Then List1.AddItem
Printer.PaperSize
Next
Exit Sub
recal:
Resume Next
End Sub
Esto me saca una lista con números enteros. Bien, lo que
necesito es saber el nombre de esa constante.
Alguien sabe que me pueda ayudar?
Tengo un problemita y no he podido solucionarlo.
Con las siguientes instrucciones yo listo los tipos de
tamaño de papel disponibles.
Private Sub Command1_Click()
On Error GoTo recal
List1.Clear
For mi = 1 To 256
Printer.PaperSize = mi
If Printer.PaperSize = mi Then List1.AddItem
Printer.PaperSize
Next
Exit Sub
recal:
Resume Next
End Sub
Esto me saca una lista con números enteros. Bien, lo que
necesito es saber el nombre de esa constante.
Alguien sabe que me pueda ayudar?
Valora esta pregunta
0