Question

我在VB6中有以下代码

Private Sub Command1_Click()

  Dim encryptedFileName As String
  Dim decrypToFileName As String

  encryptedFileName = "Some File Name"
  decrypToFileName = "Some Other File Name"

  Dim afileDecryptor As fileDecryptor
  afileDecryptor = New fileDecryptor
  afileDecryptor.Decrypt(encryptedFileName, decrypToFileName)      

End Sub

类FileDecryptor具有以下Sub：

Public Sub Decrypt(ByVal fileNameToDecrypt As String, ByVal decrypToFileName As String)

End Sub

我知道编译器errot，预期：=在行

afileDecryptor.Decrypt(encryptedFileName, decrypToFileName)

我已经看过我能做的一切，但仍然不明白问题是什么

Answer 1

Subs不会返回任何内容，所以你不应该在它的参数周围加上括号。

afileDecryptor.Decrypt encryptedFileName, decrypToFileName

VB6语法错误

1 个答案: