Load Picture
Picture1.Picture = LoadPicture("c:\members\Bon jovi.jpg")
End Sub
это кокойта символ,я видел это где то ,но не помню
в коком code
как можно здес задат так чтоб фотки били загружены с того места где расположен сама программа.
это кокойта символ,я видел это где то ,но не помню
в коком code
В VBA Excel можно
Application.ActiveWorkbook.FullName
В VBA Excel можно
Application.ActiveWorkbook.FullName
Лучше app.path!!
И все!!
Лучше app.path!!
И все!!
Все зависит от того что он используют: VB6 или VBA Excel :)
Все зависит от того что он используют: VB6 или VBA Excel :)
Да ты прав!!!
Извини исправлюсь!!!
:)
Все зависит от того что он используют: VB6 или VBA Excel :)
Пользуюсь VB6. Kak быть?
Пользуюсь VB6. Kak быть?
ТОгда только app.path
См. пример
PathDir=app.path
str="\tmp"
Me.Picture1.Picture = LoadPicture(PathDir & str & ".jpg")
ТОгда только app.path
См. пример
PathDir=app.path
str="\tmp"
Me.Picture1.Picture = LoadPicture(PathDir & str & ".jpg")
А если app.path = "c:\" что тогда ?
а тогда error
вот как я делаю:
Public AppPath As String
If Right(App.Path, 2) = ":\" Then
AppPath = Mid(App.Path, 1, Len(App.Path) - 1)
Else
AppPath = App.Path
End If
P.S
насколько я помню если вместо полного пути указано лишь имя файла то basic ищет файл в своей директории потом на c:\ а потом в system и system32
А если app.path = "c:\" что тогда ?
а тогда error
вот как я делаю:
Public AppPath As String
If Right(App.Path, 2) = ":\" Then
AppPath = Mid(App.Path, 1, Len(App.Path) - 1)
Else
AppPath = App.Path
End If
P.S
насколько я помню если вместо полного пути указано лишь имя файла то basic ищет файл в своей директории потом на c:\ а потом в system и system32
нОРМАЛЬНЫЙ у тебя код... он работоспособен, так что вперед..
Сначала vb ищет файл в текущей директории, а вот в system32 он лезет когда не находит конрол или dll.:)