當沒有提供查詢字符串時，條件永遠不會滿足

Question

這些條件都不會出現，或者將出現一個條件。當沒有提交時，條件從未被擊中

Private _page As String = HttpUtility.UrlEncode(HttpContext.Current.Request.QueryString("Page")) 
    Private _pge As String = HttpUtility.UrlEncode(Page.RouteData.Values("page")) 

    Private Function getPage() As String 
     Dim ret As String = "" 
     If String.IsNullOrEmpty(_page) = True AndAlso String.IsNullOrEmpty(_pge) = True Then 
      ret = 1 
     ElseIf String.IsNullOrEmpty(_page) = False AndAlso String.IsNullOrEmpty(_pge) = True Then 
      ret = _page 
     ElseIf String.IsNullOrEmpty(_page) = True AndAlso String.IsNullOrEmpty(_pge) = False Then 
      ret = _pge 
     End If 
     Return ret 
    End Function 

Answer 1

可能被它弄糊塗了。你總是回報_page

試試這個..

Private Function getPage() As String 
     If String.IsNullOrEmpty(_page) = True AndAlso String.IsNullOrEmpty(_pge) = True Then 
      _page = 1 
      Return _page 
     ElseIf String.IsNullOrEmpty(_page) = False AndAlso String.IsNullOrEmpty(_pge) = True Then 
      Return _page 
     ElseIf String.IsNullOrEmpty(_page) = True AndAlso String.IsNullOrEmpty(_pge) = False Then 
      Return _pge 
     Else 
      Return _page 
     End If 

    End Function 

Answer 2

不知道你的問題是什麼，不能從問題告訴，但是，我已經重寫了函數這樣。

注意在您原來的功能中，您返回_page時它是Nothing或爲空。

Private Function GetPage() As String 
    Dim pageHasValue = Not String.IsNullOrEmpty(_page) 
    Dim pgeHasValue = Not String.IsNullOrEmpty(_pge) 

    If pageHasValue AndAlso pgeHasValue Then 
     Return "1" 
    End If 

    If pgeHasValue Then 
     Return _pge 
    End If 

    If pageHasValue Then 
     Return _page 
    End If 

    Return String.Empty 
End Function