User Formda Gİzlİ Buton

[taseraydin]

Öncelİkle TÜm Formdakİ ArkadaŞlarin Kurban Bayramini Kutlarim.

DeĞerlİ Üstad ArkadaŞlar User Foprmda Buton Saklamayla İlgİlİ YARDIMLARINIZI BEKLİYORUM
Örnek Bİr Dosya GÖnderİyorum sAYGILAR sEVGİLER

 

[Orion1]

Ekli dosyayı inceleyiniz.
123 yazınca commandbutton1 görünüyor.

Private Sub TextBox1_Change()
If TextBox1.Value = 123 Then
    CommandButton1.Visible = True
    Else
    CommandButton1.Visible = False
End If
End Sub

Private Sub UserForm_Initialize()
CommandButton1.Visible = False
End Sub

 

[taseraydin]

Teşekür

Elİnİze SaĞlik TeŞekÜr Ederİm Çok Faydali Oldu

 

[cems]

Size de hayırlı bayramlar ,
Farklı bir mantıkla olmak üzere ; sanırım ekteki dosya işinizi çözer.
Sizin örneğinizdeki userform üzerinde , textbox'ta birşey yazılmış olup olmamasına göre tuşlar ortaya çıkıp kaybolur mu tam bilmesem de ;

1- Kapat tuşunu giriş tuşu olarak değiştirdim
2- Textbox'a 1234 yazıp girişe bastığınızda bu form kapanıp uygulama1 tuşunu taşıyan ikinci userform açılıyor. Uygulama2 tuşu bunun üzerinde yok
3- Textbox'a birşey yazmayıp girişe bastığınızda bu form kapanıp uygulama2 tuşunu taşıyan userform açılıyor. Uygulama1 tuşu bunun üzerinde yok

Dolayısı ile bu giriş kodlarını bilen, kendine yönelik bir dosya bütününe , bilmeyen de başka bir dosya bütününe erişebilir. Uygulama 1 yada 2 olarak ayırmayıp birebir aynı form biçimi kullandığınızda kullanıcı , farklı yönlendirildiğini de farketmeyecektir.
Örnek: Muhasebe 1234 olarak girince kendi dosya bütününe girer ama IK ya giremez çunki farkedemez. IK ' da farklı bir kod kullandığında Muhasebe'ye giremez çünki farkedemez.

Umarım işinize yarar. Bu arada , neden Türkçe'ye aykırı şekilde durmadan kelimeleriniz büyük / küçük harfler içeriyor ? Okumak için son derece rahatsız edici ; eğer bunu yapmak için özellikle uğraşıyorsanız da son derece anlamsız.
Tabii bu benim fikrim ...

 

[taseraydin]

teşekür

ilginize çok teşekür ederim.

 

[sagittarius]

Selam

İlk kez mesaj gönderiyorum umarım ekli dosyayla beraber ulaşır. 2 seçenekli olarak oluşturdum. Anladığım kadarıyla şifreli bir sistem oluşturacaksın. O yüzden TextBox Proppoerties'ten Pasword Chart'ı "*" olarak atadım.

TextBox'ta (**** "1234") yazılı olduğunda

1- CommandButton1 Görünmezden görünüre geçecek. yine "1234" ten farklı olursa görünürden görünmeze geçecek.
2-CommandButton1 deaktif moddan aktif moda geçecek. Eğer "1234"ten farklı olursa yine deaktif moda geçecek.

Umarım işini bu yöntemde görür.

İyi geceler, iyi bayramlar

 

[tufan03]

Bu Kodu;
Textbox1 ve textbox2 de tarih var ise Commanbutton3 görünsün veya görünmesin şekline nasıl getirebiliriz.

 

[tufan03]

Commanbutton aktif veya pasif olsun da olabilir.

 

[Orion1]

Bu Kodu;
Textbox1 ve textbox2 de tarih var ise Commanbutton3 görünsün veya görünmesin şekline nasıl getirebiliriz.

Ekli dosyayı inceleyiniz.

Private Sub TextBox1_Change()
If Not IsDate(TextBox1.Value) Or Not IsDate(TextBox2.Value) Then
    CommandButton1.Visible = False
    Else
    CommandButton1.Visible = True
End If
End Sub

Private Sub TextBox2_Change()
If Not IsDate(TextBox1.Value) Or Not IsDate(TextBox2.Value) Then
    CommandButton1.Visible = False
    Else
    CommandButton1.Visible = True
End If
End Sub

 

[cems]

Merhaba
Bunu Multiform üzerinde nasıl uygulayabiliriz ?

Her sayfası için ayrı ayrı textbox ve tuşlar yerleştirdikten sonra

TextBox'ta (**** "1234") yazılı olduğunda

1- CommandButton1 Görünmezden görünüre geçecek. yine "1234" ten farklı olursa görünürden görünmeze geçecek

 

[S.Yiğit]

Öncelİkle TÜm Formdakİ ArkadaŞlarin Kurban Bayramini Kutlarim.

DeĞerlİ Üstad ArkadaŞlar User Foprmda Buton Saklamayla İlgİlİ YARDIMLARINIZI BEKLİYORUM
Örnek Bİr Dosya GÖnderİyorum sAYGILAR sEVGİLER

Seninde Kurban bayramın kutlu olsun, Biraz erken oldu ama arada bunuda çıkartalım..:hihoho:

Çözüm hakkında bilgilendirme yapan hocalarımıza tşkler

 

[cems]

Soruyu sorduktan sonra ilham geldi ve yapmayı başardım.
İlgilenen olabilir diye buraya ekliyorum