تغییر اندازه فونت وب بروزر
این کد به شما نشون میده که چطور اندازه فونت صفحه را تغییر دهید
همان View -> Text Size Menu در IE
- Private Sub Command1_Click() ' Smallest Button
- On Error Resume Next
- WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(0), vbNull
- End Sub
- Private Sub Command2_Click() 'Small Button
- On Error Resume Next
- WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(1), vbNull
- End Sub
- Private Sub Command3_Click() 'Medium Button
- On Error Resume Next
- WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(2), vbNull
- End Sub
- Private Sub Command4_Click() 'Large Button
- On Error Resume Next
- WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(3), vbNull
- End Sub
- Private Sub Command5_Click() 'Largest Button
- On Error Resume Next
- WebBrowser1.ExecWB OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, CLng(4), vbNull
- End Sub
- Private Sub Form_Load()
- WebBrowser1.Navigate2 "www.google.com"
- End Sub