Помогите как закрыть форму а не скрыть?

Программирование на Visual Basic for Applications
Technar
Обычный пользователь
Обычный пользователь
 
Сообщения: 54
Зарегистрирован: 31.07.2008 (Чт) 19:15

Помогите как закрыть форму а не скрыть?

Сообщение Technar » 28.08.2008 (Чт) 19:23

Помогите как закрыть форму а не скрыть?
я помню где-то здесь была эта тема но я забыл где она!

KL
Microsoft MVP
 
Сообщения: 483
Зарегистрирован: 30.10.2005 (Вс) 0:31
Откуда: Madrid

Re: Помогите как закрыть форму а не скрыть?

Сообщение KL » 28.08.2008 (Чт) 19:24

Код: Выделить всё
Unload UserForm1

Technar
Обычный пользователь
Обычный пользователь
 
Сообщения: 54
Зарегистрирован: 31.07.2008 (Чт) 19:15

Re: Помогите как закрыть форму а не скрыть?

Сообщение Technar » 28.08.2008 (Чт) 19:30

KL писал(а):
Код: Выделить всё
Unload UserForm1

Спасибо большое!
А как изменить размер изображения в Image1 только когда его просматриваешь?
Например изображение превышает заданую ширину и высоту и его надо уменьшить но что-бы само изображение не изменялось?

KL
Microsoft MVP
 
Сообщения: 483
Зарегистрирован: 30.10.2005 (Вс) 0:31
Откуда: Madrid

Re: Помогите как закрыть форму а не скрыть?

Сообщение KL » 28.08.2008 (Чт) 20:26

Код: Выделить всё
Image1.PictureSizeMode=fmPictureSizeModeZoom
Привет,
KL

Technar
Обычный пользователь
Обычный пользователь
 
Сообщения: 54
Зарегистрирован: 31.07.2008 (Чт) 19:15

Re: Помогите как закрыть форму а не скрыть?

Сообщение Technar » 28.08.2008 (Чт) 20:37

KL писал(а):
Код: Выделить всё
Image1.PictureSizeMode=fmPictureSizeModeZoom

А как узнать ширину и высоту текущего изображения?
и еще как узнать размер файла и путь к нему?
потому что мне нужно выстовить размер файла, ширину и высоту изображения и путь к нему !
и последние можно ли делать в VBA меню такое как, Файл, Правка ?

KL
Microsoft MVP
 
Сообщения: 483
Зарегистрирован: 30.10.2005 (Вс) 0:31
Откуда: Madrid

Re: Помогите как закрыть форму а не скрыть?

Сообщение KL » 29.08.2008 (Пт) 0:59

Technar писал(а):А как узнать ширину и высоту текущего изображения?

Вот так:
Код: Выделить всё
    Dim msg As String
    msg = msg & "Высота: " & Image1.Picture.Height & Chr(13)
    msg = msg & "Ширина: " & Image1.Picture.Width & Chr(13)
    MsgBox msg

есть еще такая вещь:
Код: Выделить всё
    Image1.AutoSize = True

Technar писал(а):...как узнать размер файла и путь к нему?

Никак. После того, как в объект Image1 загружен графический файл, он становится частью этого объекта (embedded) и соответственно не ссылается на исходный файл и не имеет самостоятельного пути ни размера:
Код: Выделить всё
    Image1.Picture = LoadPicture("C:\Users\KL\Pictures\MyImage.jpg")

Technar писал(а):...можно ли делать в VBA меню такое как, Файл, Правка ?

Можно, но это тема для отдельного(ых) топика(ов). См. справку про коллекцию CommandBars
Привет,
KL

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

Re: Помогите как закрыть форму а не скрыть?

Сообщение Денис » 29.08.2008 (Пт) 8:02

KL писал(а):
Technar писал(а):...можно ли делать в VBA меню такое как, Файл, Правка ?

Можно, но это тема для отдельного(ых) топика(ов). См. справку про коллекцию CommandBars

Причем меню будет отображаться не в юзерформе, а в окне главного приложения в котором вы пишете код (Word, Excel, etc.)
Программирование — богоизбранная дисциплина! Если бог и есть, то вселенную он скомпилировал, не иначе.

Technar
Обычный пользователь
Обычный пользователь
 
Сообщения: 54
Зарегистрирован: 31.07.2008 (Чт) 19:15

Re: Помогите как закрыть форму а не скрыть?

Сообщение Technar » 29.08.2008 (Пт) 12:46

Денис писал(а):
KL писал(а):Причем меню будет отображаться не в юзерформе, а в окне главного приложения в котором вы пишете код (Word, Excel, etc.)

Да но мне нужно что-бы оно отображалось в самой форме!
и ещё можно ли где-нибудь скачать бесплатно програму: Microsoft Visual Basic 2005 Express Edition?

Sebas
Неуловимый Джо
Неуловимый Джо
Аватара пользователя
 
Сообщения: 3626
Зарегистрирован: 12.02.2002 (Вт) 17:25
Откуда: столько наглости такие вопросы задавать

Re: Помогите как закрыть форму а не скрыть?

Сообщение Sebas » 29.08.2008 (Пт) 12:53

2Technar

Молодой человек, поиском пользуемся.
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?

sebas<-@->mail.ru


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 64

    TopList