vb.net 获取数据表字段名和数据类型

最新推荐文章于 2021-03-05 12:23:00 发布

原创最新推荐文章于 2021-03-05 12:23:00 发布 · 4.1k 阅读

5 ·

CC 4.0 BY-SA版权

文章标签：

#vb.net #database #exception #function #integer #string

本文介绍了一个Visual Basic函数，用于从指定数据库表中获取除图片类型外的所有字段名称及其数据类型。该函数通过执行SQL查询来实现，并使用自定义数据库类进行数据库操作。

'根据表名或表'获取表中除图片类型外的字段名
    Public Function GetTableFields(ByVal tbname As String) As DataView
        If tbname = "" Then
            MsgBox("请输入参数：表名")
            Exit Function
        End If
        Dim strsql As String
        strsql = "select COLUMN_NAME as [字段名],DATA_TYPE   "
        strsql += "FROM INFORMATION_SCHEMA.Columns WHERE TABLE_NAME='" + tbname + "' and DATA_TYPE<>'image'"
        Dim db As New DataBase
        Dim dv As New DataView
        Dim i As Integer
        Try
            dv = db.RunSelectSQL(strsql)
            Return dv
        Catch ex As Exception
            MsgBox(ex.Message + vbCrLf + ex.StackTrace)
            Return Nothing
        Finally
            db.Dispose()
            dv.Dispose()
        End Try