{"id":73812,"date":"2026-02-08T12:33:19","date_gmt":"2026-02-08T04:33:19","guid":{"rendered":"https:\/\/www.wsisp.com\/helps\/73812.html"},"modified":"2026-02-08T12:33:19","modified_gmt":"2026-02-08T04:33:19","slug":"%e9%80%9a%e8%bf%87-vb6-%e5%ae%9e%e7%8e%b0%e5%8f%91%e9%80%81%e9%82%ae%e4%bb%b6%e9%aa%8c%e8%af%81%e7%a0%81","status":"publish","type":"post","link":"https:\/\/www.wsisp.com\/helps\/73812.html","title":{"rendered":"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801"},"content":{"rendered":"

\u5728VB6\u5f00\u53d1\u7684\u8fc7\u7a0b\u4e2d，\u6709\u65f6\u5019\u9700\u8981\u7528\u5230\u90ae\u4ef6\u9a8c\u8bc1\u7801，\u53ef\u662f\u7528Outlook\u7ec4\u4ef6\u53d1\u9001\u9700\u8981\u7528\u6237\u5b89\u88c5\u4e86Outlook\u624d\u884c，\u5b9e\u9645\u5f00\u53d1\u4e2d\u975e\u5e38\u4e0d\u4fbf\u3002\u800cCDO\u7ec4\u4ef6\u5c31\u5341\u5206\u5408\u9002，\u5b83\u53ef\u4ee5\u901a\u8fc7API\u65b9\u5f0f\u8c03\u7528，\u5bf9\u5927\u90e8\u5206Windows\u64cd\u4f5c\u7cfb\u7edf\u90fd\u652f\u6301，\u6240\u4ee5\u672c\u6559\u7a0b\u5c06\u4f7f\u7528CDO\u7ec4\u4ef6\u53d1\u9001\u90ae\u4ef6\u5e76\u4e14\u9644\u9a8c\u8bc1\u7801\u9a8c\u8bc1\u6559\u7a0b\u3002<\/p>\n

\u9996\u5148，\u53d1\u9001\u8005\u9700\u8981\u4e00\u4e2a\u90ae\u7bb1，\u5982 12345abc@163.com ，\u63a5\u7740，\u9700\u8981\u8bbe\u7f6e\u5ba2\u6237\u7aef\u6388\u6743\u7801，\u4ee5\u7f51\u6613\u90ae\u7bb1\u4e3a\u4f8b：1.\u767b\u5f55\u7f51\u6613\u90ae\u7bb1\u30022.\u5728\u4e3b\u754c\u9762\u4e0a\u9762\u70b9\u51fb\u201c\u8bbe\u7f6e\u201d\"\"<\/p>\n

\u7136\u540e\u70b9\u51fb\u8fd9\u4e2a\u9879：<\/p>\n

\"\"<\/p>\n

\u63a5\u7740\u628a\u8fd9\u4e24\u4e2a\u8bbe\u7f6e\u6253\u5f00(\u9ed8\u8ba4\u5173\u95ed)，\u4f1a\u663e\u793a\u4e00\u4e2a\u6388\u6743\u7801，\u53ef\u4ee5\u5c06\u8fd9\u4e2a\u6388\u6743\u7801\u4fdd\u5b58\u5230\u4e00\u4e2a\u6587\u4ef6，\u907f\u514d\u5fd8\u8bb0<\/p>\n

\"\"<\/p>\n

\u4e0b\u4e00\u6b65，\u6253\u5f00VB6，\u65b0\u5efa\u4e00\u4e2a\u6807\u51c6EXE，\u653e\u7f6e\u4e00\u4e2a\u6309\u94ae，\u53cc\u51fb\u6309\u94ae，\u8f93\u5165\u5982\u4e0b\u4ee3\u7801：<\/p>\n

Private Sub Command1_Click()
\n Dim objMessage As Object
\n Dim objConfig As Object
\n Set objConfig = CreateObject("CDO.Configuration")
\n With objConfig.Fields
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendusing") = 2'\u4f7f\u7528\u7f51\u7edcSMTP\u670d\u52a1\u5668
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpserver") = "smtp.163.com"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpserverport") = 465
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpauthenticate") = 1 ' \u57fa\u672c\u8ba4\u8bc1
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendusername") = "\u53d1\u4ef6\u4eba@163.com"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendpassword") = "\u6388\u6743\u7801"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpusessl") = 1
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpconnectiontimeout") = 60
\n .Update
\n End With
\n ' \u521b\u5efa\u90ae\u4ef6\u5bf9\u8c61\u5e76\u8bbe\u7f6e\u914d\u7f6e
\n Set objMessage = CreateObject("CDO.Message")
\n Set objMessage.Configuration = objConfig
\n With objMessage
\n .From = "\u53d1\u4ef6\u4eba@163.com"
\n .To = "\u6536\u4ef6\u4eba@xxx.com"
\n .Subject = "\u6807\u9898"
\n .TextBody = "\u53d1\u4ef6\u5185\u5bb9"
\n .Send
\n End With
\nEnd Sub<\/p>\n

\u8fd0\u884c\u4e4b\u540e，\u70b9\u51fbCommand1，\u6b64\u65f6\u6536\u4ef6\u4eba\u90ae\u7bb1\u4f1a\u51fa\u73b0\u4e00\u5c01\u90ae\u4ef6\u3002<\/p>\n

\u63a5\u4e0b\u6765，\u5c31\u53ef\u4ee5\u5236\u4f5c\u9a8c\u8bc1\u7801\u529f\u80fd\u4e86\u3002<\/p>\n

\u9996\u5148，\u5728\u7a97\u53e3\u4e0a\u653e\u7f6e\u4e00\u4e2atext1，\u7528\u4e8e\u8f93\u5165\u6536\u4ef6\u4eba\u7684\u90ae\u7bb1\u5730\u5740\u3002\u653e\u7f6eCommand1\u7528\u4e8e\u53d1\u9001\u9a8c\u8bc1\u7801\u3002\u653e\u7f6eTimer1\u7528\u4e8e\u8ba1\u65f6\u9a8c\u8bc1\u7801\u5931\u6548\u65f6\u95f4\u548c\u4e00\u5206\u949f\u540e\u53ef\u91cd\u65b0\u53d1\u9001\u3002\u653e\u7f6etext2\u7528\u4e8e\u8f93\u5165\u5f97\u5230\u7684\u9a8c\u8bc1\u7801\u3002\u653e\u7f6eCommand2\u7528\u4e8e\u6821\u9a8c\u9a8c\u8bc1\u7801\u3002\u653e\u7f6eLabel1，\u63d0\u793a\u90ae\u7bb1\u5730\u5740\u3002\u653e\u7f6eLabel2，\u6e05\u7a7aCaption\u5c5e\u6027\u3002\u518d\u653e\u7f6eLabel3，\u5427ForeColor\u8bbe\u7f6e\u4e3a\u7ea2\u8272，\u5427Caption\u8bbe\u7f6e\u4e3a\u201c\u9a8c\u8bc1\u7801\u5df2\u5931\u6548，\u8bf7\u91cd\u65b0\u53d1\u9001\u201d\u3002\u5177\u4f53\u5982\u4e0b\u56fe：<\/p>\n

\"\"<\/p>\n

\u8f93\u5165\u5982\u4e0b\u4ee3\u7801：<\/p>\n

Option Explicit<\/p>\n

Dim code As String
\nDim s As Integer<\/p>\n

Private Sub Command1_Click()
\nDim objMessage As Object
\nDim objConfig As Object
\nLabel3.Visible = False
\nLabel1.Caption = ""
\ns = 60
\nCommand1.Enabled = False
\nRandomize
\ncode = Replace(Str(Int((1000000 * Rnd) + 100000)), " ", "") '\u751f\u621010000\u5230100000\u4e4b\u95f4\u7684\u968f\u673a\u6570\u505a\u4e3a\u9a8c\u8bc1\u7801
\n' \u521b\u5efa\u90ae\u4ef6\u914d\u7f6e\u5bf9\u8c61
\nSet objConfig = CreateObject("CDO.Configuration")
\nTimer1.Enabled = True
\nTimer2.Enabled = True
\n' \u914d\u7f6eSMTP\u670d\u52a1\u5668
\nIf Replace(Text1.Text, " ", "") <> "" Then
\nWith objConfig.Fields
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendusing") = 2 ' \u4f7f\u7528\u7f51\u7edcSMTP\u670d\u52a1\u5668
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpserver") = "smtp.163.com"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpserverport") = 465
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpauthenticate") = 1 ' \u57fa\u672c\u8ba4\u8bc1
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendusername") = "\u53d1\u4ef6\u4eba@163.com"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/sendpassword") = "\u6388\u6743\u7801"
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpusessl") = 1
\n .Item("http:\/\/schemas.microsoft.com\/cdo\/configuration\/smtpconnectiontimeout") = 60
\n .Update
\nEnd With<\/p>\n

' \u521b\u5efa\u90ae\u4ef6\u5bf9\u8c61\u5e76\u8bbe\u7f6e\u914d\u7f6e
\nSet objMessage = CreateObject("CDO.Message")
\nSet objMessage.Configuration = objConfig<\/p>\n

' \u8bbe\u7f6e\u90ae\u4ef6\u5185\u5bb9
\nWith objMessage
\n .From = "\u53d1\u4ef6\u4eba@163.com"
\n .To = Text1.Text
\n .Subject = "dd\u56e2\u961f – \u90ae\u7bb1\u9a8c\u8bc1\u7801"
\n .TextBody = "\u5c0a\u656c\u7684 " + Text1.Text + " ,\u60a8\u597d!" + vbCrLf + "\u60a8\u5728" + Str(Now()) + "\u767b\u5f55\u7684\u9a8c\u8bc1\u7801\u4e3a " + code + vbCrLf + "\u8bf7\u57281\u5206\u949f\u5185\u4f7f\u7528，1\u5206\u949f\u540e\u5c06\u5931\u6548"
\n .Send
\nEnd With<\/p>\n

' \u91ca\u653e\u8d44\u6e90
\nSet objMessage = Nothing
\nSet objConfig = Nothing
\nEnd If
\nEnd Sub<\/p>\n

Private Sub Command2_Click()
\n If Replace(Text2.Text, " ", "") <> "" And Replace(Text2.Text, " ", "") = code Then MsgBox "\u9a8c\u8bc1\u6210\u529f", 64, "dd" Else:: MsgBox "\u9a8c\u8bc1\u5931\u8d25", 16, "dd"
\nEnd Sub<\/p>\n

Private Sub Form_Load()
\n s = 60
\nEnd Sub<\/p>\n

Private Sub Timer1_Timer()
\n s = s – 1
\n Label1.Caption = Str(s) + "\u79d2\u540e\u91cd\u53d1"
\n If s = 0 Then
\n Label1.Caption = ""
\n Command1.Enabled = True
\n Label3.Visible = True
\n code = ""
\n Timer1.Enabled = False
\n End If
\nEnd Sub<\/p>\n

\u81f3\u6b64，VB6\u90ae\u7bb1\u9a8c\u8bc1\u7801\u5236\u4f5c\u5c31\u6210\u529f\u4e86!\u6253\u5f00\u7a97\u53e3，\u5728Text1\u4e2d\u8f93\u5165\u90ae\u7bb1\u5730\u5740，\u63a5\u7740\u6536\u5230\u540e\u8f93\u5165\u5230Text2，\u70b9\u51fb\u9a8c\u8bc1，\u4f1a\u5f39\u51fa\u9a8c\u8bc1\u6210\u529f，\u65f6\u95f4\u8fc7\u4e86\u4e00\u5206\u949f\u540e\u6216\u9a8c\u8bc1\u7801\u4e0d\u5bf9，\u4f1a\u5f39\u51fa\u9a8c\u8bc1\u5931\u8d25\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"

\u5728VB6\u5f00\u53d1\u7684\u8fc7\u7a0b\u4e2d，\u6709\u65f6\u5019\u9700\u8981\u7528\u5230\u90ae\u4ef6\u9a8c\u8bc1\u7801，\u53ef\u662f\u7528Outlook\u7ec4\u4ef6\u53d1\u9001\u9700\u8981\u7528\u6237\u5b89\u88c5\u4e86Outlook\u624d\u884c，\u5b9e\u9645\u5f00\u53d1\u4e2d\u975e\u5e38\u4e0d\u4fbf\u3002\u800cCDO\u7ec4\u4ef6\u5c31\u5341\u5206\u5408\u9002，\u5b83\u53ef\u4ee5\u901a\u8fc7API\u65b9\u5f0f\u8c03\u7528，\u5bf9\u5927\u90e8\u5206Windows\u64cd\u4f5c\u7cfb\u7edf\u90fd\u652f\u6301，\u6240\u4ee5\u672c\u6559\u7a0b\u5c06\u4f7f\u7528CDO\u7ec4\u4ef6\u53d1\u9001\u90ae\u4ef6\u5e76\u4e14\u9644\u9a8c\u8bc1\u7801\u9a8c\u8bc1\u6559\u7a0b\u3002\u9996\u5148，\u53d1\u9001\u8005\u9700\u8981\u4e00\u4e2a\u90ae\u7bb1，\u5982 12345abc163.com ，\u63a5\u7740&#xff0<\/p>\n","protected":false},"author":2,"featured_media":73808,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[7776,149,383],"topic":[],"class_list":["post-73812","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-server","tag-vb6","tag-windows","tag-383"],"yoast_head":"\n\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/www.wsisp.com\/helps\/73812.html\" \/>\n<meta property=\"og:locale\" content=\"zh_CN\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3\" \/>\n<meta property=\"og:description\" content=\"\u5728VB6\u5f00\u53d1\u7684\u8fc7\u7a0b\u4e2d，\u6709\u65f6\u5019\u9700\u8981\u7528\u5230\u90ae\u4ef6\u9a8c\u8bc1\u7801，\u53ef\u662f\u7528Outlook\u7ec4\u4ef6\u53d1\u9001\u9700\u8981\u7528\u6237\u5b89\u88c5\u4e86Outlook\u624d\u884c，\u5b9e\u9645\u5f00\u53d1\u4e2d\u975e\u5e38\u4e0d\u4fbf\u3002\u800cCDO\u7ec4\u4ef6\u5c31\u5341\u5206\u5408\u9002，\u5b83\u53ef\u4ee5\u901a\u8fc7API\u65b9\u5f0f\u8c03\u7528，\u5bf9\u5927\u90e8\u5206Windows\u64cd\u4f5c\u7cfb\u7edf\u90fd\u652f\u6301，\u6240\u4ee5\u672c\u6559\u7a0b\u5c06\u4f7f\u7528CDO\u7ec4\u4ef6\u53d1\u9001\u90ae\u4ef6\u5e76\u4e14\u9644\u9a8c\u8bc1\u7801\u9a8c\u8bc1\u6559\u7a0b\u3002\u9996\u5148，\u53d1\u9001\u8005\u9700\u8981\u4e00\u4e2a\u90ae\u7bb1，\u5982 12345abc163.com ，\u63a5\u7740&#xff0\" \/>\n<meta property=\"og:url\" content=\"https:\/\/www.wsisp.com\/helps\/73812.html\" \/>\n<meta property=\"og:site_name\" content=\"\u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3\" \/>\n<meta property=\"article:published_time\" content=\"2026-02-08T04:33:19+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/www.wsisp.com\/helps\/wp-content\/uploads\/2026\/02\/20260208043318-6988120e9903c.png\" \/>\n<meta name=\"author\" content=\"admin\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"\u4f5c\u8005\" \/>\n\t<meta name=\"twitter:data1\" content=\"admin\" \/>\n\t<meta name=\"twitter:label2\" content=\"\u9884\u8ba1\u9605\u8bfb\u65f6\u95f4\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 \u5206\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/www.wsisp.com\/helps\/73812.html\",\"url\":\"https:\/\/www.wsisp.com\/helps\/73812.html\",\"name\":\"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3\",\"isPartOf\":{\"@id\":\"https:\/\/www.wsisp.com\/helps\/#website\"},\"datePublished\":\"2026-02-08T04:33:19+00:00\",\"dateModified\":\"2026-02-08T04:33:19+00:00\",\"author\":{\"@id\":\"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/358e386c577a3ab51c4493330a20ad41\"},\"breadcrumb\":{\"@id\":\"https:\/\/www.wsisp.com\/helps\/73812.html#breadcrumb\"},\"inLanguage\":\"zh-Hans\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/www.wsisp.com\/helps\/73812.html\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/www.wsisp.com\/helps\/73812.html#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u9996\u9875\",\"item\":\"https:\/\/www.wsisp.com\/helps\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/www.wsisp.com\/helps\/#website\",\"url\":\"https:\/\/www.wsisp.com\/helps\/\",\"name\":\"\u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3\",\"description\":\"\u9999\u6e2f\u670d\u52a1\u5668_\u9999\u6e2f\u4e91\u670d\u52a1\u5668\u8d44\u8baf_\u670d\u52a1\u5668\u5e2e\u52a9\u6587\u6863_\u670d\u52a1\u5668\u6559\u7a0b\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/www.wsisp.com\/helps\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"zh-Hans\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/358e386c577a3ab51c4493330a20ad41\",\"name\":\"admin\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"zh-Hans\",\"@id\":\"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/gravatar.wp-china-yes.net\/avatar\/?s=96&d=mystery\",\"contentUrl\":\"https:\/\/gravatar.wp-china-yes.net\/avatar\/?s=96&d=mystery\",\"caption\":\"admin\"},\"sameAs\":[\"http:\/\/wp.wsisp.com\"],\"url\":\"https:\/\/www.wsisp.com\/helps\/author\/admin\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/www.wsisp.com\/helps\/73812.html","og_locale":"zh_CN","og_type":"article","og_title":"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3","og_description":"\u5728VB6\u5f00\u53d1\u7684\u8fc7\u7a0b\u4e2d，\u6709\u65f6\u5019\u9700\u8981\u7528\u5230\u90ae\u4ef6\u9a8c\u8bc1\u7801，\u53ef\u662f\u7528Outlook\u7ec4\u4ef6\u53d1\u9001\u9700\u8981\u7528\u6237\u5b89\u88c5\u4e86Outlook\u624d\u884c，\u5b9e\u9645\u5f00\u53d1\u4e2d\u975e\u5e38\u4e0d\u4fbf\u3002\u800cCDO\u7ec4\u4ef6\u5c31\u5341\u5206\u5408\u9002，\u5b83\u53ef\u4ee5\u901a\u8fc7API\u65b9\u5f0f\u8c03\u7528，\u5bf9\u5927\u90e8\u5206Windows\u64cd\u4f5c\u7cfb\u7edf\u90fd\u652f\u6301，\u6240\u4ee5\u672c\u6559\u7a0b\u5c06\u4f7f\u7528CDO\u7ec4\u4ef6\u53d1\u9001\u90ae\u4ef6\u5e76\u4e14\u9644\u9a8c\u8bc1\u7801\u9a8c\u8bc1\u6559\u7a0b\u3002\u9996\u5148，\u53d1\u9001\u8005\u9700\u8981\u4e00\u4e2a\u90ae\u7bb1，\u5982 12345abc163.com ，\u63a5\u7740&#xff0","og_url":"https:\/\/www.wsisp.com\/helps\/73812.html","og_site_name":"\u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3","article_published_time":"2026-02-08T04:33:19+00:00","og_image":[{"url":"https:\/\/www.wsisp.com\/helps\/wp-content\/uploads\/2026\/02\/20260208043318-6988120e9903c.png"}],"author":"admin","twitter_card":"summary_large_image","twitter_misc":{"\u4f5c\u8005":"admin","\u9884\u8ba1\u9605\u8bfb\u65f6\u95f4":"2 \u5206"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/www.wsisp.com\/helps\/73812.html","url":"https:\/\/www.wsisp.com\/helps\/73812.html","name":"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801 - \u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3","isPartOf":{"@id":"https:\/\/www.wsisp.com\/helps\/#website"},"datePublished":"2026-02-08T04:33:19+00:00","dateModified":"2026-02-08T04:33:19+00:00","author":{"@id":"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/358e386c577a3ab51c4493330a20ad41"},"breadcrumb":{"@id":"https:\/\/www.wsisp.com\/helps\/73812.html#breadcrumb"},"inLanguage":"zh-Hans","potentialAction":[{"@type":"ReadAction","target":["https:\/\/www.wsisp.com\/helps\/73812.html"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/www.wsisp.com\/helps\/73812.html#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u9996\u9875","item":"https:\/\/www.wsisp.com\/helps"},{"@type":"ListItem","position":2,"name":"\u901a\u8fc7 VB6 \u5b9e\u73b0\u53d1\u9001\u90ae\u4ef6\u9a8c\u8bc1\u7801"}]},{"@type":"WebSite","@id":"https:\/\/www.wsisp.com\/helps\/#website","url":"https:\/\/www.wsisp.com\/helps\/","name":"\u7f51\u7855\u4e92\u8054\u5e2e\u52a9\u4e2d\u5fc3","description":"\u9999\u6e2f\u670d\u52a1\u5668_\u9999\u6e2f\u4e91\u670d\u52a1\u5668\u8d44\u8baf_\u670d\u52a1\u5668\u5e2e\u52a9\u6587\u6863_\u670d\u52a1\u5668\u6559\u7a0b","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/www.wsisp.com\/helps\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"zh-Hans"},{"@type":"Person","@id":"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/358e386c577a3ab51c4493330a20ad41","name":"admin","image":{"@type":"ImageObject","inLanguage":"zh-Hans","@id":"https:\/\/www.wsisp.com\/helps\/#\/schema\/person\/image\/","url":"https:\/\/gravatar.wp-china-yes.net\/avatar\/?s=96&d=mystery","contentUrl":"https:\/\/gravatar.wp-china-yes.net\/avatar\/?s=96&d=mystery","caption":"admin"},"sameAs":["http:\/\/wp.wsisp.com"],"url":"https:\/\/www.wsisp.com\/helps\/author\/admin"}]}},"_links":{"self":[{"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/posts\/73812","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/comments?post=73812"}],"version-history":[{"count":0,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/posts\/73812\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/media\/73808"}],"wp:attachment":[{"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/media?parent=73812"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/categories?post=73812"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/tags?post=73812"},{"taxonomy":"topic","embeddable":true,"href":"https:\/\/www.wsisp.com\/helps\/wp-json\/wp\/v2\/topic?post=73812"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}