- 1、本文档共6页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VBNET2008六种添加记录方法学习笔记(图例、源码、说明)
VBNET2008六种添加记录方法学习笔记
(图例、源码、说明)
(本文代码VB.NET2008 + SQL Server 2005下测试通过。)
VB6.0向VB.NET过渡后,很多编程爱好者对VB.NET数据库编程感到迷惑,本文通过对国内教材、国外教材、老教材、新教材的研究,将作者看到过的6种(insert语句、参数化3种、行提交、存储过程、)添加(增加)记录的方法提炼出来,并分析了各种添加记录的优点、缺点及是否常用等做了简单叙述。读者可以根据这些方法编写出对应的增删改查(CRUD)代码,使自己的程序编写的更加容易理解,提高编程效率,提升程序的运行速度。
百度文库首发,侵权必究。
一、前期准备工作(图例)
1、引用数据库命名空间
使用数据库对象时要首先导入数据库命名空间,数据库对象的命名空间根据你所使用的数据库不同,命名空间也不一样。本文使用的是SQL Server的命名空间。
Imports System.Data.SqlClient
2、界面设计
1个Datagridview控件,5个TextBox控件,1个DateTimePicker控件,5个按钮控件。具体控件示例如下:
3、在Datagridview表格中预览数据库记录
简单的查询了这个表的所有记录。
Private Sub dataView()
Dim objConn As New SqlClient.SqlConnection
Dim objDa As New SqlClient.SqlDataAdapter
Dim objComm As New SqlClient.SqlCommand
Dim objDs As New DataSet
objConn.ConnectionString = Data Source=49;Initial Catalog=ldg;User ID=wink;Pwd=wcp6810662
objComm.CommandText = select * from wink
objComm.Connection = objConn
objDa.SelectCommand = objComm
objConn.Open()
objDa.Fill(objDs, wink)
objConn.Close()
DataGridView1.DataSource = objDs.Tables(wink)
End Sub
4、窗体加载时调用dataView()过程预览数据库记录
窗体的 Form2_Load方法在本文的程序代码段中多次被调用以刷新表格,读者可以直接调用dataView()过程刷新表格。
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call dataView()
End Sub
二、添加记录的六种方法及简要分析(源码及说明)
请注意代码段使用时注意控件名称,否则复制粘贴后容易出现错误。
1、使用INSERT语句添加记录方法:
直接使用SQL的INSERT语句在数据库中添加记录,这种方法大家会经常见到,此种方法较为初级,数据库字段较多时不便于维护,但较为直观,很多初学者使用此方法。
按钮2代码如下:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim objConn As New SqlClient.SqlConnection
Dim objComm As New SqlClient.SqlCommand
objConn.ConnectionString = Data Source=49;Initial Catalog=ldg;User ID=wink;Pwd=wcp6810662
objComm.Connection = objConn
Dim sql As String
sql = insert into wink (id,name,sex,age,address,birth) values( TextBox1.Text.ToString(
您可能关注的文档
最近下载
- 地铁物业管理培训课件.pptx
- 工程数学(本)形成性考核作业4.doc
- GB T 34520.7-2017 连续碳化硅纤维测试方法 第7部分:高温强度保留率 标准.pdf
- 自编教材审核表(模板).pdf
- 一例慢性阻塞性肺疾病急性加重期合并II型呼吸衰竭患者的个案护理PPT.pptx
- [大庆]黑龙江大庆市民政局所属事业单位选调事业编制工作人员笔试上岸试题历年高频考点难、易错点附带答案详解.docx VIP
- ISO9001 14001 ISO45001检查表审核方法全套.docx VIP
- 增光膜规格说明书.pdf
- 人教版数学四年级第一单元教材解读及集体备课课件.pptx VIP
- 2024 离婚协议书 离婚协议(打印版).docx
文档评论(0)