从*.ini文件中删除一个键使用下面的函数无法删除

Question

'*******************************************
' 从*.ini文件中删除一个键(包括删除该键和键所对应的键值)
'*******************************************
Public Function INIDeleteKey(Section As String, Key As String, IniFile As String) As String
Dim ret
WritePrivateProfileString Section, Key, 0&, IniFile
End Function
结果是键还存在，大家帮个忙把下面的key删除
[ModuleName]
key=1234
只保留[ModuleName]

Answer 1

WritePrivateProfileString 你是怎么声明的

Answer 2

Declare Function WritePrivateProfileString& Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As String, ByVal lpFileName As String) 'lpApplicationName 要在其中写入新字串的小节名称?这个字串不区分大小写
            'lpKeyName   Any，要设置的项名或条目名。这个字串不区分大小写。用vbNullString可删除这个小节的所有设置项
           ' lpString   String，指定为这个项写入的字串值。用vbNullString表示删除这个项现有的字串
            'lpFileName   String，初始化文件的名字。如果没有指定完整路径名，则windows会在windows目录查找文件。如果文件没有找到，则函数会创建它
    

Answer 3

Public Function INIDeleteKey(Section As String, Key As String, IniFile As String) As String
Dim ret
WritePrivateProfileString Section, Key, vbNullString, IniFile
End Function