ชุมชนคนรักภาษาเบสิค - Visual Basic Community

 ลืมรหัสผ่าน
 ลงทะเบียน
ค้นหา
ดู: 1480|ตอบกลับ: 0

[VB.NET] การตรวจสอบค่าว่างใน TextBox ทุกๆตัวที่อยู่บนฟอร์ม

[คัดลอกลิงก์]

249

กระทู้

355

โพสต์

2967

เครดิต

ผู้ดูแลระบบ

Rank: 9Rank: 9Rank: 9

เครดิต
2967

อันนี้ถือว่าเป็นบันทึกกันลืมก็แล้วกันครับ โดยแอดมินจะทำไว้ 2 เวอร์ชั่น ...

เวอร์ชั่นแรก ...
  1.         For Each c As Control In Me.Controls
  2.             If TypeOf (c) Is TextBox AndAlso c.Text = "" Then
  3.                 MsgBox("TextBox is empty: " & c.Name)
  4.                 Exit For
  5.             End If
  6.         Next
คัดลอกไปที่คลิปบอร์ด


เวอร์ชั่นสอง ... สำหรับการตรวจสอบและแจ้งให้รู้ว่ามี TextBox ตัวใดบ้างที่ยังไม่มีการป้อนต่าใดๆ ...
  1.         Dim empty = Me.Controls.OfType(Of TextBox)().Where(Function(txt) txt.Text.Length = 0)
  2.         If empty.Any Then
  3.             MsgBox(String.Format("กรุณาป้อนข้อมูลลงใน: {0}", String.Join(", ", empty.Select(Function(txt) txt.Name))))
  4.         End If
คัดลอกไปที่คลิปบอร์ด




สิ่งที่ดีกว่าการให้ คือการให้แบบไม่มีที่สิ้นสุด

0

กระทู้

6

โพสต์

16

เครดิต

Newbie

Rank: 1

เครดิต
16
โพสต์ 2020-8-6 09:22:01 | ดูโพสต์ทั้งหมด

ขอบพระคุณคับ
ขออภัย! คุณไม่ได้รับสิทธิ์ในการดำเนินการในส่วนนี้ กรุณาเลือกอย่างใดอย่างหนึ่ง ลงชื่อเข้าใช้ | ลงทะเบียน

รายละเอียดเครดิต

ข้อความล้วน|อุปกรณ์พกพา|ประวัติการแบน|G2GNet.com  

GMT+7, 2020-8-15 14:03 , Processed in 0.265184 second(s), 4 queries , File On.

Powered by Discuz! X3.3 R20170401, Rev.54

© 2001-2017 Comsenz Inc.

ตอบกระทู้ ขึ้นไปด้านบน ไปที่หน้ารายการกระทู้