Visual Basic para Aplicaciones - Mostrar un documento Word

Hola. Necesito ayuada urgentemente. Tengo una funcion en VB 6.0, en la cual se prepara un documento word para poder imprimirlo si se desea. El problema reside en eque utilizo una funcion de una clase creada que intenta ponerme la ventana de word como la ventana activa, y lo hace pero la abre dos veces, aunque en la segunda no tenga nada.El codigo de esta funcion es:

Public Function fg_blnActivarVentana(pr_strClaseVentana As String) As Boolean
Dim l_lngHandle As Long

fg_blnActivarVentana = True
l_lngHandle = FindWindow(pr_strClaseVentana, vbNullString)
If l_lngHandle > 0 Then
ShowWindow l_lngHandle, 10 'Opción por defecto
ShowWindow l_lngHandle, 3 'Maximizar
Else
fg_blnActivarVentana = False
End If

end function

Si alguien sabe como evitar que esto ocurrra, por favor que me lo haga saber.

Gracias