03/05/2020, 13:23
feraz
(03/05/2020, 13:11)accessman yazdı: Sağ tıklama olayını içi boş sağ tık menusu yapıp özelliklerden onu şeçerek çözmüştümBakalım belki çözen olabilir.Eklediğim takvim olmuyormu istediğiniz şekilde ozan hocanın eklediği bende hata veriyor.
Diğer problem için ise sadece illgili kontroller güncellenerek yapılabilir diye düşünüyorum
Eklediğim dosyada sonucun sayı çıkmasını istiyorsanız zaten basit değiştirmesi.
Alttaki kodda dd.mm.yyyy yerine dd yazasanız zaten gün olarak oluşur sonuç.
Sub ButtonClick(btn As Access.CommandButton)
On Error Resume Next
With btn
If .Caption <> "" Then
Me.TextBox1.Value = .Caption & "-" & Left(Me.cmb_Ay.Value, 3) & "-" & Me.cmb_Yil.Value
txtbox.Value = Format(Me.TextBox1.Value, "dd.mm.yyyy")
DoCmd.SetWarnings False
DoCmd.Close
DoCmd.SetWarnings True
End If
End With
End Sub