vb6上で、swfを再生させる方法教えてください。