十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
你好,VB中的注释就是一个单引号
创新互联建站长期为上1000家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为市中企业提供专业的成都网站设计、成都网站建设、外贸网站建设,市中网站改版等技术服务。拥有10年丰富建站经验和众多成功案例,为您定制开发。
'
,但是一次只能注释一行。
如果你要一次注释多行代码,可以
在菜单栏空白地方右键,勾选"编辑"
新出来的菜单面板有个图标(在一个手的旁边),是注释代码块
选择多行代码,点一下这个"注释代码块"就行了,右边紧挨的是取消注释代码块.
。
希望我的回答对你有帮助!
1、首先是在excle软件中找到“开发工具”-》Visual Basic。
2、进入代码区。
3、选中要注释的一段代码。
4、然后在顶部找到工具栏。
5、然后右键单击,选择“编辑”。
6、然后找到注释代码块。
7、点击之后,我们发现我们刚才选中的代码块就被注释掉了。
不能,只能一行一行带引号。不过可以用注释块。在菜单栏下面的工具条上点击右键,然后选择“编辑”把编辑工具栏调出来,此时选中你要注释的代码,单击“编辑”工具栏上的小手右边的那个按钮(设置注释块)即可。
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的代码实在不懂了
先选中需要注释的行或将光标置于要注释的行的前面。然后先按CTRL+K,然后按CTRL+C
取消注释:CTRL+K,再按CTRL+U
两次按键要迅速