Create UserForm with Web Browser Functionality

How to create a user-form with basic web browser functionality using VBA.
Here’s the complete VBA code:
Option Explicit

Private Sub cmdBack_Click()
On Error Resume Next
WebBrowser1.GoBack
Err.Clear
End Sub

Private Sub cmdClose_Click()
Unload Me
End Sub

Private Sub cmdForward_Click()
On Error Resume Next
WebBrowser1.GoForward
Err.Clear
End Sub

Private Sub cmdNavigate_Click()
WebBrowser1.Navigate “http://www.” & TextBox1.Text
End Sub

Private Sub UserForm_Click()

End Sub

Private Sub UserForm_Initialize()
With Application
.WindowState = xlMaximized
Zoom = Int(.Width / Me.Width * 100)
Width = .Width
Height = .Height
End With
WebBrowser1.Navigate “https://www.youtube.com”
End Sub