[VBA] FORMU TEMIZLE KODU
#1
Merhabalar ,

uygulamam dakı yapı kısaca ; kullanıcı adı ve sıfre ıle gırıs yapılıyor ve ana formda kı bır alana kullanıcı adı otomatık gelıyor..

ana formda bırde " temızle " butonu var ,butona basınca tüm alanları bosaltıyor..

ıstedıgım ıse sadece kullanıcı adının otomatık geldıgı alan harıcınde kı tum alanları bosaltsın temızlesın..

temizle kodu :

On Error Resume Next
DoCmd.GoToRecord , , acNewRec

yardımlarınızı rıca ederım...

ıyı gunler



  Alıntı
Bu mesajı beğenenler:
#2
Merhaba armane,
Formdaki metin kutuları, açılır kutular..vs için şu kodu yaz,

metinkutusuadi.value=""
Bu sayede istediğin alanların değerlerini boşaltabilirsin.



  Alıntı
Bu mesajı beğenenler: ankaram
#3
merhaba MirzaKatar,

cevabın ıcın tsekkur ederım

anladıgım su : formda kı temızle kodunu su sekılde mı degıstırmem gerekıyor :


On Error Resume Next
DoCmd.GoToRecord , , acNewRec
metinkutusuadi.value=""

kusuruma bakmayın neolur ,cok bılgısızım bu konuda...

saygılar



  Alıntı
Bu mesajı beğenenler:
#4
Merhaba,
Hayır o kodu tamamen silin. Daha sonra temizle butonun tıklandığına olay yordamına metinkutusu adı yazanyere formunuzda temizlemek istediğiniz alanlarınisimlerini yazın. Yalnız isimlerde boşluk varsa [] kullanın.



  Alıntı
Bu mesajı beğenenler:
#5
merhaba

sanırım şimdi anladım sayın mirzakatar,


yalnız soyle bır durum var , benım ana formumda toplamda 36 tane metın kutusu vs var,

bunları tek tek yazmam bıraz zor olur,

daha pratık bır yol yokmudur acaba, temizle koduna " su alan harıcındekılerı temızle " gıbı kod eklenemez mı ?

eger eklenemezse parmaklara kuvet deyıp yazmaya baslıycagım ...

saygılar



  Alıntı
Bu mesajı beğenenler:
#6
Merhaba..

Eğer forumunuz bir kayıt kaynağına bağlıysa mevcut kayıttaki denetimleri temizlemek o kaydı da silmek demektir.. Böyle bir durum yoksa bu prosedürü kullanın.. Denetim türü veya tag kullanarak bu türler arasından da seçim yapabilirsiniz..:

Visual Basic
  1. Dim trz As Control
  2. For Each trz In Me.Form.Controls
  3. Select Case trz.ControlType
  4. Case acTextBox 'Bütün metin kutularını boşalt
  5. trz.Value = ""
  6. Case acComboBox 'bütün açılan kutuları boşalt
  7. trz.Value = ""
  8. End Select
  9. Next





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Mouse Ile Açık Formu Kapatmak hmuratg 1 344 06-11-2024, 16:08
Son Mesaj: kahramanselim
  [RAPOR] Access De Ki Raporu Word Belgesi Olarak Vba Kodu Ile Açma Ahmet51 10 987 01-08-2024, 10:28
Son Mesaj: dsezgin
  [TABLO] Formu Tabloda Filtreleme soss 2 490 27-03-2024, 20:04
Son Mesaj: soss
  Formu Pdf Olarak Kaydetme snapper 8 914 01-11-2023, 22:59
Son Mesaj: dsezgin
  [FORM] Gezinti Formu Ile Alt Form Oluşturmak abahceci 2 562 09-08-2023, 15:09
Son Mesaj: abahceci
  [VBA] Yıl Ay Sayı Sıralama Kodu Hakkında Ahmet51 6 798 29-05-2023, 09:31
Son Mesaj: halily
  [SORGU] Sql Kodu Ahmet51 10 1.194 11-04-2023, 19:01
Son Mesaj: dsezgin
  Access Formu üzerinde Biçimlendirme Hakkında OGUZTURKYILMAZ 9 895 08-04-2023, 15:35
Son Mesaj: OGUZTURKYILMAZ

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi