功能问题，而返回一个值

Question

所以，我想使一个函数方法的工作，但一些问题出现了，我无法解决它们。我已经使用了断点，并且我发现这是一个循环，其中一个代码行没有被调用。这是方法：

Private Function SendToRecycle(filename As String) As Boolean 
    If MsgBox("Are you sure you want to sent it to recycle bin?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then 
     Return "True" 
     My.Computer.FileSystem.DeleteFile(filename, FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.SendToRecycleBin) 
    ElseIf MsgBox("Are you sure you want to sent it to recycle bin?", MsgBoxStyle.YesNo) = MsgBoxResult.No Then 
     Return "False" 
    End If 
    Return SendToRecycle 
End Function 

它能做什么很简单，如果用户选择选项是的，它应该返回true，并发送该文件到回收站和写入我的数据库，如果不是，它将返回true，写了我的数据库没有删除那个添加文件。 但是现在发生的是，如果我点击Yes，它将返回True，但不会调用操作来删除文件...

你有任何ideia我该如何解决我的问题？

Answer 1

尝试：

Private Function SendToRecycle(filename As String) As Boolean 
    If MsgBox("Are you sure you want to sent it to recycle bin?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then 
     My.Computer.FileSystem.DeleteFile(filename,FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.SendToRecycleBin) 
     Return True 
    ElseIf MsgBox("Are you sure you want to sent it to recycle bin?", MsgBoxStyle.YesNo) = MsgBoxResult.No Then 
     Return False 
    End If 
End Function