Private Sub SetFocus(ByVal controlToFocus As Control)
Dim scriptFunction As New StringBuilder
Dim scriptClientId As String
scriptClientId = controlToFocus.ClientID
scriptFunction.Append("<script language= vbscript>")
scriptFunction.Append("form1." & scriptClientId & ".focus")
scriptFunction.Append("</script>")
RegisterStartupScript("focus", scriptFunction.ToString())
End Sub
简介：String 对象是不可改变的。每次使用 System.String 类中的方法之一时，都要在内存中创建一个新的字符串对象，这就需要为该新对象分配新的空间。在需要对字符串执行重复修改的情况下，与创建新的 String 对象相关的系统开销可能会非常昂贵。如果要修改字符串而不创建新的对象，则可以使用 System.Text.StringBuilder 类。例如，当在一个循环中将许多字符串连接在一起时，使用 StringBuilder 类可以提升性能。
RegisterStartupScript：允许 ASP.NET 服务器控件在 Page 中发出客户端脚本块
与 RegisterClientScriptBlock 方法类似，该方法在 Page 对象的 <form runat= server> 元素的结束标记之前发出该脚本。发出脚本块时已定义了呈现该页的对象时，因此必须同时包括 <script> 元素的两个标记。
通过使用 key 标识脚本，多个服务器控件实例可以请求该脚本块，而不用将其发送到输出流两次。
具有相同 key 参数值的任何脚本块均被视为重复的。
注意 请记住在脚本周围加入 HTML 注释标记，以便在请求的浏览器不支持脚本时脚本不会呈现。