can't find dll entry point OutputDebugString in kernel32解决思路

cant find dll entry point OutputDebugString in kernel32我想在VBA中调用OutputDebugString API函数,以

can't find dll entry point OutputDebugString in kernel32
我想在VBA中调用OutputDebugString API函数,以便在DebugView中输出一些调试信息。但使用时提示“can't find dll entry point OutputDebugString in kernel32”。请问问题在哪里?
我的声明如下:Private Declare Sub OutputDebugString Lib "kernel32" (ByVal lpOutputString As String)
使用如下:OutputDebugString "OutputDebugString"
我在类型库中增加了kernel32.dll也不行

[解决办法]

VB code
Private Declare Sub OutputDebugString Lib "kernel32.dll" Alias "OutputDebugStringA" ( _      ByVal lpOutputString As String)