我正在努力將下面的代碼轉換為 VB.Net。我在這里做錯了什么？
代碼：這是我在下面嘗試過的。我嘗試轉換以下陳述句：
(gotoAction.Destination, PDFPageDirectDestination).Page = destinationPage
bookmark.Action = gotoAction
在以下函式中對此宣告：（我使用了 DirectCast）
Public Shared Function CreateBookmark(title As String, bookmarkColor As PDFRgbColor, visualStyle As PDFOutlineItemVisualStyle, destinationPage As PDFPage) As PDFOutlineItem
Dim bookmark As PDFOutlineItem = New PDFOutlineItem()
bookmark.Title = title
bookmark.Color = bookmarkColor
bookmark.VisualStyle = visualStyle
Dim gotoAction As PDFGoToAction = New PDFGoToAction()
gotoAction.Destination = New PDFPageDirectDestination()
DirectCast(gotoAction.Destination, PDFPageDirectDestination).Page = destinationPage
bookmark.Action = gotoAction
Return bookmark
End Function
uj5u.com熱心網友回復：
試試這個，不需要鑄造：
Public Shared Function CreateBookmark(title As String, bookmarkColor As PDFRgbColor, visualStyle As PDFOutlineItemVisualStyle, destinationPage As PDFPage) As PDFOutlineItem
Dim bookmark As New PDFOutlineItem()
bookmark.Title = title
bookmark.Color = bookmarkColor
bookmark.VisualStyle = visualStyle
Dim gotoAction As New PDFGoToAction()
Dim destination As New PDFPageDirectDestination()
destination.Page = destinationPage
gotoAction.Destination = destination
bookmark.Action = gotoAction
Return bookmark
End Function
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/335614.html
標籤：网络
上一篇：如何洗掉文本檔案中的多個空行
下一篇：如何擴展任何型別的List類