Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/visual-studio-2010/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何使用VB.net在Microsoft access中使用文本框删除表格_Vb.net_Visual Studio 2010_Ms Access 2010 - Fatal编程技术网

如何使用VB.net在Microsoft access中使用文本框删除表格

如何使用VB.net在Microsoft access中使用文本框删除表格,vb.net,visual-studio-2010,ms-access-2010,Vb.net,Visual Studio 2010,Ms Access 2010,抱歉再次打扰。但是我真的需要你的帮助。。 问题是: 我使用vb.net(visual studio 2010)中带有按钮的文本框在Ms Access中创建了一个表 但是现在 我想使用带有按钮的文本框删除或删除表格 如何删除我创建的表 这是我的密码: Imports System.Data.OleDb Public Class Form1 Dim conn As New OleDbConnection Private Sub Form1_Load(sender As System.Object,

抱歉再次打扰。但是我真的需要你的帮助。。 问题是: 我使用vb.net(visual studio 2010)中带有按钮的文本框在Ms Access中创建了一个表

但是现在

我想使用带有按钮的文本框删除或删除表格

如何删除我创建的表

这是我的密码:

Imports System.Data.OleDb
Public Class Form1
Dim conn As New OleDbConnection
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

End Sub


'Create Table
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=masterlist.accdb"
    Using con As New OleDbConnection(connectionString)
        con.Open()
        Using cmd As New OleDbCommand()
            cmd.Connection = con
            cmd.CommandText = " CREATE TABLE " & txtID.Text & " (ID COUNTER, [Name] INTEGER) "
            Try
                cmd.ExecuteNonQuery()
                Console.WriteLine("Table created.")
            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
        con.Close()
    End Using
End Sub


'Delete table?
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
    Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=database\masterlist.accdb"
    Using con As New OleDbConnection(connectionString)
        con.Open()
        Using cmd As New OleDbCommand()
            cmd.Connection = con
            cmd.CommandText = " DROP TABLE " & txtID.Text
            Try
                cmd.ExecuteNonQuery()
                cmd.Dispose()
                Console.WriteLine("Table drop.")
            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
        End Using
        con.Close()
    End Using
End Sub
End Class

提前感谢您

尝试使用con替换为:Dim con 或 在con中添加另一个n
con=conn你忘了一个n

你没有提到一个问题,只提到了你想做的事。你可能想描述一下你遇到的任何异常,或者什么特别不起作用对不起。。如何删除我创建的表???乍一看,您的代码看起来很好,这就是为什么我想知道您是否在某个地方遇到了特定的异常,或者在运行它时当前发生了什么?天哪-抱歉。。我的代码运行良好。。唯一的问题是我没有关闭MS访问。。我想我现在需要睡一觉。。无论如何非常感谢。