Как создать электронный учебник - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.8 из 5
Похожие ответы