Текст с буфера не срабатывает из-за ошибки компиляции. - VB

Формулировка задачи:

положить текст в буфер пишу и не работает из-за ошибки компеляции(Argument not optional). Может че добавить надо.Раньше работало.

                    Листинг программы
                
Private Sub Command1_Click()
Clipboard.SetData = Text1.Text
End Sub

всавляет Text1.Text = Clipboard.GetText и удаляет Clipboard.Clear нормально

Решение задачи: «Текст с буфера не срабатывает из-за ошибки компиляции.»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub mnuCopy_Click ()
   Clipboard.Clear
   Clipboard.SetText Text1.SelText
End Sub
 
Private Sub mnuCut_Click ()
   Clipboard.Clear
   Clipboard.SetText Text1.SelText
   Text1.SelText = ''
End Sub
 
Private Sub mnuPaste_Click ()
   Text1.SelText = Clipboard.GetText()
End Sub

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

7 голосов , оценка 4.286 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы