vb 自动插入

我想用vb实现以下功能希望的到高手的帮助
1。一个自动输入 就象用vb代码中输入 me“.”当 按下“.”时 就出现 下拉列表
2。还想实现 一个 单击一个“插入” 按扭时 可以在 文本的光标出插入 一段文本
3。 当输入 “< ” ">"时 把 尖括号变成红色

我用的RichTextBox
在线等哦 回答的好 再追加

1. 显示下拉列表
Private Sub RichTextBox1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) = "." Then
Form2.Show
End If
End Sub
注：form2中只有一个下拉列表，此列表的双击事件为：
Private Sub List1_DblClick()
Form1.RichTextBox1.SelText = List1.List(List1.ListIndex)
List1.Selected(0) = True
Me.Hide
End Sub

2. 光标处插入文本
Private Sub Command1_Click()
RichTextBox1.SelText = "AAAAAAAAAAAAAAAAAAAAAAAAAAAA"
End Sub

3. <>变红
Private Sub RichTextBox1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) = "<" Or Chr(KeyAscii) = ">" Then
RichTextBox1.SelColor = &HFF&
Else
RichTextBox1.SelColor = &H80000008
End If
End Sub

1、难，不知道光标在richtextbox中的坐标
2、直接插入就可以吧，richtextbox.seltext="要插入的文本"
3、貌似在你另一个问题里回答过了

====================================

3、