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

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

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

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

308

กระทู้

498

โพสต์

5971

เครดิต

ผู้ดูแลระบบ

ทองก้อน ทับทิมกรอบ

Rank: 9Rank: 9Rank: 9

เครดิต
5971

อันนี้ถือว่าเป็นบันทึกกันลืมก็แล้วกันครับ โดยแอดมินจะทำไว้ 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, 2024-3-28 21:09 , Processed in 0.154835 second(s), 4 queries , File On.

Powered by Discuz! X3.4, Rev.62

Copyright © 2001-2020 Tencent Cloud.

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