Question

VB中如何在label中加一个闪烁的光标

Answer 1

如果需要模拟光标,可以用定时器定时在lable的caption中添加 | 或者去除这个线,就可以表示光标label本身没有焦点,所以不能真正有光标

Answer 2

Dim sansuo As BooleanPrivate Sub Form_Load()
Timer1.Interval = 500
sansuo = False
End SubPrivate Sub Timer1_Timer()
sansuo = Not sansuo
If sansuo = True Then
Label1.Caption = Label1.Caption & "|"
Else
Label1.Caption = Mid(Label1.Caption, 1, Len(Label1.Caption) - 1)
End If
End Sub

Answer 3

label是不能编辑的，所以不会出现闪烁的光标，你应该用Textbox