忘備録
ContextクラスのプロパティをURLパラメタとして設定する例
Dim urlParam As String
Dim param As New Text.StringBuilder
Dim venueType As Type = GetType(TVenueItem)
Dim members As Reflection.PropertyInfo() = venueType.GetProperties()
For Each member As Reflection.PropertyInfo In members
param.Append("&")
param.Append(member.Name)
param.Append("=")
param.Append(HttpUtility.UrlEncode(member.GetValue(target, Nothing).ToString))
Next
param.Replace("&", "?", 0, 1)
urlParam = param.ToString()
Me.NavigationService.Navigate(New Uri("/Views/DetailsPage.xaml" & urlParam, UriKind.Relative))