Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
АББА
133 / 60 / 24
Регистрация: 08.11.2012
Сообщений: 250
1

Как подготовить документ к печати

22.02.2013, 13:25. Просмотров 805. Ответов 4
Метки нет (Все метки)

Есть RichTextBox и надо его программно форматировать (ну как в ворде, только без ворда) и потом печатать в формате A4. (иными словами создать отчёт и печать)
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.02.2013, 13:25
Ответы с готовыми решениями:

Как дозаписывать данные в открытый документ Excel
Подскажите как дозаписывать в открытый документ Excel. т.е. создается новый документ .xslx...

Как создать документ Visio из ASP.NET
Извините, если вопрос глупый... ASP.NET практически не знаю. Нужно создавать (или редактировать)...

Как правильно сохранить документ Excel с именем?
Privet. podskajitje pojalusta xochu zdelat inport exel file Set oConnExcel =...

Как WebBrouser'ом открыть html документ, хранящийся в ресурсах
Нужно показывать локальный документ, т.е. не лезть в интернет за страницей, в текстбокс или лабел...

Как открыть сторонний документ, причем, на определенной странице
Помогите, пожалуйста, сделать ссылку на страницу в документе ВОРД или ПДФ из программы. Мне...

4
olusik27
90 / 20 / 2
Регистрация: 28.02.2011
Сообщений: 54
22.02.2013, 15:50 2
По поводу печати, попробуй: http://msdn.microsoft.com/ru-ru/library/7d29f66t%28v=vs.90%29.aspx
Форматирование: придется все ручками прописывать. Основное форматирование (источник: С.Н.Лукин "О Visual Basic.NET. Самоучитель):

vb.net
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        RTB.HideSelection = False        'Чтобы выделение не снималось с фрагмента при уходе фокуса с поля      
End Sub
 
Private Sub Открыть_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Открыть.Click
        OpenFileDialog1.Filter = "RTF-файлы|*.RTF"
        If OpenFileDialog1.ShowDialog() = DialogResult.Cancel Then Exit Sub
        Dim Файл As String = OpenFileDialog1.FileName
        RTB.LoadFile(Файл)
End Sub
 
Private Sub Сохран_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Сохран.Click
        SaveFileDialog1.Filter = "RTF-файлы|*.RTF"
        If SaveFileDialog1.ShowDialog() = DialogResult.Cancel Then Exit Sub
        Dim Файл As String = SaveFileDialog1.FileName
        RTB.SaveFile(Файл)
End Sub
 
Private Sub Настр_шр(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Настр_шр.Click
        FontDialog1.ShowColor = True    'Предоставить возможность выбирать цвет шрифта
        FontDialog1.ShowDialog()            'Показать диалоговое окно настройки  шрифта
        'Присвоить выделенному фрагменту  шрифт, выбранный в диалоговом окне:
        RTB.SelectionFont = FontDialog1.Font
        'Присвоить выделенному фрагменту цвет шрифта, выбранный  в диалоговом окне:
        RTB.SelectionColor = FontDialog1.Color
End Sub
 
Private Sub Налево_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Налево.Click
        RTB.SelectionAlignment = HorizontalAlignment.Left
End Sub
 
Private Sub По_центру(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles По_центру.Click
        RTB.SelectionAlignment = HorizontalAlignment.Center
End Sub
 
Private Sub Направо_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Направо.Click
        RTB.SelectionAlignment = HorizontalAlignment.Right
End Sub
 
Private Sub Поставить(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Поставить.Click
        RTB.SelectionBullet = True
End Sub
 
Private Sub Снять_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Снять.Click
        RTB.SelectionBullet = False
End Sub
 
Private Sub NumericUpDown1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)  _
Handles NumericUpDown1.ValueChanged
        RTB.ZoomFactor = NumericUpDown1.Value
End Sub
1
Release
Заблокирован
22.02.2013, 20:37 3
olusik27, Используйте специальный теги для вставки кода. Конкретно для VB.NET - вот :
0
Миниатюры
Как подготовить документ к печати  
АББА
133 / 60 / 24
Регистрация: 08.11.2012
Сообщений: 250
23.02.2013, 08:31  [ТС] 4
а как вставлять рисунки в указанном позиции
0
dev.Free
Заблокирован
25.02.2013, 11:50 5
Цитата Сообщение от АББА Посмотреть сообщение
программно форматировать (ну как в ворде
olusik27, А ваше решение ни как не влияет на вопрос ТС.
0
25.02.2013, 11:50
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.02.2013, 11:50

Как передать фокус мастеру по печати фото, запущенному из своей программы
Здравствуйте, возник у меня вопрос (в заголовке) Делаю так: Shell("regsvr32 /s " & Chr(34)...

Как отправить на печать документ так, чтоб при этом не всплывало предупреждение, что документ выходит за границы печати?
Как отправить на печать документ так, чтоб при этом не всплывало предупреждение, что документ...

Подготовить новый файл для печати чисел исходного в две колонки
Помогите пожалуйста с программой: Дан текстовый файл f, содержащий целые числа от 1 до 100....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru