Question

似乎无法弄清楚如何在全局Dims中使用函数返回变量示例代码：

Public Class Main
  Dim Path As String = FixPath()
  Dim fixwrongtxt As String = Path & "tryme.txt"

  Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    FixPath()
    On_load()
  End Sub

  Private Function FixPath() As String
    Path = "C:\test"
    MsgBox(Path) //First Message Box'
    Return Path
  End Function

  Sub On_load()
    MsgBox(fixwrongtxt) //Second Message Box
  End Sub
End Class

当我运行它时，我得到第一个包含“C：\ test”的消息框然后我点击确定然后在第二个消息框上我得到“custom.dll”而没有“C：\ test”或“Path Return”我做错了什么？我知道我不能在vb.net中使用//。我也尝试在Sub On_load（）下添加“FixPath（）”，但结果相同。另外我必须拥有这些全局的原因是因为我有大约30个参考“Path”变量的Subs ...谢谢

Answer 1

将您的公共变量更改为：

Dim Path As String 


Private Sub Main_Load(....

Path = FixPath()

无法在全局空间中调用函数

在全局变量vb.net中使用函数返回

1 个答案: