Private Sub Page_Load(ByVal s As Object, ByVal e As EventArgs) Handles MyBase.Load
  ' ScriptString 是 javascript 语句
  page.registerstartup("script",ScriptString)
end sub