Страница: 1 |
добавь кнопку и текстбокс, а ещё common dialog (принтер можно было выбирать) ... Private Sub Command1_Click() Большой сенкс за помощ, чуть попозже приду, проверю! P.S. А насчёт очень даже за ! Страница: 1 |
Вопрос: Печать
Добавлено: 10.04.03 22:18
Автор вопроса: ZoomerSD | ICQ: 148640473
Тут такой вопроск возник, как мне распечатать данные из текст бокса, помогите пожалуйста
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Gravity
Вопросов: 6
Ответов: 120
Профиль | | #1
Добавлено: 10.04.03 23:35
CD1.ShowPrinter
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Printer.Print " "
Text1.SelPrint (Printer.hDC)
On Error GoTo 10
Printer.EndDoc
10
End Sub
Номер ответа: 2
Автор ответа:
ZoomerSD
ICQ: 148640473
Вопросов: 135
Ответов: 270
Профиль | | #2
Добавлено: 11.04.03 08:20