高分请教

Question

With sbScript
                        .Append("<script language='javascript'>" & vbCrLf)
                        .Append(vbTab & "window.opener.Form1.TextBox1.value = '" &   ListBox1.SelectedValue & "';" & vbCrLf)
                        .Append(vbTab & "window.opener.Form1.submit();" & vbCrLf)
                        .Append(vbTab & "window.close();" & vbCrLf)
                        .Append("</" & "script>")
                    End With
在我看的代码中出现了这样的一段内容：能不能帮我详细解释一下，谢谢了

Answer 1

给父窗体的textbox1赋值
然后刷新一下父窗体

Answer 2

将ListBox1的选中值赋给TextBox1，然后提交这个form,其实这些代码输出到客户端就是一段JS