哪位高手帮帮忙啊
我刚学VB 正在学做一个文本框控件(TxtContent)
请问一下 以下的 TxtContent.SelStart 和TxtContent.SelLength 这两个代码是怎么出来
Private Sub TxtContent_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
LblStart.Caption = "起始位置:" & TxtContent.SelStart
LblLength.Caption = "文本长度:" & TxtContent.SelLength
End Sub
Private Sub CmdCopy_Click()
Clipboard.SetText TxtContent.SelText
End Sub
Private Sub CmdPaste_Click()
TxtContent.SelText = Clipboard.GetText
End Sub
Private Sub CmdClear_Click()
TxtContent.Text = ""
End Sub
Private Sub CmdQuit_Click()
End
End Sub