tarih tanımlı metin kutusuna eski tarihli girişi nasıl engellerim

örnek olarak tarih alanına bugünden önce 40 günlük verilerin girişine musade etmesini daha önceki tarihli verilerin girileceği zaman (41.gün) "işlem yapamazsınız tarih zaman aşımına ugramıştır" uyarı verip alanın içini boşaltması lazım

iyi çalışmalar dilerim

İki Tarih Arası Gün Ay Yıl Hesaplamaya yarayan çok kullanışlı bir örnek.

[Resim: https://accesstr.net/resim/do.php?img=4748]

arkadaşlar tarih sorgusu yapmak istiyorum ama sorguyu çalıştırdığımda tarih aralıklarını ben yazmak istiyorum yani sorgu ölçütüne belli tarih yazıp sorgulamak istemiyorum. Sorguyu çalıştırdığımda mesela lütfen tarih aralığı giriniz diycek ben de 01/11/2008-31/11/2008 arasındaki kayıtları bul diycem nasıl yapabilirim

Arkadaşlar bir soru daha;

iki ayrı text kutusunda olan bilgiyi tek text kutusuna nasıl yazdırabilirim?

Veri tabanına kaydettiğim verilerden en son yaptığım kayıt yada tarihi almak için sorgularda nasıl bir ölçüt girmem gerek.

Metin içine girilen harflerin sayısını ala bileceğiniz bir örnek...

herkes accessde Excel gibi bilgi daha önce girilmişse ben harf yazdıkça otomotik tamamlasın der
şimdi aranızdan bir kaç kişinin canım bunun nesi var diyenleri duyabiliyorum bir sorgu yaparım len ile mid vs vs ile harfleri aratır bulurum veya önce açılır kutu yapar sonra onu metin kutusuna dönüştürürüm gibi değişik önerileri olanlar olacaktır. peki bunun nesi var diyenlere bu kod yalnızca bir defa forma yazılıyor o içine girilen metin kutusunun denetim kaynağını araştırıyor ve ordaki bilgileri

arkadaşlar merhaba. yine ben.
ekte gönderdiğim örnekte herhangi bir tarihin üzerine tıkladığımda metin kutusuna tarih olarak yazacak.

mesela kasım ayının 2008 yılı 12 si seçildiinde metin kutusuna 12.11.2008 şeklinde tarih atamasını yapabilir miyiz?

yardımlarınız için şimdiden tşkler.

bir form oluşturdum ve içinde metin kutuları var ben bunlardan giriş yapıyorum. şimdi bir metin kutusu var ben bu alana sadece A, F, G, J, ve H harflerine izin vermesini istiyorum yani diğer harflere bastığımda yazmasın. Yardımcı olucak arkadaşlara thank you...
*basit bir örnek eklerseniz kendi proje aktarırım.

modüle
[code]Option Compare Database
Option Explicit

Private Const LABEL_RAISED_BackColor = 14474460
Private Const LABEL_SUNKEN_BackColor = 15785160
Dim lngLabelCurrentColor As Long


Public Sub LabelSpecialEffect(frm As Form, Optional intEffect As Integer = 2)
On Error Resume Next
Dim ctl As Control
Dim strControlName As String

For Each ctl In frm.Controls
With ctl
If .ControlType = acTextBox Or .ControlType = acComboBox Then
.BorderStyle = 1
.BorderC