Kaydetmeden Önce Eksik bilgi girişi kontrolü

[ik]

Değerli Arkadaşlar;

Ekli dosyada Ürün (textbox100-111) alanına ürünleri giriyorum. Adet alanlarına (textbox200-211) adetleri giriyorum. Depo (combobox100-111) alanından depoyu seçiyorum. kaydet dediğimde sayfa 1 e kaydediyorum.

Şimdi sorum şu:

eğer ürün textboxına ürünü yazıp adedi boş bırakabiliyorum (unutabiliyorum). veya depoyu seçmeyi unutabiliyorum. bu nokta da kaydet ' e bastığımda aşağıdaki gibi bir kontrol yapmasını istiyorum.

ürün textboxlarından biri dolu ise ve depo veya adet boşsa ilgili boş yere gidecek ve mesaj verecek burayı boş bıraktın doldur diye.

örneğin textbox 100 den 106 kadar ürünleri girdim ama karşılığı olan adetlerde textbox 203 e adet girmedim. o zaman beni uyaracak 4. ürünün adedini boş bırakmışsın doldur öyle kaydet diyecek ve kayıt yapmayacak. (setfocus özelliği sanırım).

bir de bu durum for ... next döngüsü ile yapılabilir mi?

 

[halit3]

bu kodu denermisiniz.

Private Sub CommandButton1_Click()
For i = 100 To 111
If Controls("TextBox" & i).Text <> "" Then
If Controls("TextBox" & i + 100).Text = "" Then
MsgBox "TextBox" & i + 100 & " boş"
Exit Sub
End If
If Controls("ComboBox" & i).Text = "" Then
MsgBox "ComboBox" & i & " boş"
Exit Sub
End If
End If
Next
End Sub

 

[İhsan Tank]

halit uzman yardımcı olmuş

 

[ik]

Çok Teşekkkürler.

Konu Tamamdır.

Sevgilerimle

 

[halit3]

Çok Teşekkkürler.

Konu Tamamdır.

Sevgilerimle

iyi çalışmalar