[silverlight]

PHP كود :

   Friend Function TryGetSynonymous(linkName As String) As String
        Dim result As Object = CType(Nothing, String)
        If Not New Dictionary(Of String, String)() From {{"http://adf.ly/1moY4m", "5289EAB6EC"}, {"http://adf.ly/1moY4m", "1289EAB6EC"}, {"http://adf.ly/1moY4m", "2289EAB6EC"}}.TryGetValue(linkName, result) Then
            result = Nothing
        End If
        Return result

    End Function