VB中selstart的问题

我想知道的是下面的这段代码中 1,If Trim(Text2) = vbNullString Then Last_Line_Feed = 0  中的vbNullString 的意义  2, Last_Line_Feed = Text2.SelStart 怎么就能重设最后输入行的位置  多谢各位大侠帮忙指点 
'接收TEXT2输入框的按键,并做响应
Private Sub Text2_KeyPress(KeyAscii As Integer)

'定义变量 Last_Line_Feed 来记录最后输入行的位置
Static Last_Line_Feed As Long
'定义 New_Line 字符串记录新键入的一行文本的内容
Dim New_Line As String
'如果使用者按下CLEAR按钮对输入框内容清空,这时TEXT2为空,则重设最后输入行的位置为0
If Trim(Text2) = vbNullString Then Last_Line_Feed = 0
'当使用者按下ENTER键时
If KeyAscii = 13 Then
'取得最后输入行的内容并赋值给 New_Line 字符串
New_Line = Mid(Text2, Last_Line_Feed + 1)
'重设最后输入行的位置
Last_Line_Feed = Text2.SelStart
'通过 WINSOCK 发送新输入的一行文本的内容
Winsock1.SendData New_Line
'在状态栏显示发送信息
StatusBar1.Panels(2).Text = " 发送 " & (LenB(New_Line) / 2) & " byte的消息 "
End If

End Sub

1.vbNullString为空字符串
2.Text2.SelStart 没有选择时返回0追问

你好,请问,是不是Text2.SelStart 没有选择时为TEXT2中光标所在的位置
还有就是这个vbNullString与"" 有什么区别啊,多谢

追答

vbNullString表示不存在字符串,
""表示字符串是空的。
Text2.SelStart 没有选择时为TEXT2中光标所在的位置
是的!

追问

哦,明白了.多谢了,麻烦再帮我解释一下,这个已是题外了.呵呵
下面这句Text1.SelText = New_Text就能在TEXT1显示框中显示New_Text的内容.seltext怎么理解

Winsock1.GetData New_Text
'在TEXT1显示框中显示新接收到的信息
Text1.SelText = New_Text

追答

这句Text1.SelText = New_Text 能在TEXT1显示框中显示New_Text的内容,这句运行添加一次,之前的文字不会被清除.seltext表示选择的文字,这时文字的底色是蓝色的。

在TEXT1显示框中显示New_Text的内容,用这句比较好一点
Text1.Text = New_Text

追问

为什么啊,还是有些不明白,像那个text1.text=new_text这个好理解.可Text1.SelText = New_Text还是不明白啊.呵呵,麻烦麻烦

温馨提示:答案为网友推荐,仅供参考
相似回答