在线精品99_中国九九盗摄偷拍偷看_91免费版在线观看_91.app_91高清视频在线_99热最新网站

VB.NET修改数据存在多个txtbox时SQL语句的操作是怎样的

111次阅读
没有评论

共计 2191 个字符,预计需要花费 6 分钟才能阅读完成。

今天就跟大家聊聊有关 VB.NET 修改数据存在多个 txtbox 时 SQL 语句的操作是怎样的,可能很多人都不太了解,为了让大家更加了解,丸趣 TV 小编给大家总结了以下内容,希望大家根据这篇文章可以有所收获。

VB.NET 修改数据存在多个 txtbox 时,SQL 语句的操作
1. 一个 Button1 的 text 为查询和一个 DataGridView1, 点击查询按钮的代码
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim strConn = Data Source=192.168.1.110/orcl;User ID=test;Password=orcl
        Dim dbcmd As OracleCommand
        Dim dt = New DataTable(ds)
        Dim dbConnection As OracleConnection
        Try
            dbConnection = New OracleConnection(strConn)
            dbConnection.Open()
            dbcmd = dbConnection.CreateCommand
            dbcmd.CommandText = select * from student
            Dim da As OracleDataAdapter = New OracleDataAdapter(dbcmd)
            da.Fill(dt)
            DataGridView1.DataSource = dt 这时候可以把 dt 的值直接赋值给 DataGridview1 控件
        Catch ex As Exception
            MsgBox(查询数据库出错)
        End Try
    End Sub

2. 存在两个 TextBox1.TextBox2, 文本框和一个按钮, Button2, 按钮 text 为修改, 点击后的代码
  Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim username, password As String
        Dim temp, temp3 As String
        If Len(TextBox1.Text.Trim) 0 Then
            username = sname= + + TextBox1.Text.Trim + + ,
        Else
            username =
        End If
        If Len(TextBox2.Text.Trim) 0 Then
            password = spwd= + + TextBox2.Text.Trim + + ,
        Else
            password =
        End If
        If Len(username) 0 And Len(password) 0 Then
            temp = username + password
            MsgBox(temp.Length)
            temp = Mid(temp, 1, temp.Length – 3)
            MsgBox(temp + temp)
            MsgBox(current + DataGridView1.CurrentRow.Cells(1).Value)
        Else
 
         temp =
        End If
       
        Dim strConn = Data Source=192.168.1.110/orcl;User ID=test;Password=orcl
        Dim dbcmd As OracleCommand
        Dim dbConnection As OracleConnection
        If username.Length = 0 And password = 0 Then
        Try
            dbConnection = New OracleConnection(strConn)
            dbConnection.Open()
            dbcmd = dbConnection.CreateCommand
            Dim temp2 As String
            temp2 = update student set + temp +  where sname= + + DataGridView1.CurrentRow.Cells(1).Value +
            dbcmd.CommandText = temp2
            MsgBox(temp2)
            dbConnection.BeginTransaction()
            dbcmd.ExecuteNonQuery() 返回改动的 row 行数
        Catch ex As Exception
            MsgBox(修改失败)
            Exit Sub
        End Try
        Else
           MsgBox(请填入要修改的参数)
        End If
    End Sub

看完上述内容,你们对 VB.NET 修改数据存在多个 txtbox 时 SQL 语句的操作是怎样的有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注丸趣 TV 行业资讯频道,感谢大家的支持。

正文完
 
丸趣
版权声明:本站原创文章,由 丸趣 2023-07-17发表,共计2191字。
转载说明:除特殊说明外本站除技术相关以外文章皆由网络搜集发布,转载请注明出处。
评论(没有评论)
主站蜘蛛池模板: 暖暖视频日本在线观看 | 成人午夜18免费看 | 亚洲高清一区二区三区电影 | 国产毛片毛片精品天天看 | 欧美成人综合在线观看视频 | 亚洲女久久久噜噜噜熟女 | 欧美在线a | 97久久国产一区二区三区四区 | 一个人看的www免费视频中文 | 乌克兰少妇videos高潮 | 午夜福利伦伦电影理论片在线观看 | 国产天天操 | 天天综合色网 | 成人福利视频在线看高清观看 | 欧美国产精品一区二区免费 | 黄视频在线观看www软件 | 天天综合在线观看 | 国产一区国产二区国产三区 | 免费国产成人高清在线观看不卡 | 中文字幕亚洲乱码熟女在线 | 亚洲欧美日产综合在线看 | 影视先锋av资源噜噜 | 成年女人视频在线观看免费 | 污污的网站免费 | 免费一级大片儿 | 亚洲欧美精品一中文字幕 | 国产精品视频福利一区二区 | 视频在线一区二区三区 | 亚洲欧美日韩精品永久在线 | 国产精品无码av天天爽播放器 | 欧美激情视频一区 | 久草在现 | 亚洲国产中文在线二区三区免 | 中文版在线乱码在线看 | 视频一二三区 | se就是色94欧美setu | 亚洲一区免费观看 | 一级大片在线观看 | 真人做人试看60分钟免费视频 | 成人欧美网站免费 | 色婷婷综合激情视频免费看 |