Ayuda con impresion

[XYON126]

Hola buenos dias!

Necesito vuestra ayuda, estoy intentando comprender y hacer funcionar el comado Printer para imprimir cualquier elemento pero siempre me surge el mismo problema "Error '424' en tiempo de ejecución: Se requiere un objeto", el problema principal es que he visto, me han dejado muchos codigos de impresión pero aparentemente al principio lo veo claro pero cuando quiero aplicar algo tan simple como esto:

Código vb:

Private Sub Command1_Click()
 
Printer.FontSize = 18
Printer.CurrentY = 40
Printer.CurrentX = 40
Printer.Print combo.Text
Printer.EndDoc
 
End Sub
 

me da el error antes comentado ya sea combo.Text, combo.Caption,MSFlexGrid.Text, MSFlexGrid.Caption, Label.Text, Label.Caption,etc. quizas lo que realizo es una varbaridad pero si esto tan simple no me sale como puedo comprender el Printer en profundidad, ¿Como funciona realmente?

Un saludo

[pkj]

Me parece que el fallo está en que no pones el número del combo (Combo1)

Yo he probado así y funciona:

Private Sub Command1_Click()

Printer.FontSize = 18
Printer.CurrentY = 40
Printer.CurrentX = 40
Printer.Print Combo1.Text
Printer.EndDoc

End Sub

Saludos

[XYON126]

Hola pkj!

Gracias por tu respuesta pero el problema mio es que mi combo y mi msflexgrid de prueba se llaman asi, he hay donde me sorprende y me pierdo.¿Es posible a que sea debido el error el estar un boton dentro de otro boton? Por otro lado he probado el mismo codigo en un boton directo y el combo.Text me lo imprime pero en cambio el MSFlexGrid.Text no ¿El printer no imprime lo que se visualiza en el elemento que le dices (MSFlexGrid.Text,combo.Text, combo.Caption) o solo a algunos especificos, ¿Cuales y porque?.

Un saludo