Как в форму подгружать фото - VB
Формулировка задачи:
Тыкните меня носом в материал пожалуйста кому не лень)))) Как сделать так чтобы в форму можно было фото подгружать?????
или есть готовый код будьте добры - ПОДЕЛИТЕСЬ)))))
Решение задачи: «Как в форму подгружать фото»
textual
Листинг программы
Private Sub Command1_Click()
Pictures$ = Text1.Text
Set objWord = CreateObject("Word.Application")
With objWord
.Visible = True
.Documents.Add
.Selection.InlineShapes.AddPicture FileName:=Pictures$, _
LinkToFile:=False, SaveWithDocument:=True
End With
End Sub