IMPRIMIR NA TELA

SANTANANETO 07/06/2004 05:39:27
#28404
Como faxo para imprimir na Tela
USUARIO.EXCLUIDOS 07/06/2004 06:08:39
#28406 Resposta escolhida
Para imprimir o que em que parte da tela?
Se for para escrever um texto (ou imprimí-lo) no form use o método Print.

Outras informações:
TextWidth : Método. Verifica o tamanho (horizontal) da string.
TextHeight: Método. Verifica o tamanho (verticall) da string.
CurrentX: Propriedade. Define a posição horizontal (left) onde a string vai ser impressa.
CurrentY: Propriedade. Define a posição vertical (top) onde a string vai ser impressa.

Exemplo:
Private Sub Form_Paint()
Dim i As Integer, y As Integer
For i = 0 To Me.ScaleWidth Step Me.TextWidth("Oi mundo! ")
    For y = 0 To Me.ScaleHeight Step Me.TextHeight("Oi mundo! ")
        Me.CurrentX = i
        Me.CurrentY = y
        Me.Print "Oi mundo! "
    Next
Next
End Sub

Nesse exemplo eu uso os métodos e propriedades relatados a cima para escrever "Oi mundo! " em toda a tela.
Tópico encerrado , respostas não são mais permitidas
Voltar