大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
在自己的过程最前面打出''',即三个半角单引号,然后回车,剩下的你一看就明白了.
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:主机域名、虚拟空间、营销软件、网站建设、安康网站维护、网站推广。
如:
更深的应用具体的可以参看MSDN关于XML注释的部分.
html
head
�script language="VB" runat="server"
��Sub Page_Load(sender As Object, e As EventArgs) '在页面加载时发生的事件
���If Not IsPostBack Then '如果不是IsPostBack的话
����Dim values as ArrayList= new ArrayList() '新建一个名为values的数组列表
'以下代码中,往values中添加项目
����values.Add ("北京")
����Values.Add ("上海")
����Values.Add ("天津")
����Values.Add ("哈尔滨")
'设置下拉列表框的数据源为values
����DropDown1.DataSource = values
����DropDown1.DataBind
���End If
��End Sub
�/script
/head
body
�form runat="server"
���asp:DropDownList ID="DropDown1" runat="server" /
�/form
/body
/html
html
head
��script language="VB" runat="server"
����Sub Page_Load(sender As Object, e As EventArgs) '在页面加载时发生的事件
������If Not IsPostBack Then '如果不是IsPostBack的话
��������Dim values as ArrayList= new ArrayList() '新建一个名为values的数组列表
'以下代码中,往values中添加项目
��������values.Add (0)
��������values.Add (1)
��������values.Add (2)
��������values.Add (3)
��������values.Add (4)
��������values.Add (5)
��������values.Add (6)
'设置下拉列表框的数据源为values
��������DataList1.DataSource = values
��������DataList1.DataBind
������End If
����End Sub
定义一个名为EvenOrOdd的函数,参数有number,返回一个字符串
����Function EvenOrOdd(number As Integer) As String
������If (number Mod 2 0) Then '如果number÷2的余数不等于0
�������Return "奇数" '返回“奇数”
������Else '否则
�������Return "偶数" '返回“偶数”
������End If
����End Function
��/script
/head
body
��form runat="server"
���asp:DataList id="DataList1" runat="server"
����BorderColor="#000000"
����BorderWidth="1"
����GridLines="Both"
����CellPadding="3"
����CellSpacing="0"
����
����ItemTemplate
�����数字值: %# Container.DataItem %
�����偶/奇: %# EvenOrOdd(Container.DataItem) %
����/ItemTemplate
���/asp:DataList
��/form
/body
/html
其他ASP的代码实在不懂了
在要注释的函数上方添加 ‘’‘ (三个)
会自动弹出!
'''summary
''' 这个是函数说明
'''/summary
'''returns返回说明/returns
'''remarks/remarks
详情参考:
这时用vb6.0改写的吧.net配置文件不用ini了,前面5行,判断符合条件则获取相关文本框中的内容,在下面4行把相关内容就是前面5行中的后4行的内容写进ini配置文件,然后令btnDefault可用,同时调用btnDefault.PerformClick函数
Private Sub frmDbConn_Load是该form启动加载的一些参数,即获取配置文件中的相关信息,同时把信息显示在相关的文本框中。