تغییر اندازه وب بروز با تغییر فروم

[xrezax]

دوستان چکار کنم که وقتی فرم برنامم برزگ یا کوچیک شد وب بروزی که توشه هم به همون اندازه کوچیک یا بزرگ بشه

[IamOverlord]

سلام دوست عزیز!
یک WebBrowser رو به صورتی که می خواهید روی فرم باشه (یعنی تمام فرم رو گرفته باشه) روی فرم قرار بدید، بعد این کد رو برای برنامه تون بنویسید:

Dim oWidth As Long, oHeight As Long

Private Sub Form_Load()
oWidth = Me.Width
oHeight = Me.Height
WebBrowser1.Navigate "www.google.com"
End Sub

Private Sub Form_Resize()
WebBrowser1.Width = WebBrowser1.Width + (Me.Width - oWidth)
WebBrowser1.Height = WebBrowser1.Height + (Me.Height - oHeight)
oWidth = Me.Width
oHeight = Me.Height
End Sub

:چشمک: