module1.vb

来自「简单学生成绩管理,不足之处,多谢指点,谢谢」· VB 代码 · 共 17 行

Imports System.Data
'引入数据库操作类命名空间
Imports System.Data.OleDb
'引入ADO.NET操作命名空间
Module Module1

    Public Function Testtxt(ByVal txt As String) As Boolean
        '判断字符串是否为空
        If Trim(txt) = "" Then
            Testtxt = False
        Else
            Testtxt = True
        End If
    End Function

End Module