How add a URL to TextRange?

This is my code add url to TextRange by COM:

                                    Dim myHyperlinkURL = oDocument.HyperlinkURLDestinations.Add(strUrl)

                                    Dim myHyperlinkSource = oDocument.HyperlinkTextSources.Add(oCharRange)

                                    Dim myHyperlink = oDocument.Hyperlinks.Add(myHyperlinkSource, myHyperlinkURL)

                                    myHyperlink.Visible = False

I want convert this code to SDK.

How add a URL to TextRange by SDK?

Thanks all!