CAXAVIEW控件使用

各位大神，我准备把CAXAVIEW控件放在VB中，实现exb文件的预览功能，不知道CAXAVIEW控件代码该怎么写。求各位大神给个详细代码来打开指定目录下的CAXA文件。
大概界面就是这样，我单击文件清单下的文件，CAXAVIEW控件就预览此文件。

我这样写的，但是一直不显示，也不报错。
Private Sub File1_Click()
Text1.Text = File1.Path & "\" & File1.FileName

CaxaView1.LoadFileName = Text1.Text
CaxaView1.OpenFile (Text1.Text)
Form1.Refresh

End Sub

好像高版本caxa的这个控件在vb里不能显示图纸，听说要购_买授权才可以。

2007的 控件在vb里是可以显示图纸的。

我就说嘛，好像以前用XP版本的时候都得行，现在不行了。
代码有问题吗？