Как создать электронный учебник - VB
Формулировка задачи:
всем привет!!! Такая проблема задали сделать "программу учебник" и у меня возник вопрос как сделать так чтобы при нажатии на кнопку у меня в этом же окне выводился текст и его можно было прокручивать?Это надо как то из файла выводить или ещё что!!!подскажите пожалуйста или дайте материал или пример!
Решение задачи: «Как создать электронный учебник»
textual
Листинг программы
Dim wrdApp As Word.Application Private Sub Form_Load() Set wrdApp = New Word.Application End Sub Private Sub Command2_Click() ' ' записать текст из Rich Textbox в буфер обмена Clipboard.SetText RichTextBox1.TextRTF, vbCFRTF ' записать в текст в Word With wrdApp .Documents.Add ' новый документ .Selection.Paste ' вставить ' запомнить файл .ActiveDocument.SaveAs App.Path & "\RTFDOC2.doc", wdFormatDocument .Visible = True .Activate ' сделать документ активным и видимым End With End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д