如何给一大段 VB 程序一次性加上注释符号1、首先是在excle软件中找到“开发工具”-》Visual Basic 。
2、进入代码区 。
3、选中要注释的一段代码 。
4、然后在顶部找到工具栏 。
5、然后右键单击,选择“编辑” 。
6、然后找到注释代码块 。
7、点击之后,我们发现我们刚才选中的代码块就被注释掉了 。
VB.NET的 把重点的语句注释下就行了'''两段程序就是利用.net的连接对象的功能来完成登录的实例
Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click 'start按钮触发的函数
Dim schclass As String = Trim(txtClass.Text) ‘将txtClass里文本赋值给变量schclass
Dim selestr As String
’提示用户txtClass文本框不能为空
If schclass"" Then
selestr = "班级='"schclass"'"
Else
MsgBox("请输入班级名称", 64, "提示") ‘ 显示保存成功提示信息
End If
‘创建一个DataView对象 , 即将数据集DataSet11里的学生成绩表的DefaultView实例化
Dim dvresult As DataView = DataSet11.学生成绩.DefaultView
’按学号字段排序
dvresult.Sort = "学号"
‘按刚才txtClass里输入的班级查询
dvresult.RowFilter = selestr
dvresult.RowStateFilter = DataViewRowState.CurrentRows
’然后将筛选的结果输入到datagrid上
DataGrid1.DataSource = dvresult
End Sub
Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click‘ok按钮触发的函数
’如果txtUserName或txtPass文本框为空,提示并中断函数
If txtUserName.Text = "" Or txtPass.Text = "" Then
Response.Write("script language=vbscriptalert""用户名或密码不能为空!""/script")
Exit Sub
End If
‘定义链接、执行、阅读 对象
Dim mycon As New OleDbConnection
Dim mycmd As New OleDbCommand
Dim reader As OleDbDataReader
’给连接对象赋值连接字符串,access类型的 。
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="_
Server.MapPath("Msg.mdb")
‘打开连接对象
mycon.Open()
’将连接对象复制到执行对象上
mycmd.Connection = mycon
‘然后就给执行对象赋值执行类型和执行语句
mycmd.CommandType = CommandType.Text
mycmd.CommandText = "Select * from myuser Where 用户名='"txtUserName.Text"'"" and 密码='"txtPass.Text"'"
’然后将执行对象的监听实例化
reader = mycmd.ExecuteReader()
‘如果执行不成功 , 即没有得到结果集就提示否则将结果集的用户名赋值给一个session以供其他页面使用
If reader.Read = False Then
Response.Write("script language=vbscriptalert""用户名或密码错,你不能登录!""/script")
Else
Session("username") = reader("用户名")
Response.Redirect("lwmsg.aspx")
End If
’关闭监听
reader.Close()
‘关闭连接
mycon.Close()
End Sub
什么是VB程序中的注释?注释是指在编写代码时,编写者在代码中添加的一些说明性语句 。注释是非执行语句,只是对有关的内容加以说明 。例如,说明某个过程的功能,定义某个变量的目的等 。在计算机二级的程序中添加注释是个良好的编程习惯 。每个程序员都有这样的体会:自己编写的一些代码,过一段时间后再去阅读 , 会感到很费劲甚至难以读懂门阅读别人编写的代码更是一可想而知 。因此,在编写程序代码时,最好为代码添加注释,以便于自己或别人能较轻松地读懂代码 。在VB中,注释以Rem关键字开头,并且Rem关键字与注释内容之间要加一个空格 。注释可以是单独的一行,也可以写在其他语句行的后面 。如果在其他语句行后使用Rem关键字 , 则必须使用冒号(:)与语句隔开 。也可以使用一个撇号(')来代替Rem关键字 。若使用撇号 , 则在其他语句行使用时不必加冒号 。在【代码】窗口中,注释添加完成后 , 自动以绿色显示 。在VB的【编辑】工具栏中还提供了专门用于设置注释块的按钮 , 使得将多行语句设置为注释或取消注释十分方便 。在默认情况下,【编辑】工具栏不出现在界面中,在【视图】菜单的【工具栏】子菜单中选择【编辑】选项即可打开【编辑】工具栏 。设置注释块的操作是:在【代码】窗口中选中要设置为注释的单行或多行语句,单击【编辑】工具栏中的【设置注释块】按钮 , 即可为所选的每行语句前添加一个撒号('),将创门设置为注释 。单击【解除注释块】按钮 , 则情况相反 。有时候,一条语句可能会很长,如果将它写在一行上,将给阅读或打印代码带来不便 。在VB中,可以使用分行符(_)(一个空格和一条下划线)将一条语句写在两行或多行上 。在同一行内,分行符后面不能添加注释,例如下面的语句是错误的:Fonm1.Caption=_'设置窗体标题 。"分行".分行符一般添加在运算符的前后 。不能使用分行符将一个变量名或属性名分隔成两行,例如下面的语句是错误的:Forml.Capt_.ion="分行".在通常情况下 , 一条语句占用一行 , 并且在语句末尾没有表示语句结束的符号 。但也可以将多行语句写在同一行上 , 相邻的两条语句中间使用冒一号(:)作为续行符 。在打印程序时,将多行语句写在同一行上可以节省纸张 。创业教育提醒您为了便于程序的阅读,最好在一行上只写一条语句 。相关文章
推荐阅读
- js的applet调用JAVA目录设置,js调用servlet
- 如何申请做一个电商,如何申请做一个电商公司
- python中文路径文件名称,python路径中有中文
- 三明抖音直播运营培训,学抖音直播运营培训费多少
- mysql怎么查出空值 mysql查询空字符串
- 华为鸿蒙车机操作系统,华为鸿蒙车机系统包括什么
- 新媒体如何传播消息和视频,如何利用新媒体进行传播
- sqlserver数据库文件太大,sql数据库文件大小限制
- c语言函数里的指针 c语言函数指针的用法