VB编程技巧两则(1)
由于普通的TextBox控件不支持不连续字符串同时高亮显示，所以我们选择RichTextBox控件。单击“工程”菜单，再单击“组件”，从弹出的对话框中选择“Microsoft Rich Textbox Control 5.0”复选框，确定加载RichTextBox控件。
新建一个工程，在窗体（Form）上添加一个RichTextBox控件和两个Command（按钮）控件，都采用系统默认的Name属性值；设置RichTextBox的Text属性值为空，Command1和Command2的Caption属性值分别设为“输入文本”和“选择字符串”。最后，添加如下VB代码：
Private Sub Command1-Click（）??
Dim str As String
Dim Text As String
str=“输入文本”
Text=InputBox（str）
RichTextBox1.Text=Text
End Sub
Private Sub Command2-Click（）??
Dim str As String
Dim Text As String
Dim Position As Integer
Dim Lenth As Integer
str=“输入要高亮显示的字符串”
Text=InputBox（str）
If Text <> “” Then
Position=InStr（RichTextBox1.Text，Text）-1
Lenth=Len（Text）
RichTextBox1.SelStart=Position
RichTextBox1.SelLength=Lenth
RichTextBox1.SelColor=RGB（255，0，0）
Do While InStr（Position+Lenth+1， RichTextBox1.Text， Text） <> 0
Position=InStr（Position+Lenth+1， RichTextBox1.Text， Text）-1
RichTextBox1.SelStart=Position
RichTextBox1.SelLength=Lenth
RichTextBox1.SelColor=RGB（255，0，0）
Loop
End If
End Sub
按F5执行程序，单击“输入文本”按钮，在弹出的对话框中输入一些文本，确定后，刚刚输入的文本将显示在RichTextBox中；再单击“选择字符串”按钮，在弹出的对话框中输入你希望高亮显示的字符串，确定后，RichTextBox中相应的字符串将以红色高亮显示。
#1 二、在Windows 95/98启动后自动启动程序
我们都知道在Windows 95/98的“开始”→“程序”菜单下有一“启动”选单项，当每次启动Windows 95或Windows 98时，系统都会自动启动放在“启动”菜单栏里的可执行程序。
但目前有好多软件，像超级解霸5、ICQ，以及大部分实时侦测病毒的软件等等，安装后，并没有放在“启动”选单里，也能在启动操作系统时自动启动。怎么实现的呢？
其实只要知道Windows注册表的一些知识，这个问题就不能称之为问题了。用鼠标单击“开始”，打开开始选单，再单击“运行”，出现一对话框，然后输入“regedit”，确定后，会打开系统注册表编辑器，找到HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run，加入你的程序的入口，就可以了。如果不知道怎么加，就参考一下已经存在的键值。