包含vb.net快捷注释的词条

VB.net的快捷键

1． F12：转到定义；Shift+F12：转到引用

创新互联公司总部坐落于成都市区，致力网站建设服务有成都网站制作、网站设计、网络营销策划、网页设计、网站维护、公众号搭建、小程序开发、软件开发等为企业提供一整套的信息化建设解决方案。创造真正意义上的网站建设，为互联网品牌在互动行销领域创造价值而不懈努力！

2． F5：启动；Ctrl+F5：开始执行（不调试）；Shift+F5：停止调试

3． F7：查看代码；Shift+F7：查看视图设计器

4． Ctrl+Alt+L：解决方案资源管理器

5． Ctrl+Alt+J：对象浏览器

6． F4：显示属性窗口

7． Ctrl+Alt+X：工具箱

8． Ctrl+Alt+C类视图

9． Alt+Enter：查看属性

10．F10：逐过程调试

11．F11：逐语句调试

12．Ctrl+B：新断点

13．Ctrl+Shift+F9：清除所有断点

14．Ctrl+Shift+B生成解决方案

15．Shift+Alt+Enter：全屏

16．大纲显示：Ctrl+M, Ctrl+M：切换大纲显示展开；Ctrl+M, Ctrl+L：切换所有大纲显示；Ctrl+M,Crtl+P停止大纲显示；Ctrl+M, Ctrl+O：折叠到定义

17．智能感知：Ctrl＋J：列出成员；Ctrl+Shift+空格：参数信息； Ctrl+K,Ctrl+I：快速信息；Alt+右箭头键：完成单词

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.NET注释

这时用vb6.0改写的吧.net配置文件不用ini了，前面5行，判断符合条件则获取相关文本框中的内容，在下面4行把相关内容就是前面5行中的后4行的内容写进ini配置文件，然后令btnDefault可用，同时调用btnDefault.PerformClick函数

Private Sub frmDbConn_Load是该form启动加载的一些参数，即获取配置文件中的相关信息，同时把信息显示在相关的文本框中。