文章详情

短信预约-IT技能 免费直播动态提醒

请输入下面的图形验证码

提交验证

短信预约提醒成功

VB.NET数据库怎么用

2023-06-17 17:48

关注

这篇文章主要为大家展示了“VB.NET数据库怎么用”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“VB.NET数据库怎么用”这篇文章吧。

VB.NET数据库代码示例:

  1. Imports System  

  2. Imports System.Data  

  3. Imports System.Data.SqlClient  

  4. public Class MainClassclass MainClass  

  5. Shared Sub Main()Sub Main()  

  6. Dim thisConnection As New SqlConnection
    ("server=(local)\SQLEXPRESS;" & _  

  7. "integrated security=sspi;database=
    MyDatabase")  

  8. ' Sql Query   

  9. Dim sql As String = "SELECT * 
    FROM Employee " 

  10. Dim insertSql As String = "INSERT
     INTO Employee " & _  

  11. "(ID, FirstName, LastName)VALUES" & _  

  12. "(@ID, @FirstName, @LastName)"  

  13. Try  

  14. ' Create Data Adapter  

  15. Dim da As New SqlDataAdapter  

  16. da.SelectCommand = New SqlCommand
    (sql, thisConnection)  

  17. ' Create and fill Dataset  

  18. Dim ds As New DataSet  

  19. da.Fill(ds, "Employee")  

  20. ' Get the Data Table  

  21. Dim dt As DataTable = ds.Tables
    ("Employee")  

  22. ' Display Rows Before Changed  

  23. Console.WriteLine("Before altering 
    the dataset")  

  24. For Each row As DataRow In dt.Rows  

  25. Console.WriteLine("{0} | {1} | {2}", _  

  26. row("ID").ToString().PadRight(10), _  

  27. row("FirstName").ToString().PadRight(10), _  

  28. row("LastName"))  

  29. Next  

  30. ' Add A Row  

  31. Dim newRow As DataRow = dt.NewRow()  

  32. newRow("FirstName") = "Edna"  

  33. newRow("LastName") = "Everage"  

  34. newRow("ID") = "2"  

  35. dt.Rows.Add(newRow)  

  36. ' Display Rows After Alteration  

  37. Console.WriteLine("=========")  

  38. Console.WriteLine("After 
    altering the dataset")  

  39. For Each row As DataRow In dt.Rows  

  40. Console.WriteLine("{0} | {1} | {2}", _  

  41. row("ID").ToString().PadRight(10), _  

  42. row("FirstName").ToString().PadRight(10), _  

  43. row("LastName"))  

  44. Next  

  45. ' Insert employees  

  46. ' 1. Create command  

  47. Dim insertCmd As New SqlCommand
    (insertSql, thisConnection)  

  48. ' 2. Map parameters  

  49. insertCmd.Parameters.Add("@FirstName", _  

  50. SqlDbType.NVarChar, 10, "FirstName")  

  51. insertCmd.Parameters.Add("@LastName", _  

  52. SqlDbType.NVarChar, 20, "LastName")  

  53. insertCmd.Parameters.Add("@ID", _  

  54. SqlDbType.Int, 15, "ID")  

  55. ' 3. Insert employees  

  56. da.InsertCommand = insertCmd 

  57. da.Update(ds, "Employee")  

  58. Catch ex As SqlException  

  59. ' Display error  

  60. Console.WriteLine("Error: " 
    & ex.ToString())  

  61. Finally  

  62. ' Close Connection  

  63. thisConnection.Close()  

  64. Console.WriteLine("Connection 
    Closed")  

  65. End Try  

  66. End Sub  

  67. End Class 

以上是“VB.NET数据库怎么用”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注编程网行业资讯频道!

阅读原文内容投诉

免责声明:

① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。

② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341

软考中级精品资料免费领

  • 历年真题答案解析
  • 备考技巧名师总结
  • 高频考点精准押题
  • 2024年上半年信息系统项目管理师第二批次真题及答案解析(完整版)

    难度     813人已做
    查看
  • 【考后总结】2024年5月26日信息系统项目管理师第2批次考情分析

    难度     354人已做
    查看
  • 【考后总结】2024年5月25日信息系统项目管理师第1批次考情分析

    难度     318人已做
    查看
  • 2024年上半年软考高项第一、二批次真题考点汇总(完整版)

    难度     435人已做
    查看
  • 2024年上半年系统架构设计师考试综合知识真题

    难度     224人已做
    查看

相关文章

发现更多好内容

猜你喜欢

AI推送时光机
位置:首页-资讯-后端开发
咦!没有更多了?去看看其它编程学习网 内容吧
首页课程
资料下载
问答资讯