[Çözüldü]  Koddaki hata nedir?

Mesaj Kutusu. Programcıların olmazsa olmazlarından.

Koddaki hata nedir?

İleti#1)  alperener » 12 Mar 2017 10:19

Aşağıdaki kod hata veriyor hatalı olan neresidir? Bulamadım. UserForm üzerindeki Buton üzerinden kullanılıyor.Teşekkürler.

sifre = InputBox("ŞİFRE GİRİNİZ", "ŞİFRE GİRİŞ")
If sifre = 123 Then
Application.Visible = True
Unload Me
Else
MsgBox "ŞİFRE DOĞRU DEĞİL"
Exit Sub
End If
Kullanıcı avatarı
alperener
Siteye Alışmış
 
Adı Soyadı:salim yolcu
Kayıt: 29 Oca 2013 21:43
İleti: 342
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: amasya

Cevap: Koddaki hata nedir?

İleti#2)  feraz » 12 Mar 2017 10:49

sifre = InputBox("ŞİFRE GİRİNİZ")
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 40
İleti: 5988
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Koddaki hata nedir?

İleti#3)  myazici61 » 12 Mar 2017 10:53

Aşağıdaki kodu deneyiniz.
Kod: Tümünü seç
Private Sub TextBox1_Change()
Dim sifre As String
sifre = InputBox("ŞİFRE GİRİNİZ", "ŞİFRE GİRİŞ")
If sifre = 123 Then
'Application.Visible = True
Unload Me
Else
MsgBox "ŞİFRE DOĞRU DEĞİL"
Exit Sub
End If
End Sub
Kullanıcı avatarı
myazici61
Siteye Alışmış
 
Adı Soyadı:Mustafa YAZICI
Kayıt: 27 Nis 2011 09:27
Konum: BURSA
Meslek: S.M.Mali Müşavir
Yaş: 50
İleti: 280
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Bursa/Osmangazi

Cevap: Koddaki hata nedir?

İleti#4)  alperener » 12 Mar 2017 16:56

teşekkür ederim oldu.
Kullanıcı avatarı
alperener
Siteye Alışmış
 
Adı Soyadı:salim yolcu
Kayıt: 29 Oca 2013 21:43
İleti: 342
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: amasya

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Forum MsgBox

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe