PDA

View Full Version : text box



com12151337
جمعه 10 شهریور 1391, 20:27 عصر
سلام
چطوری میشه در یک text box اگر خالی با شد یعنی نوشته یا عدد در آن نباشد در گزارش نشان ندهد آن تکست باکس نشان داده نشود آیا راهی هست

hf.farhadi
جمعه 10 شهریور 1391, 21:53 عصر
با سلام
از کد زیر استفاده نمایید

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Not IsNull(Text0) Then
Me.Text0.Visible = True
Else
Me.Text0.Visible = False
End If
End Sub

com12151337
جمعه 10 شهریور 1391, 23:43 عصر
سلام
جناب فرهادی کد را در یک ماژول کپی کنم

hf.farhadi
جمعه 10 شهریور 1391, 23:51 عصر
در قسمت Detail گزارشت در رویداد on Format

Abbas Amiri
شنبه 11 شهریور 1391, 00:05 صبح
باسلام ، گرچه کدفوق هیچ اشکالی ندارد وکاملا صحیح است و لی درعبارات بولی میتوان آنرا ساده ترهم نوشت


Text0.Visible =Not IsNull(Text0)

com12151337
شنبه 11 شهریور 1391, 01:52 صبح
دوستان سلام
جناب فرهادی از کد استفاده کردم متاسفانه نتیجه نگرفتم

hf.farhadi
شنبه 11 شهریور 1391, 20:11 عصر
نمونه زیر را ملاحظه بفرمایید
برای نمایش فیلد در گزارش، در Table1 به فیلد A مقدار دهید