图片空间显示文字的问题

[chen3bing]

我在图片上显示文字，

Dim S As String
S = "5V"
TextOut Picture1.hdc, 100, 100, S, Len(S)

前面有声明：

Private Declare Function TextOut Lib "gdi32 " Alias "TextOutA " ( _
        ByVal hdc As Long, ByVal x As Long, _
        ByVal y As Long, _
        ByVal lpString As String, _
        ByVal nCount As Long) _
        As Long

运行提示错误；
找不到DLL入口点，TEXTOUTA in gdi32
图片如下。
请指教，谢谢！

[chen3bing]

问题解决了，多了个空格。