Private Sub Form_Close()
If Not oIE Is Nothing Then
oIE.Quit
Set oIE = Nothing
End If
End Sub
Private Sub コマンド5_Click()
If Not oIE Is Nothing Then
oIE.Quit
Set oIE = Nothing
End If
Set oIE = CreateObject("InternetExplorer.Application")
If oIE Is Nothing Then
MsgBox "IEの起動に失敗しました。", vbOKOnly
Exit Sub
End If
oIE.Visible = True
oIE.navigate ("about:blank")
ありがとうございます。
試してみます。