[FORM] Formda döngü ile koşullu olarak alanların içini boşaltmak

hturkavci03 · 25-01-2018, 11:08

Merhaba, Formdaki çok sayıdaki textbox ve comboboxların Tag kısımlarına yazacağım örneğin "silme" kelimesi ile sadece Tag alanları boş olanları bir döngü içine alıp boşaltmam nasıl mümkün olur acaba?

Dim ctl As Control
For Each ctl In me.Form.Controls
Select Case ctl.ControlType
Case acTextBox
ctl.Value = Null
Case acComboBox
ctl.Value = Null
End Select
Next

şeklinde döngü içine tag alanı koşulu da konarak yapılabilir mi?

hturkavci03 · 25-01-2018, 11:34

İşyerimdeki internet bilgisayarında giriş yapabiliyorum ve bu bilgisayarda open Office yüklü. Bu nedenle örnek hazırlayamadım.

alperalper · 25-01-2018, 16:44

Aşağıdaki şekilde yapabilirsiniz. Yalnız dikkat etmeniz gereken text isimleriniz. Örneğin Metin1, Metin2 diye gidiyorsa ona göre format kısmını ayarlamalısın. Örnek ekleseydiniz daha iyi olurdu aslında.

Visual Basic
Private Sub Butonunuz_Click()
Dim sayı As Integer
 
For sayı = 1 To 8
 
If Me("Metin" & Format(sayı, "00")).Tag = "Silme" Then
 
Me("Metin" & Format(sayı, "00")).Value = ""
 
End If
Next sayı
 
End Sub

hturkavci03 · 25-01-2018, 16:48

İlk fırsatta inceleyeceğim olmazsa evden örnek atacağım. Çok teşekkürler..

hturkavci03 · 25-01-2018, 19:38

Merhaba, eğer mümkünse ilk mesajımda ve ekteki örneğimdeki yapıyı kullanarak yapmak istediğim olayı gerçekleştirmek istiyorum.

naqi34 · 25-01-2018, 21:00

İlk 2 alana "Silme" tagini ekledim. Siz isteğinize göre tagları düzeltirsiniz.

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	[MAKRO] Alt Formda Filtrelemenin Iptali Ve Alt Formun Liste Olarak Görünmesi.	M_Kemal_Askeri	2	171	21-04-2026, 23:57 Son Mesaj: M_Kemal_Askeri
	[FORM] Kritere Bağlı Olarak Değerlerin Toplanması	M_Kemal_Askeri	2	163	10-04-2026, 01:05 Son Mesaj: M_Kemal_Askeri
	[SORGU] çarpraz Sorguda Sütun Değeri Olarak Birden çok Alan Seçebilir Miyiz?	abkbek	2	440	13-08-2024, 21:18 Son Mesaj: abkbek
	[RAPOR] Access De Ki Raporu Word Belgesi Olarak Vba Kodu Ile Açma	Ahmet51	10	987	01-08-2024, 10:28 Son Mesaj: dsezgin
	[FORM] Onay Kutususun şarta Bağlı Olarak Otomatik Olarak Işaretlenmesi	Samih KARSLI	2	465	06-04-2024, 18:49 Son Mesaj: Samih KARSLI
	Virgülle Ayrılmış Verilerin Her Bir Değerini Yeni Kayıt Olarak Ekleme	adnnfrm	5	702	28-11-2023, 01:37 Son Mesaj: dsezgin
	Formu Pdf Olarak Kaydetme	snapper	8	914	01-11-2023, 22:59 Son Mesaj: dsezgin
	12 Saatlik (am-pm) Metin Olarak Girilmiş Saat Verisini 24 Saatlik Olarak Gösterme Hk.	adnnfrm	2	566	05-10-2023, 03:16 Son Mesaj: adnnfrm

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL