2016-12-06 65 views
0
Function checkIsAuthorized(ByVal users As String) As Boolean 
    Dim UserJobCode As String = dcChris.getJobCode(users) 
    Dim values As String = My.Settings.canResendJobcode 
    Dim usersCode As String() = values.Split(",") 

    Return usersCode.Contains(UserJobCode) 


    'If usersCode.Contains(UserJobCode) Then 
    ' canResend = True 
    ' Return True 
    'End If 
    'canResend = False 
    'Return False 
End Function 

该函数的注释部分起作用,我只是想通过return语句使代码更高效。但是它不会返回一个布尔值,因为全局仍然是错误的。以旧的方式工作。vb 2013从函数返回bool

任何想法?

+0

如果您还想设置'canResend',则需要两个语句'canResend = usersCode.Contains(UserJobCode)',接着是'Return canResend'。 – Blackwood

回答

0

昏暗canResend由于布尔

功能checkIsAuthorized(BYVAL用户作为字符串)为布尔 昏暗UserJobCode作为字符串= dcChris.getJobCode(用户) 昏暗值作为字符串= My.Settings.canResendJobcode 昏暗usersCode作为字符串()= values.Split( “”) 返回usersCode.Contains(UserJobCode)

End Function 

这是我看中。它适用于我的需求。感谢大家。