Bu dosya, bir UserForm üzerindeki nesnelerin üzerine gelindiğinde açıklamanın ControlTipText balonu yerine formun içindeki bir Label nesnesinde gösterilmesini örneklendirir. Açıklama metni fare hareketine göre değişir, fare nesnenin dışına çıkınca etiket varsayılan metne döner.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: Boş çalışma sayfasıdır; formu açan şekil (Oval1) bu sayfada yer alır.
- UserForm1: İki komut düğmesi (CommandButton1, CommandButton2) ve açıklamanın gösterildiği lblInfo etiketini içeren form.
- Module1: Formu açan Oval1_Tıkla makrosunu barındırır.
Makrolar
- Oval1_Tıkla: UserForm1.Show komutuyla formu açar. Sayfadaki oval şekle tıklandığında çalışacak biçimde kullanılır.
- UserForm_Initialize: Form açılırken infoTxt değişkenine "Merhaba!" metnini atar ve bu metni lblInfo etiketinde gösterir.
- CommandButton1_MouseMove: Fare birinci düğmenin üzerindeyken etikete "Giriş butonu" yazar.
- CommandButton2_MouseMove: Fare ikinci düğmenin üzerindeyken etikete "Çıkış butonu" yazar.
- UserForm_MouseMove: Fare formun boş alanındayken etiketi tekrar infoTxt değerine ("Merhaba!") döndürür.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sayfa1 üzerindeki oval şekle tıklayarak UserForm1'i açın.
- Fareyi düğmelerin üzerine getirin; lblInfo etiketinde ilgili açıklama görünür.
- Fareyi formun boş alanına götürdüğünüzde etiket "Merhaba!" metnine döner.
- Kendi formunuzda kullanmak için her nesnenin MouseMove olayına etiket metnini yazan bir satır ekleyin ve formun MouseMove olayında varsayılan metni geri yükleyin.