利用VB文本框选择文本内容的属性实现指定邮件号码的轨迹查询

作者:iamlaosong

在程序中,对文本框中文本内容进行选择时,用SelStart、SelLength、SelText属性3个属性来标识用户选中的正文。这些属性没有列在属性窗口中,但在程序中可以使用这些属性。SelStart:选定正文的开始位置,第一个字符的位置是0。Selcength:选定正文长度。SelText:选定正文内容。设置了SelStarl和SelI~ength属性后,VB会自动将设定的正文送入SelText属性存放。这些属性一般用于在文本编辑中设置插入点及范围,选择字符串,清除文本等,并且经常与剪贴板一起使用,完成文本信息的剪切、拷贝、粘贴等功能。用SelText来提取选择的内容。

下面程序就是双击文本后,系统自动选择该行邮件号码,,将号码发送到网页,实现邮件轨迹查询:

Private Sub Text1_DblClick()WebBrowser1.Visible = TrueWebBrowser1.Navigate ""Do Until WebBrowser1.ReadyState = 4DoEventsLoopWebBrowser1.Document.ParentWindow.Frames("maincontext").Document.GetElementById("mailNum").InnerText = Text1.SelTextWebBrowser1.Document.ParentWindow.Frames("maincontext").Document.Forms("mailTrackSnglForm").submitEnd Sub程序界面如下:

多看书,看好书。

利用VB文本框选择文本内容的属性实现指定邮件号码的轨迹查询

相关文章:

你感兴趣的文章:

标签云: