Textbox tarih formatı

[canercan02]

arkadaşlar, benim textbox1_exit ile başım dertte.
ekteki örnekte: textbox1_exit olayında yapmam gerekeni yapıyorum fakat daha sonra aynı textbox içerisine girip çıktığımda format olduğu gibi değişiyor.

 

[Ali]

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "dd"".""mm"".""yyyy")
End Sub

şeklinde bir deneyin.

 

[canercan02]

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "dd"".""mm"".""yyyy")
End Sub

şeklinde bir deneyin.

usta ama benim yapmak istediğim şey

ben 12.12.2002 yazmak istediğimde
sadece 12122002 yazmak olacak. yani sizin verdiğiniz kod ile ben araya ayıraç koymadan işlem yapamıyorum.

 

[Ali]

Ekteki gibi birşeymi istiyorsunuz.

 

[Seyit Tiken]

Alternatif :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Format(TextBox1.Value, "00"".""00"".""0000")
End Sub

 

[eyüppsen]

Alternatif

 

[sbayyigit]

Alternatif :

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Format(TextBox1.Value, "00"".""00"".""0000")
End Sub

usta senin alternatif benim de işimi gördü. diğer arkadaşların çözümleri de iyi fakat en kestirme ve kolay yol buydu. herkese teşekkürler.

 

[canercan02]

Hepinize teşekkür ederim. oldu.