從另一個子調用字符串

Question

我想使用之前在函數中聲明的字符串（這是我希望將其作為函數的原因）。 但是函數無法識別字符串，我的問題是如何修改下面的代碼以使其起作用？ 任何幫助表示贊賞。 先感謝您。

Sub encryption

Dim text As String = wraper.DecryptData(ciphertext)

End sub

和...

Public Function CallResults() As String

Dim instructions As String = text '//'text' isn't being recognised
Return instructions

End function

Answer 1

在類級別聲明變量text ：

Dim text As String

Sub encryption

   text = wraper.DecryptData(ciphertext)

End sub

Public Function CallResults() As String

   Dim instructions As String = text
   Return instructions

End function

Answer 2

您也可以向其中添加了聲明的文本變量的模塊添加到項目中（變量是項目的全局變量。

但是，讓函數接受可以作用的變量會是更好的設計：

Public Function CallResults(Dim text As String)

   Dim instructions As String = text
   Return instructions

End function

Answer 3

Public Function CallResults() As String

Dim instructions As String = encryption '//'text' isn't being recognised
Return instructions

End function

會做到的。 如果您不止一次獲得@Ahmed Salman Tahir的答案，它將更有效率，因為它將緩存加密結果。