在page 中发出客户端脚本块

  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 对象相关的系统开销可能会非常昂贵。如果要修改字符串而不创建新的对象，则可以使用

本文地址：http://com.8s8s.com/it/it7641.htm