VB6语法错误

时间:2016-05-20 03:25:49

标签: vb6

我在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)

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

1 个答案:

答案 0 :(得分:3)

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

afileDecryptor.Decrypt encryptedFileName, decrypToFileName