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

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

[VB.NET] การแสดงผลข้อความอธิบายใน TextBox Control ด้วย Syncfusion

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

314

กระทู้

505

โพสต์

6207

เครดิต

ผู้ดูแลระบบ

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

Rank: 9Rank: 9Rank: 9

เครดิต
6207

การแสดงผลข้อความอธิบายใน TextBox Control มาตรฐานของทางไมโครซอฟท์ ด้วย Syncfusion ซึ่งศัพท์ภาษาอังกฤษจะเรียกว่า Watermark หรือ Placeholder ... เพื่อความง่ายและสะดวกก็จะเรียกใช้งาน BannerTextProvider ของ Syncfusion เข้ามาช่วย ซึ่งสามารถทำได้ในขณะที่อยู่ในโหมด Design Time (ดูจากภาพ) แต่สำหรับแอดมินจะใช้โค้ดเพื่อให้แสดงผลในขณะ Run Time ครับ ...



ไฟล์มาตรฐาน Shared.Base.DLL และ Tools.Windows.DLL ของ Syncfusion เพื่อนำไปใช้กับเครื่องอื่น ...


คลิปวิดีโอสอนการใช้งาน BannerTextProvider ของ Syncfusion ...

มาดูโค้ดกันเถอะ ...
  1. Imports Syncfusion.Windows.Forms

  2. Public Class frmBannerText

  3.     '// S T A R T . . . H E R E
  4.     Private Sub frmBannerText_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
  5.         Dim BannerTextProvider As New BannerTextProvider
  6.         Dim BannerTextInfo As BannerTextInfo = New BannerTextInfo()
  7.         With BannerTextInfo
  8.             .Text = "ป้อนชื่อผู้ใช้งาน"
  9.             .Visible = True
  10.             .Color = Color.DarkRed
  11.             .Mode = BannerTextMode.EditMode '// โหมดนี้เมื่อถูกโฟกัส ข้อความแสดงผลจะยังคงอยู่ จนกว่าจะมีการพิมพ์ค่าลงไป
  12.             .TextAlignment = StringAlignment.Near
  13.         End With
  14.         '// Provide Information into TextBox1 Control.
  15.         BannerTextProvider.SetBannerText(Me.TextBox1, BannerTextInfo)
  16.         '//
  17.         BannerTextInfo = New BannerTextInfo '// เริ่มต้นใหม่ด้วยการเคลียร์ค่าเดิม
  18.         With BannerTextInfo
  19.             .Text = "ป้อนรหัสผ่านผู้ใช้งาน"
  20.             .Visible = True
  21.             .Color = Color.Gray
  22.             .Mode = BannerTextMode.FocusMode    '// โหมดนี้เมื่อถูกโฟกัส ข้อความแสดงผลจะหายไป
  23.             .TextAlignment = StringAlignment.Near
  24.         End With
  25.         BannerTextProvider.SetBannerText(Me.TextBox2, BannerTextInfo)

  26.         '// หรือ ...
  27.         'BannerTextProvider.SetBannerText( _
  28.         '    TextBox1, _
  29.         '    New Syncfusion.Windows.Forms.BannerTextInfo( _
  30.         '        "Type here ...", _
  31.         '        True, _
  32.         '        New System.Drawing.Font( _
  33.         '            "Tahoma", _
  34.         '            8.25F, _
  35.         '            System.Drawing.FontStyle.Italic), _
  36.         '        System.Drawing.Color.RoyalBlue, _
  37.         '        Syncfusion.Windows.Forms.BannerTextMode.EditMode) _
  38.         '    )
  39.     End Sub
  40. End Class
คัดลอกไปที่คลิปบอร์ด

ดาวน์โหลดโค้ดต้นฉบับ Visual Basic .NET (2010) ได้ที่นี่ ...

ขออภัย! โพสต์นี้มีไฟล์แนบหรือรูปภาพที่ไม่ได้รับอนุญาตให้คุณเข้าถึง

คุณจำเป็นต้อง ลงชื่อเข้าใช้ เพื่อดาวน์โหลดหรือดูไฟล์แนบนี้ คุณยังไม่มีบัญชีใช่ไหม? ลงทะเบียน

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

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

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

GMT+7, 2024-6-24 16:11 , Processed in 0.121237 second(s), 4 queries , File On.

Powered by Discuz! X3.4, Rev.62

Copyright © 2001-2020 Tencent Cloud.

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