p; End Property 行 99: 行 100: Public Overrides ReadOnly Property TemplateSourceDirectory As String 行 101: Get 行 102: Return "/study" 行 103: End Get 行 104: End Property 行 105: 行 106: Private Function __BuildControlmyTextBox() As System.Web.UI.Control 行 107: Dim __ctrl As System.Web.UI.WebControls.TextBox 行 108: 行 109: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",12) 行 110: __ctrl = New System.Web.UI.WebControls.TextBox 行 111: 行 112: #End ExternalSource 行 113: Me.myTextBox = __ctrl 行 114: 行 115: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",12) 行 116: __ctrl.ID = "myTextBox" 行 117: 行 118: #End ExternalSource 行 119: Return __ctrl 行 120: End Function 行 121: 行 122: Private Function __BuildControlmyButton() As System.Web.UI.Control 行 123: Dim __ctrl As System.Web.UI.WebControls.Button 行 124: 行 125: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",13) 行 126: __ctrl = New System.Web.UI.WebControls.Button 行 127: 行 128: #End ExternalSource 行 129: Me.myButton = __ctrl 行 130: 行 131: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",13) 行 132: __ctrl.ID = "myButton" 行 133: 行 134: #End ExternalSource 行 135: 行 136: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",13) 行 137: __ctrl.Text = "确定" 行 138: 行 139: #End ExternalSource 行 140: 行 141: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",13) 行 142: AddHandler __ctrl.Click, AddressOf Me.myButton_Click 行 143: 行 144: #End ExternalSource 行 145: Return __ctrl 行 146: End Function 行 147: 行 148: Private Function __BuildControlmyLabel() As System.Web.UI.Control 行 149: Dim __ctrl As System.Web.UI.WebControls.Label 行 150: 行 151: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",15) 行 152: __ctrl = New System.Web.UI.WebControls.Label 行 153: 行 154: #End ExternalSource 行 155: Me.myLabel = __ctrl 行 156: 行 157: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",15) 行 158: __ctrl.ID = "myLabel" 行 159: 行 160: #End ExternalSource 行 161: Return __ctrl 行 162: End Function 行 163: 行 164: Private Function __BuildControl__control2() As System.Web.UI.Control 行 165: Dim __ctrl As System.Web.UI.HtmlControls.HtmlForm 行 166: 行 167: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",10) 行 168: __ctrl = New System.Web.UI.HtmlControls.HtmlForm 行 169: 行 170: #End ExternalSource 行 171: Me.__control2 = __ctrl 行 172: Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor) 行 173: 行 174: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",10) 行 175: __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Microsoft.VisualBasic.ChrW(13)&Microsoft.VisualBasic.ChrW(10)&" 请输入您的姓名:"&Microsoft.VisualBasic.ChrW(13)&Microsoft.VisualBasic.ChrW(10)&" ")) 行 176: 行 177: #End ExternalSource 行 178: 行 179: #ExternalSource("D:\works\study\学习ASP.NET\frist.aspx",10) 行 180: Me.__BuildControlmyTextBox 行 181: 行 182: #End ExternalSource 行 183: 行 184:  上一页 [1] [2] [3] 下一页 |