是不是被标题吸引到了,没错我就是标题党。
做了一个有点意思的小示例,分享给大家学习娱乐
主要代码:
Private Declare Function ShellAbout& Lib "shell32.dll" Alias "ShellAboutA" (ByVal hwnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long)
Private Sub Command74_Click()
ShellAbout Me.hwnd, "我的作品XXXXXXX", "版本号:XXXXXXXX.0", 1
End Sub
附 件:
点击下载此附件
图片演示: