vb.net中信息的删除 vbs删除文件夹及文件

VB.net怎样全部删除DataGridView的内容？

方法有多种。

可以dataAdapter.Fill到数据表应该，设置几个command，再通过dataAdapter.Update就可以更新数据了。不过表要有一个关键的key吧。

另外一种直观一点：

也需要表有个关键key有就是关键字段。

你datagridview.reomveAt(index)同时执行sqlcommand("delete * From table where keyFild='" key "'")就可以。

参考一个实例，如下：

Private Sub bitDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bitDelete.Click

Dim oraConn As New OracleConnection()

oraConn.ConnectionString = " data source=数据库名字;user id=账号;password=密码"

oraConn.Open()

Dim id As String = DataGridView1.CurrentRow.Cells(0).Value.ToString().Trim()

Dim queryString = "delete from t where id ='" id号 "'"

Dim adapter As OracleDataAdapter = New OracleDataAdapter(queryString,oraConn)

Dim mark As DataSet = New DataSet

adapter.Fill(mark, "Mark")

MessageBox.Show("删除数据成功!")

Dim adapter As OracleDataAdapter = New OracleDataAdapter("select * from t ORDER BY id", oraConn)

Dim score As DataSet = New DataSet()

adapter.Fill(score , "Score ")

DataGridView1.DataSource = score

DataGridView1.DataMember = score .Tables(0).ToString

oraConn.Close()

End Sub

相关问答

Q1: VB.NET中如何用ExecuteNonQuery方法来执行Delete语句啊，就是用来删除datagridview显示的数据中的信息。

你是写winform的吗？

如果只是单纯用ExecuteNonQuery执行删除，下面给新增的例子，把新增的sql语句换成删除就可以了

Dim sql3 As String = "insert into LSplctable(LSID,plcpath,plcname) values(@LSID,@plcpath,@plcname)"

                    Dim acm3 As SqlCommand = New SqlCommand(sql3, conn)

                        acm3.Parameters.Clear()

                        acm3.Parameters.Add("@LSID", SqlDbType.NVarChar).Value = HFDLS.Value

                        acm3.Parameters.Add("@plcpath", SqlDbType.NVarChar).Value = filename(i)

                        acm3.Parameters.Add("@plcname", SqlDbType.NVarChar).Value = plcpath.Replace(extension, "")

                        acm3.ExecuteNonQuery()

Q2: vb.net删除文件

Private Sub btnRemovePath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRemovePath.Click

        Try

            ' 先建立目录以便用于后续的删除示范。

            If Not Directory.Exists("D:\网易") Then

                Directory.CreateDirectory(" D:\网易 \Test1")

                Directory.CreateDirectory(" D:\网易 \Test2")

                Directory.CreateDirectory(" D:\网易 \Test3")

            End If

            ' 删除子目录 Test1。

            Directory.Delete(" D:\网易 \Test1", True)

            ' 删除子目录 Test2。

            Dim myDirectoryInfo As New DirectoryInfo(" D:\网易 \Test2")

            myDirectoryInfo.Delete(True)

            ' 将目录 C:\AlexDirDemo 及其以下的文件和子目录全数删除。

            Directory.Delete(" D:\网易 ", True)

        Catch ex As Exception

            MessageBox.Show(ex.Message)

            Exit Sub

        End Try

        ' 启动 Windows 资源管理器。

        Process.Start("explorer.exe", "D:\")

    End Sub

Q3: vb.net中，如何删除指定文本文档中的指定行的内容

        Dim newfile As New List(Of String)

        For Each line As String In System.IO.File.ReadAllLines("TextFile1.txt")

            If Not line.StartsWith("3") Then newfile.Add(line)

        Next

        System.IO.File.WriteAllLines("TextFile1.txt", newfile)

建个集合，用System.IO.File的ReadAllLines读出所有内容，逐个判断，如果是需要的加入集合，如果是要删除的什么都不做，最后用WriteAllLines写入即可。

这里说明一下，上面那个代码是用来删除所有以3开头的文本行。