2011-11-21 3 views
0
Function LoginPass() As Boolean 
    Dim LogPass As New waxClass 
    Dim Ldt As DataTable = LogPass.LoginPass(LCase(UserName_TextBox.Text), 
              LCase(UserPass_TextBox.Text)) 
    If Ldt.Rows.Count > 0 Then 

     waxClass.LMUser = Ldt.Rows(0).Item("Username").ToString 
     'Utility.LMUserID = Ldt.Rows(0).Item("UserID").ToString 
     Return True 
    End If 
End Function 

값 :기능 제공 경고가

기능 'LoginPass을'모든 코드 경로에 값을 반환하지 않습니다. 'Return'문이 누락 되었습니까?

답변

0

사용자의 기능에는 Boolean 반환 값이 필요합니다.

Ldt.Rows.Count <= 0 인 경우 반환 값이 없으므로 여기에서 경고가 발생합니다. 그리고 Else Return False을 추가하면 괜찮을 것입니다.

If Ldt.Rows.Count > 0 Then 
    waxClass.LMUser = Ldt.Rows(0).Item("Username").ToString 
    'Utility.LMUserID = Ldt.Rows(0).Item("UserID").ToString 
    Return True 
Else 
    Return False 
End If 
관련 문제