如何获取多个框架页面的源代码？

一个框架中包含有多个页面（如下图）

当我采用如下程序获取框架中页面的源代码时，只能获取到框架中第一个页面的源代码

怎么样才能获取到其它页面的源代码呢？

Private Sub CommandButton1_Click()

Dim url As String

Dim str As String

url = "http://pro.

WebBrowser1.Navigate url

Set ie = WebBrowser1.Document.frames(2)

msgbox （ie.Document.documentelement.outerhtml）

End Sub