任何人都可以幫助我將此vbscript轉換爲vb.net嗎？

Question

Function Main() 
    DTSGlobalVariables("bolFirstRecord").Value = True 
    Main = DTSTaskExecResult_Success 
End Function 

Answer 1

由於俄德指出，有相當多的一些信息丟失爲您推薦這件事，但我認爲你需要的是這樣的：

Public Class MyForm1 
    Private bolFirstRecord As Boolean 

    Public Property FirstRecord() As Boolean 
    Get 
     Return bolFirstRecord 
    End Get 
    Set(ByVal value As Boolean) 
     bolFirstRecord = value 
    End Set 
    End Property 

    Public Function Main() As Boolean 
    Try 
     Me.FirstRecord = True 
     Return True 
    Catch ex as Exception 
     Return False 
    End Try 
    End Function 

End Class