<TABLE border=0>
<TBODY>
<TR>
<TD><A href="http://www.xxx.com/aaa.asp"><IMG
src="ico/type.gif" border=0 width="36" height="24"></A>
</TD>
<TD><A href="http://www.xxx.com/aaa.asp"><IMG
src="ico/type.gif" border=0 width="36" height="24"></A>
</TD>
.
.
.
</TR>
</TBODY>
</TABLE>
<TBODY>
<TR>
<TD><A href="http://www.xxx.com/aaa.asp"><IMG
src="ico/type.gif" border=0 width="36" height="24"></A>
</TD>
<TD><A href="http://www.xxx.com/aaa.asp"><IMG
src="ico/type.gif" border=0 width="36" height="24"></A>
</TD>
.
.
.
</TR>
</TBODY>
</TABLE>
Private Sub Form_DblClick()
Inet1.AccessType = icUseDefault
RichTextBox1.Text = Inet1.OpenURL ("HTTP://www.microsoft.com"))
End Sub