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

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

[VB6] การทำไฮไลท์หรือแถบแสงใน TextBox Control

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

262

กระทู้

422

โพสต์

3751

เครดิต

ผู้ดูแลระบบ

Rank: 9Rank: 9Rank: 9

เครดิต
3751


เวลาที่ TextBox ถูกโฟกัส (Focus) เราจะทำแถบแสงเพื่อเลือกข้อความทั้งหมดที่อยู่ใน TextBox ...
  1. Option Explicit

  2. Private Sub Form_Load()
  3.     Text1.Text = "Hello, World. G2GNet.Com"
  4. End Sub

  5. '// โปรแกรมย่อยในการทำ High Light ใน TextBox ... ใช้ร่วมกับ GotFocus
  6. Private Sub HLText(ByRef sText)
  7.     On Error Resume Next
  8.     With sText
  9.         .SelStart = 0
  10.         .SelLength = Len(sText.Text)
  11.     End With
  12. End Sub

  13. Private Sub Text1_GotFocus()
  14.     '// Reference Text1
  15.     Call HLText(Text1)
  16. End Sub
คัดลอกไปที่คลิปบอร์ด
สิ่งที่ดีกว่าการให้ คือการให้แบบไม่มีที่สิ้นสุด
ขออภัย! คุณไม่ได้รับสิทธิ์ในการดำเนินการในส่วนนี้ กรุณาเลือกอย่างใดอย่างหนึ่ง ลงชื่อเข้าใช้ | ลงทะเบียน

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

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

GMT+7, 2021-9-22 14:49 , Processed in 0.046570 second(s), 4 queries , File On.

Powered by Discuz! X3.4, Rev.62

Copyright © 2001-2020 Tencent Cloud.

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