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) As Long
Private Sub command1_Click() ShellAbout Me.hwnd, _ "我的程式", "1998.4.30 第一版", Me.Icon End Sub
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！） 