将As子句添加到函数中

时间:2015-04-17 16:22:28

标签: vb.net

它说我需要在这个函数中添加一个子句。

我试过去布尔()但似乎不是选项

Public Function HasConnection()
        Try
            sqlcon.Open()
            sqlcon.Close()
            Return True
        Catch ex As Exception
            MsgBox(ex.Message)
            Return False
        End Try
    End Function

2 个答案:

答案 0 :(得分:2)

应该是:

Public Function HasConnection() As Boolean

答案 1 :(得分:0)

你是什么意思不是一个选择?

Public Function HasConnection() As Boolean
        Try
            sqlcon.Open()
            sqlcon.Close()
            Return True
        Catch ex As Exception
            MsgBox(ex.Message)
            Return False
        End Try
End Function