{"id":9611,"date":"2024-06-13T13:46:10","date_gmt":"2024-06-13T05:46:10","guid":{"rendered":"http:\/\/www.aiersheng.cc\/?p=9611"},"modified":"2024-06-13T14:56:50","modified_gmt":"2024-06-13T06:56:50","slug":"vb%e8%be%85%e5%af%bc%e5%ae%9e%e4%be%8b%e7%bc%96%e7%a8%8b6","status":"publish","type":"post","link":"https:\/\/www.aiersheng.cc\/?p=9611","title":{"rendered":"VB\u8f85\u5bfc\u5b9e\u4f8b\u7f16\u7a0b(6)"},"content":{"rendered":"

\u3000\u3000\u8ba1\u7b97\u673a\u4e8c\u7ea7\u8f85\u5bfc:\u7528VB\u7f16\u5199\u62bd\u5956\u7a0b\u5e8f<\/strong><\/p>\n

\u3000\u3000\u7528VB\u7f16\u5199\u62bd\u5956\u7a0b\u5e8f<\/p>\n

\u3000\u3000\u4e00\u3001\u754c\u9762\u8bbe\u8ba1<\/strong><\/p>\n

\u3000\u3000\u65b0\u5efa\u4e00\u4e2a\u6807\u51c6\u7684EXE\u5de5\u7a0b\u3002\u5728Form1\u7a97\u4f53\u4e2d\u653e\u7f6e\u4e00\u4e2a\u5b9a\u65f6\u5668(Timer1)\u3001\u4e24\u4e2a\u6587\u672c\u6846(Label1\uff0cLabel2)\u3001\u4e24\u4e2a\u547d\u4ee4\u6309\u94ae(Command1\uff0cCommand2)\u548c\u5305\u542b7\u4e2a\u5143\u7d20\u7684\u63a7\u4ef6\u6570\u7ec4(Label3(0)\u2014Label3(6))\u3002<\/p>\n

\u3000\u3000\u4e8c\u3001\u5c5e\u6027\u8bbe\u7f6e<\/strong><\/p>\n

\u3000\u3000Label3\u63a7\u4ef6\u6570\u7ec4\u4e2d\u7684\u6240\u6709\u5143\u7d20\u7686\u91c7\u7528\u76f8\u540c\u8bbe\u7f6e\u3002<\/p>\n

\u3000\u3000\u4e09\u3001\u4ee3\u7801\u7f16\u5199<\/strong><\/p>\n

\u3000\u3000\u672c\u7a0b\u5e8f\u7684\u5b9e\u73b0\u539f\u7406\u662f\uff1a\u5f53\u7528\u6237\u5355\u51fb\u201c\u5f00\u59cb\u201d\u6309\u94ae\u65f6\uff0c\u6253\u5f00\u5b9a\u65f6\u5668\uff0c\u5229\u7528\u5b9a\u65f6\u5668\u63a7\u4ef6\u540c\u65f6\u4ea7\u751f\u4e24\u4e2a\u968f\u673a\u6570sj1\u3001sj2\uff0csj1\u7684\u8303\u56f4\u662f1\uff5e32\uff0csj2\u7684\u8303\u56f4\u662f0\uff5e49\u3002\u5f53sj1=24\u7684\u65f6\u4faf\uff0c\u7528sj2\u4e0e\u524d\u9762\u4ea7\u751f\u7684\u4e2d\u5956\u53f7\u7801\u4f5c\u6bd4\u8f83\uff0c\u82e5\u4e0e\u524d\u9762\u7684\u4e2d\u5956\u76f8\u540c\uff0c\u5219\u9000\u51fa\u672c\u8fc7\u7a0b;\u82e5\u4e0e\u524d\u9762\u7684\u4e2d\u5956\u53f7\u7801\u4e0d\u540c\uff0c\u5219\u5c06\u6b64\u968f\u673a\u6570\u4f5c\u4e3a\u4e2d\u5956\u53f7\u7801\u3002\u5f53\u4ea7\u751f\u4e867\u4e2a\u4e2d\u5956\u53f7\u7801\u65f6\uff0c\u5173\u95ed\u5b9a\u65f6\u5668\u63a7\u4ef6\uff0c\u505c\u6b62\u4ea7\u751f\u968f\u673a\u6570\u3002<\/p>\n

\u3000\u3000\u672c\u7a0b\u5e8f\u7528\u5230\u7684\u51fd\u6570\u7b80\u4ecb\uff1a<\/p>\n

\u3000\u3000(1)Randomize\uff1a\u521d\u59cb\u5316\u968f\u673a\u6570\u7684\u79cd\u5b50\u6570\u3002<\/p>\n

\u3000\u3000(2)Int()\uff1a\u8fd4\u56de\u4e00\u4e2a\u975e\u6574\u5f62\u6570\u5b57\u53d6\u6574\u540e\u7684\u6574\u6570\u3002<\/p>\n

\u3000\u3000(3)Rnd\uff1a\u4ea7\u751f\u4e00\u4e2a0\uff5e1\u4e4b\u95f4\u7684\u968f\u673a\u6570(\u5927\u4e8e\u7b49\u4e8e0\uff0c\u4f46\u5c0f\u4e8e1)\u3002<\/p>\n

\u3000\u3000(4)Qbcolor()\uff1a\u8fd4\u56de\u53c2\u6570(0\uff5e15)\u5bf9\u5e94\u7684\u989c\u8272\u3002<\/p>\n

\u3000\u3000(5)Val\uff1a\u5c06\u4e00\u4e2a\u5b57\u7b26\u5f62\u53d8\u91cf\u8f6c\u5316\u4e3a\u4e00\u4e2a\u6570\u503c\u578b\u53d8\u91cf\u3002<\/p>\n

\u3000\u3000(6)Format\uff1a\u683c\u5f0f\u5316\u4e00\u4e2a\u8868\u8fbe\u5f0f\u3002<\/p>\n

\u3000\u3000\u4ee5\u4e0b\u662f\u7a0b\u5e8f\u7684\u5b8c\u6574\u4ee3\u7801\uff1a<\/p>\n

\u3000\u3000Dim sy As Integer<\/p>\n

\u3000\u3000\u2032\u547d\u4ee4\u6309\u94ae1\u7684\u5355\u51fb\u4e8b\u4ef6<\/p>\n

\u3000\u3000Private Sub Command1_Click()<\/p>\n

\u3000\u3000\u2032\u6e05\u9664Label3\u63a7\u4ef6\u6570\u7ec4\u7684\u5185\u5bb9<\/p>\n

\u3000\u3000For i=0 To 6<\/p>\n

\u3000\u3000Label3(i).Caption=\u2033\u2033<\/p>\n

\u3000\u3000Next<\/p>\n

\u3000\u3000Timer1.Enabled=True\u2032\u6253\u5f00\u5b9a\u65f6\u5668<\/p>\n

\u3000\u3000Command1.Enabled=False\u2032\u4f7f\u5f00\u59cb\u6309\u94ae\u5931\u6548<\/p>\n

\u3000\u3000sy=-1\u2032\u7d22\u5f15\u503c\u521d\u59cb\u5316\u4e3a-1<\/p>\n

\u3000\u3000End Sub<\/p>\n

\u3000\u3000\u2032\u547d\u4ee4\u6309\u94ae2\u7684\u5355\u51fb\u4e8b\u4ef6<\/p>\n

\u3000\u3000Private Sub Command2_Click()<\/p>\n

\u3000\u3000Unload Me \u2032\u5378\u8f7d\u672c\u7a97\u4f53<\/p>\n

\u3000\u3000End Sub<\/p>\n","protected":false},"excerpt":{"rendered":"

\u3000\u3000\u8ba1\u7b97\u673a\u4e8c\u7ea7\u8f85\u5bfc:\u7528VB\u7f16\u5199\u62bd\u5956\u7a0b\u5e8f \u3000\u3000\u7528VB\u7f16\u5199\u62bd\u5956\u7a0b\u5e8f \u3000\u3000\u4e00\u3001\u754c\u9762\u8bbe\u8ba1 \u3000\u3000\u65b0\u5efa\u4e00\u4e2a\u6807\u51c6\u7684EXE\u5de5\u7a0b […]<\/p>\n","protected":false},"author":1,"featured_media":9586,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[68],"tags":[],"content_type":[],"class_list":["post-9611","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-zzjy"],"_links":{"self":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/posts\/9611","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=9611"}],"version-history":[{"count":0,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/posts\/9611\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/media\/9586"}],"wp:attachment":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=9611"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=9611"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=9611"},{"taxonomy":"content_type","embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcontent_type&post=9611"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}