主题：请教，关于如何做“北京转换成BeiJing！！！

Dim py As DataRow = e.DataRow
If e.DataCol.Name = "省洲" Then
    If py.IsNull("省洲") Then
        py("Province") = Nothing
    Else
        py("Province") = getpy(py("省洲"),False) 

   End If
End If

 我希望得到的效果是：BeiJing