{"id":6413,"date":"2023-09-12T13:47:32","date_gmt":"2023-09-12T05:47:32","guid":{"rendered":"http:\/\/www.aiersheng.cc\/?p=6413"},"modified":"2023-09-12T13:51:41","modified_gmt":"2023-09-12T05:51:41","slug":"6413","status":"publish","type":"post","link":"https:\/\/www.aiersheng.cc\/?p=6413","title":{"rendered":"\u2014.vB\u5b66\u4e60\u7b14\u8bb0"},"content":{"rendered":"<p>\u2014.vB \u96c6\u6210\u5f00\u53d1\u73af\u5883<br \/>\n1 \u6807\u9898\u680f<br \/>\n2 \u83dc\u5355\u680f<br \/>\n3 \u5de5\u5177\u680f<br \/>\n4 \u5de6\u4fa7\u662f\u63a7\u4ef6\u6240\u5728\u7684\u5de5\u5177<br \/>\n5 \u4e2d\u95f4\u90e8\u5206\u4e3a\u7a97\u56d7\u8bbe\u8ba1\u5668<br \/>\n6 \u77f3\u745f\u4e09\u4e2a\u9762\u677f \uff08 \u5de5\u7a0b\u8d44\u6e90\u7ba1\u7406\u5668 \u3001 \u5c5e\u6027\u7a97\u56d7 \u3001 \u7a97\u4f53\u5e03\u5c40\u7a97\u56d7 \uff09<br \/>\n\uff08 1 \uff09 \u5de5\u7a0b\u8d44\u6e90\u71df\u7406\u5668 \uff1a \u6765\u7ba1\u7406\u4e00\u4e2a\u5e94\u7528\u7a0b\u5e8f\u4e2d\u7684\u6240\u6709\u6587\u4ef6 \uff0c \u9876\u90e8\u6709\u4e09\u4e2a\u94ae \uff0c \u4e3a<br \/>\n\u7740\u4ee3\u7801 \u3001 \u752d\u7740\u5bf9\u8c61 \u3001 \u5207\u6362\u6587\u4ef6\u5939<br \/>\n\uff08 2 \uff09 \u5c5e\u6027\u7a97\u56d7 \uff1a \u5c5e\u6027\u548c\u5bf9\u5e94\u7684\u5c5e\u6027\u503c \uff0c \u5982 caption \u6539\u53d8\u6807\u9898\u6216\u6309\u94ae\u540d\u79f0 \u3001 \u79f0<br \/>\n\uff08 3 \uff09 \u7a97\u4f53\u5e03\u5c40 \uff1a \u663e\u793a \u3001 \u8c03\u6574\u7a97\u4f53\u5728\u5c4f\u5e55\u4e2d\u7684\u4f4d\u7f6e<br \/>\n\u3001 VB \u5bf9\u8c61<br \/>\n1. \u5e38\u89c1\u5bf9\u8c61\u6709\u7a97\u4f53\u548c\u63a7\u4ef6<br \/>\n\u5c5e\u6027 \uff1a \u7279\u6b8a\u6027\u8d28<br \/>\n\u4e07\u6cd5 \uff1a \u884c\u4e3a\u4e07\u5f0f<br \/>\n2 \uff0e \u5bf9\u8c61\u7684\u5206\u7c7b \uff1a \u9884\u5b9a\u4e49\u5218\u8c61 \uff08 \u7cf8\u7edf\u81ea\u5e26 \uff09 \u3001 \u81ea\u5b9a\u4e49\u5bf9\u8c61 \uff08 \u7528\u6237\u81ea\u7acb \uff09<br \/>\n3 \uff0e \u521b\u5efa\u5bf9\u8c61\u7684\u6b65\u9aa4 \uff1a \u6dfb\u52a0\u5bf9\u8c61\u4e00\u8bbe\u7f6e\u5c5e\u6027\u4e00\u4e3a\u8be5\u5218\u8c61\u521b\u5efa\u4e8b\u4ef6<br \/>\n4 \u5c5e\u6027\u8bbe\u7f6e\u7684\u65b9\u6cd5 \uff1a \u4e00\u822c\u5c5e\u6027 \uff08 \u5c5e\u6027\u7a97\u56d7\u91cc\u76f4\u63a5\u8bbe\u7f6e \uff09 \u3001 \u590d\u6742\u5c5e\u6027 \uff08 \u7f16\u5199\u4ee3\u7801 \uff09<br \/>\n5 \uff0e \u5bf9\u989c\u8272\u7684\u8bbe\u7f6e \uff1a &#038;H<br \/>\nBBGGRR&#038;<br \/>\n6 \uff0c \u7a97\u4f53\u80cc\u666f \uff1a BackColor<br \/>\n7 \uff0e \u5bf9\u8c61\u7684\u547d\u540d\u89c4\u5219 \uff1a \u5218\u8c61\u540d = \u524d\u7f00 + \u81ea\u5b9a\u4e49\u540d\u79f0 (cmd-B \uff09<br \/>\n\u4f5c\u4e1a \uff1a \u5728\u7a97\u4f53\u4e0a\u6dfb\u4e09\u4e2a\u6309\u94ae \uff0c \u5206\u522b\u4e3a\u7ea2\u8272 \u3001 \u7eff\u8272 \u3001 \u84dd\u98e2\u5355\u51fb\u6309\u94ae\u5c06\u7a97\u4f53\u80cc\u666f\u8bbe<br \/>\n\u540d\u793a\u7684\u989c\u8272<br \/>\n1 \uff0e \u53cc\u51fb\u63a7\u4ef6\u9762\u677f\u4e0a\u7684\u547d\u4ee4\u6309\u94ae \uff08 \uff09 \u00b7 \u590d\u94d8\u5360\u8d34\u51fa 2 \u4e2a\u540c\u6837\u5927\u5202\u5572\u6309\u94ae<br \/>\n2 \uff0e \u5728\u5c5e\u6027\u7a97\u53e3\u8bbe\u8fc7 n \u5c5e\u6027\u4e3a\u84dd\u8272 \u00b7 \u547d\u540d\u4e3a \uff0c \uff0c \u540c\u6837\u7684\u6b65 0 \u8bbe\u7f6e\u7b2c\u4e8c\u4e2a\u4e3a\u7eff\u8272 \u00b7 \u547d\u540d\u4e3a and-G, \u8bbe<br \/>\n\u8fc7\u7b2c\u4e09\u4e2a\u4e3a\u7ea2\u8272 \uff0c \u547d\u540d\u4e3a and-R<br \/>\n3 \uff0e \u7f16\u5199\u4ee3\u7801<br \/>\n3 \uff0e \u7f16\u4e0e\u4ee3\u7801<br \/>\n0 Form1<br \/>\nPrivate Sub cm4 \u00b7 \uff0e \uff0e \u65e6 \u00b7 \uff0c CJ \uff01 0<br \/>\nForm1.BackColor = &#038; HF \u548c 000<br \/>\nEnd Sub<br \/>\nPrivate Sub \u9099\u4e00 q \u00b7 Cli 0<br \/>\nrml \u65e7 CO r = &#038; Hc000 &#038;<br \/>\nEnd Sub<br \/>\nPrivate Sub \u9099 \uff09 \u751f \uff0e \uff0e &#038; \uff0e -CIi 0<br \/>\nForm 1 \u65e7 kCo r = &#038; \u7f51 FF&#038;<br \/>\nEnd Sub<br \/>\n\u7a97\u4f53<br \/>\n1 \uff0e \u7a97\u4f53\u7ed3@<br \/>\n\u7eff\u8272<br \/>\n\u7ea2\u8272<br \/>\n\u5de5\u5177\u4e00\u9009\u9876\u4e00\u901a\u7528\u4e00\u7f51\u683c\u5355\u4f4d \uff0c \u4e00\u4e2a\u50cf\u7d20\u7b49\u4e8e 15 \u7f07 \uff0c \u8bbe\u7f6e\u9ad8\u5ea6\u548c\u5bbd\u5ea6<br \/>\n\u6dfb\u52a0\u65b0\u7684\u7a97\u4f53\u65b9\u6cd5 \uff1a 1 \uff0e \u5de5\u7a0b\u91cc\u6dfb\u52a0 2 \uff0e \u5728\u53f3\u4fa7\u5de5\u7a0b\u91cc\u5355\u51fb\u77f3 \u00b7 \u6dfb\u52a0\u7a97\u4f53<br \/>\n2 \uff0e \u7a97\u4f53\u5c5e\u6027<br \/>\n\u7a97\u4f53\u8fb9\u6846 \uff1a<br \/>\nBorderStyIe<br \/>\n\u5c5e\u6027\u503c 0 \uff0c N one. \u6ca1\u6709\u8fb9\u6846 \u00b7 \u65e0\u8fb9\u754c\u6846\u67b6 \u00b7 \u6ca1\u6709\u6807\u9898\u90e8\u5206 \u3002<br \/>\n\u6027\u503c 1 \uff1a Fixed Single. \u56fa\u5b9a\u5355\u8fb9\u6846 \uff0c \u5927\u5c0f\u4e0d\u4efb\u610f\u6539\u53d8 \uff0c \u53ea\u80fd\u6700\u5927\u5316\u548c\u6700\u5c0f\u5316\u7684\u7a97<br \/>\n\u5c5e\u6027\u503c 2 \uff1a Sizable, \u53ef\u8c03\u8282\u8fb9\u6846 \uff0c \u53ef\u4efb\u610f\u6539\u53d8\u5927\u5c0f\u7684\u7a97\u56d7<br \/>\n\u6027\u503c 3 \uff1a FixedDialog. \u56fa\u5b9a\u5bf9\u8bdd\u6846 \u00b7 \u4e0d\u80fd\u6700\u5927\u53ca\u6700\u5c0f\u5316<br \/>\n\u5c5e\u6027\u503c 4 \uff1a FixedToolWindow. Wi ndows \u5de5\u5177\u7a97\u56d7 \uff0c \u4e0d\u80fd\u6539\u53d8\u5c3a\u5bf8<br \/>\n\u5c5e\u6027\u503c 5 \uff1a Sizable ToolWindow. Windows \u5de5\u5177\u7a97\u56d7 \u00b7 \u80fd\u6539\u53d8\u5c3a\u5bf8<br \/>\n3 \uff0e \u7a97\u4f53\u8ddd\u8204<br \/>\nWidth \u5bbd\u5ea6 \u3001 heigth \u9ad8\u5ea6 \u3001 top \u9876\u7aef\u8ddd\u79bb \u3001 left \u5de6\u8ddd\u79bb<br \/>\nVisiable \u53ef\u89c1\u6027 \uff08 false\/ture \u9690\u4e3f\u53ef\u89c1 \uff09<br \/>\nEnable \u53ef\u7528\u6027 \uff08 false\/ture \u4e0d\u53ef\u7528 \/ \u53ef\u7528 \uff09<br \/>\n4 \uff0e \u4e3b\u8981\u7a97\u4f53\u4e8b\u4ef6 \uff1a<br \/>\n(1)Click \u5355\u51fb<br \/>\nPrivate Sub Form_CIick()<br \/>\nForm 1 \uff0e Print &#8221; \u4f60\u597d\u4f60\u597d<br \/>\nEnd Sub<br \/>\n(2)DblClick \u53cc\u51fb<br \/>\nPrivate Sub Form DbICIick()<br \/>\nForm 1.BackColor = Form 1. BackColor + 252525<br \/>\nEnd Sub<br \/>\n(3)Load \u8f7d\u5165<br \/>\nPnvate Sub Form_Click()<br \/>\nForm 1.Width = 3<br \/>\nEnd Sub<br \/>\n5 \uff0e \u4e0d\u5e38\u7528\u7a97\u4f53\u4e8b\u4ef6 \uff1a<br \/>\n\uff08 1 \uff09 U nload \u5378\u6230\u6e05\u9664\u4e00\u4e2a\u7a97\u4f53<br \/>\nPrivate Sub Form UnIoad(CanceI lnteger)<br \/>\nForm2.Visi ble = True<br \/>\nEnd Sub<br \/>\n\uff08 2 \uff09 Paint \u7ed9\u753b\u5728\u4e00\u4e2a\u5bf9\u8c61\u88ab\u79fb\u52a8\u6216\u653e\u5927\u4e4b\u540e<br \/>\nPrivate Sub Form Paint()<br \/>\nForm1.Print Form 1.Width<br \/>\nEnd Sub<br \/>\n\u4f1a\u6539\u53d8\u7a97\u4f53\u7684\u5927\u5c0f<br \/>\n0 \uff09 Activate \u9002\u52a8\u5b58\u5728\u4e24\u4e2a\u7a97\u53e3 \uff0c \u5728\u7a97\u56d7\u6bcf\u6b21\u5207\u6362\u540e \uff0c \u4f1a\u6267\u884c<br \/>\n\uff08 3 \uff09 Activate \u9002\u52a8\u5b58\u5728\u4e24\u4e2a\u7a97\u56d7 \uff0c \u5728\u7a97\u53e3\u6bcf\u6b21\u5207\u6362\u540e \uff0c \u4f1a\u6267\u884c<br \/>\nPrivate Sub Form Activate()<br \/>\nForm1. BackCoIor = &#038;HFFFFFF \uff08 \u767d\u8272 \uff09<br \/>\nEnd Sub<br \/>\n\uff08 4 \uff09 Deactivate \u975e\u9002\u52a8<br \/>\nPrivate Sub Form Deactivate()<br \/>\nForm 1 \uff0e BackCOIor = &#038;HO&#038; \uff08 \u9ed1\u8272 \uff09<br \/>\nEnd Sub<br \/>\n\u5339 \u3001 \u63a7\u4ef6<br \/>\n1 \uff0e \u63a7\u4ef6\u7684\u79cd\u7c7b \uff1a<br \/>\n\uff08 1 \uff09 \u5185\u90e8\u63a7\u4ef6 \uff1a \u5de6\u4fa7\u5de5\u5177\u7bb1\u4e2d\u663e\u793a\u7684<br \/>\n\uff08 2 \uff09 \u53ef\u63d2\u5165\u5bf9\u8c61 \uff1a \u5916\u90e8\u5e94\u7528\u7a0b\u5e8f<br \/>\n\uff08 3 \uff09 ActiveX \u63a7\u4ef6 \uff1a \u53ef\u6dfb\u52a0\u63a7\u4ef6\u5de5\u7a0b\u4e00\u90e8\u4ef6\u4e00\u63a7\u4ef6<br \/>\nCommandbutton \u63a7\u4ef6<br \/>\n\uff1a \u4f5c\u4e3a\u6309\u8fdb\u884c\u4f7f\u7528<br \/>\nShift+fi \u5411\u5de6\u53f3\u8171\u53ef\u6539\u53d8\u63a7\u4ef6\u5bbd\u5ea6<br \/>\nShift+fi \u5411\u952e\u4e0a\u4e0b\u883b\u53ef\u6539\u53d8\u63a7\u4ef6\u9ad8\u5ea6<br \/>\n| \u6a18\u4ef6 \uff1a \u6587\u672c\u6846 \u3001 \u5217\u8868\u6846 \u3001 \u7ec4\u5408\u6846\u7b49\u7b49\u63a7\u4ef6\u6dfb\u52a0\u63cf\u8ff0\u6027\u7684\u6807\u7b7e \u00b7 \u4e3a\u4f53\u6dfb\u52a0\u8bf4\u660e\u6587\u5b57<br \/>\nFont \u5c5e\u6027 \uff0c \u70b9\u51fb Font \u5c5e\u6027\u53f3\u4fa7\u6846\u4e2d\u6309\u94ae \uff0c \u5728\u51fa\u73b0\u7684\u5bf9\u8bdd\u6846\u4e2d\u9009\u62e9\u6539\u53d8\u6587\u5b57\u5927\u5c0f \u3001 \u5b57\u4f53 \u00b7<br \/>\nBackColor \u5c5e\u6027 \u00b7 \u53ef\u6539\u53d8 label \u63a7\u4ef6\u7684\u80cc\u666f\u989c\u8272<br \/>\nBackStyle \u5c5e\u6027 0 \u900f\u660e \u00b7 \u65e0\u8bba\u5c06\u80cc\u666f\u8bbe\u7f6e\u6210\u4ec0\u4e48\u989a\u8272 \u00b7 \u4f1a\u663e\u793a \u00b7 1 \u4e0d\u900f\u660e<br \/>\nBorderStyle \u5c5e\u6027 \uff0c 0 \u65e0\u8fb9\u6846 1 \u6709\u8fb9\u6846 \uff0c \u5355\u8fb9\u6709\u51f9\u51f8\u611f\u7684\u6837\u5f0f<br \/>\nCaption \u5c5e\u6027 \uff0c \u5728\u53f3\u4fa7\u680f\u4e2d\u8f93\u5165\u6587\u5b57 \uff0c \u5373\u53ef\u6539\u53d8 label \u63a7\u4ef6\u7684\u540d\u79f0 \u00b7<br \/>\n\u5de6\u8171\u70b9\u51fb label \u63a7\u4ef6\u540e \uff0c \u8c03\u6574 label \u63a7\u4ef6\u5408\u9002\u7684\u5927\u5202 \u3001<br \/>\nAutoSize \u5c5e\u6027 \u00b7 \u81ea\u52a8\u9002\u5e94\u6587\u672c\u6846\u5927 \/ \u53ea\u60f3\u5728\u4e00\u884c\u4f7f\u7528<br \/>\nWordWrap \u5c5e\u6027 \uff0c \u9009\u62e9 ture, \u81ea\u52a8\u6362\u884c<br \/>\nAI ignment \u5c5e\u6027 \uff0c \u6587\u672c\u5bf9\u9f50\u56f4 e \u4ee3\u5de6\u5bf9\u9f50 \u3001 l-right \u53f3\u5bf9\u9f50 \u3001 2-cent \u5c45\u4e2d\u5bf9\u9f50<br \/>\nTextBox \u6587\u672c\u6846\u63a7\u4ef6 \uff1a \u53ef\u7f16\u8f91 \u3002<br \/>\nText \u5c5e\u6027 \uff0c \u540e\u9762\u4e3a\u7a7a \uff08 \u7801 \uff09 \u6216\u8005\u8f93\u5165\u540d\u79f0 \uff08 \u7528\u6237\u540d \uff09<br \/>\nForeColor \u6587\u672c\u548c\u56fe\u5f62\u7684\u524d\u666f\u8272\u82e5\u70b9\u51fb\u6d3b\u52a8\u6807\u9898\u680f \u00b7 \u5219\u6587\u5b57\u53d8\u4e3a\u7070\u8272<br \/>\nPasswordChar,\u00d8$ \u5165\u5323\u7801\u65f6\u662f\u4e0d\u53ef\u89c1\u7684 \uff0c \u53ef\u5728\u672c\u5c5e\u6027\u5bf9\u5e94\u536e\u6dfb\u52a0\u5b57\u7b26 \uff0c \u5982 *<br \/>\nMaxLength, \u53ef\u4ee5\u8f93\u5165\u5b57\u7b26\u7684\u6700\u5927\u6570 \uff0c \u5982\u8f93\u5165\u5dd2\u7801\u53ea\u80fd 6 \u4f4d \uff0c \u5c31\u8f85\u5165 6<br \/>\nMultiLine \u884c\u663e\u793a\u6587\u672c (ture \u81ea\u52a8\u5207\u6362\u5230\u4e0b\u4e00\u884c \uff09<br \/>\n\u4e94 \u3001 VB \u4e66\u5199\u89c4\u5219<br \/>\n1 \u3001 \u4e0d\u533a\u5206\u5927\u5c0f\u5199 \uff0c \u53ef\u81ea\u52a8\u8f6c\u6362\u4ee3\u7801\u5927\u5c0f\u5199<br \/>\n2 \uff0e \u6807\u70b9\u7b26\u53f7\u4e3a\u82f1\u6587<br \/>\n3 \uff0e \u4e00\u6761\u8bed\u53f8\u957f\u5ea6\u4e0d\u5e94\u8d85\u8fc7 1023 \u4e2a\u5b57\u7b26<br \/>\n4 \uff0e \u8f93\u5165\u8bed\u53f8\u5e94\u4e00\u884c\u4e00\u53f8<br \/>\n\u8981\u5c06\u6761\u8bed\u53f8\u5199\u5728\u4e00\u884c\u4e2d \u00b7 \u8bed\u65ec\u95f4\u7528 \uff1a \u5192\u53f7\u5206\u5272<br \/>\n\u5728 forml \u4e2d\u53cc\u51fb\u5230\u4ee3\u7801<br \/>\nPrivate Sub Form_CIick()<br \/>\nPrint &#8220;VB \u8bed\u53f8 &#8221; \uff1a Print &#8220;VB \u8bed\u53f8\u5e94\u4e00\u884c\u4e00\u65ec &#8221;<br \/>\nEnd Sub<br \/>\n5 \uff0e \u82e5\u4e00\u884c\u4e2d\u5199\u4e0d\u4e0b\u4e00\u6761\u8bed\u9965\u53ef\u5206\u5199\u5728\u884c\u4e2d \u00b7 \u884c\u5c3e\u52a0\u4e00 \uff08 \u7a7a\u683c\u4e0b\u5212\u7ebf \uff09<br \/>\nPrint &#8220;VB \u8bed\u53f8 \u201c \uff1a Print<br \/>\n&#8220;VB \u8bed\u53f8\u5e94\u4e00\u884c\u4e00\u7538 &#8221;<br \/>\n\u516d \u3001 \u8d4b\u503c\u8bed\u65ec<br \/>\n(1) \u5bf9\u8c61 \uff0e \u5c5e\u6027 = < \u8868\u8fbe\u5f0f ><br \/>\nPrivate Sub Form\u2014Load()<br \/>\nForm 10p \u2116 n &#8221; \u6b22\u8fce\u7a97\u56d7 &#8221;<br \/>\nEnd Sub<br \/>\n\uff08 2 \uff09 \u53d8\u91cf = \u503c \uff0e > \u76ee\u6807\u64cd\u4f5c\u7b26\u6e90\u64cd\u4f5c\u7b26<br \/>\n\u4e03 \u3001 \u6ce8\u91ca\u8bed\u65ec \uff0e<br \/>\n\uff08 1 \uff09 &#8216; \u5728\u4ee3\u7801\u524d\u6dfb\u52a0\u5355\u5f15\u53f7\u6587\u5b57\u8bf4\u660e &#8216; \u7a97\u4f53\u9ad8\u5ea6<br \/>\n\uff08 2 \uff09 \u53e6\u8d77\u4e00\u884c\u8f93\u5165 Rem \u7a97\u4f53\u9ad8\u5ea6<br \/>\n\uff08 2 \uff09 \u53e6\u8d77\u4e00\u884c\u8f93\u5165 Rem \u7a97\u4f53\u9ad8\u5ea6<br \/>\n\u516b \u3001 \u66ab\u505c\u53ca\u7ed3\u675f\u8bed\u53f8<br \/>\n1 \uff0e \u66ab\u505c\u8bed \uff1a stop<br \/>\n\uff08 1 \uff09 \u4e0d\u77e2\u95ed\u4efb\u4f55\u6587\u4ef6\u6216\u6e05\u9664\u53d8\u91cf \u00b7 \u7a0b\u5e8f\u8d70\u5230\u8fd9\u91cc\u5c31\u6682\u505c\u6267\u884c\u4e86<br \/>\nPrivate Sub Form\u2014Load()<br \/>\nForm1.Caption = &#8221; \u6b22 \uff0c \u8fce\u7a97\u56d7 &#8221;<br \/>\nStop<br \/>\nForm 1. BackColor = &#038;HFF&#038;<br \/>\nEnd Sub<br \/>\n\uff08 2 \uff09 \u4f46\u5982\u679c\u5728\u6587\u4ef6\u4e2d\u5305\u6709 stop. \u5219\u4f1a\u77e2\u95ed\u6240\u6709\u6587\u4ef6\u5e76\u9000\u51fa<br \/>\n\u827a\u7ed3\u675f\u8bed\u65ec \uff08 \u63a7\u5236\u8bed\u53f8 \uff09 End<br \/>\n\u53ef\u653e\u5728\u8fc7\u7a0b\u4e2d\u7684\u4efb\u4f55\u4f4d\u7f6e<br \/>\n\u4f5c\u7528\u662f\u77e2\u95ed\u4ee3\u7801 \uff1b \u77e2\u95ed\u7528 OPEN \u6253\u5f00\u7684\u6587\u4ef6<br \/>\n\u4e0e\u7684\u533a\u522b \uff1a exit \u4e0d\u8bf4\u660e\u4ee3\u7801\u8bed\u53f8\u7684\u7ec8\u6b62 \u00b7 \u53ea\u662f\u4ece\u76f8\u5e94\u7684\u4ee3\u7801\u6bb5\u9000\u51fa<br \/>\n\u4e5d \uff0c VB \u5f00\u53d1\u6b65<br \/>\n\u7f16\u7a0b \uff0e > \u8c03\u8bd5 \u00b7 > \u6539\u8c31 \u00b7 > \u8fd0\u884c<br \/>\n\u5efa\u7acb\u53ef\u89c6\u5316\u7528\u6237\u754c\u9762 \u00b7 > \u8bbe\u7f6e\u5bf9\u8c61\u5c5e\u6027 &#8211; > \u7f16\u5199\u4ee3\u7801 \uff0e > \u751f\u6210\u53ef\u6267\u884c\u6587\u4ef6<br \/>\n\u5341 \u3001 \u6575\u636e\u7c7b\u578b<br \/>\n1 \uff0e \u57fa\u672c\u6570\u636e\u7c7b\u578b<br \/>\n\uff08 1 \uff09 \u6570\u503c\u578b \uff1a \u6574\u6570\u578b\u548c\u6d6e\u70b9\u6570 \u3002<br \/>\n\u6574\u6570\u578b\u53ef\u5206\u4e3a\u6574\u578b (lnteger. \u7c7b\u578b\u7b26 \uff05 \uff09 \u3001 \u957f\u6574\u578b (Long, &#038; \uff09 \uff1b<br \/>\n\u6d6e\u70b9\u6570\u6570\u636e\u5206\u5355\u7cbe\u5ea6\u578b (Single. \uff01 \uff09 \u548c\u53cc\u7cbe\u5ea6\u578b (Double. # \uff09 \u3002<br \/>\n\uff08 2 \uff09 \u5b57\u7b26\u4e32\u578b (String. \u7c7b\u578b\u7b26 $ \uff09<br \/>\n\u53d8\u957f \uff1a \u957f\u5ea6\u4e0d\u786e\u5b9a\u4fe8 2 \uff0e 31<br \/>\n\u5b9a\u957f \uff1a \u4e2a\u6570\u786e\u5b9a\u4fe8 2 \uff0e 16<br \/>\n\u5b57\u7b26\u4e32\u662f\u4e00\u4e2a\u5b57\u7b26\u5e8f\u5217 \uff0c \u5fc5\u987b\u7528\u53cc\u5f15\u53f7\u62ec\u8d77\u6765 \u3002 \u957f\u5ea6\u4e3a\u96f6\u7684\u5b57\u7b26\u4e32\u79f0\u4e3a\u7a7a\u5b57\u7b26\u4e32 \uff0c<br \/>\n\u8279 \u3002 \u5bf9\u4e8e\u5b9a\u957f\u5b57\u7b26\u4e32 \uff0c \u5f53\u5b57\u7b26\u957f\u5ea6\u4f4e\u4e8e\u89c4\u5b9a\u957f\u5ea6 \u00b7 \u6717\u7528\u7a7a\u683c\u586b\u6ee1 \uff1b \u5f53\u5b57\u7b26\u957f\u5ea6<br \/>\n\u4e8e\u89c4\u5b9a\u957f\u5ea6 \uff0c \u5219\u622a\u53bb\u53e6\u4f59\u5b57\u7b26 \u3002<br \/>\n\uff08 3 \uff09 \u8d27\u5e01\u578b (Currency. \u7c7b\u578b\u7b26@\uff09 \uff1a 10 \uff0e 11@<br \/>\n\uff08 4 \uff09 \u65e5\u671f\u578b (Date \uff09<br \/>\n\u65e5\u671f\u548c\u65f6\u95f4\u5fc5\u987b\u88ab\u653e\u7f6e\u5728\u4e00\u5218 # \u53f7\u4e4b\u95f4 \u00b7 \u5982 # 02 \/ 14 \/ 2020 10 \uff1a 10 \uff1a 10 #<br \/>\n\uff08 5 \uff09 \u53d8\u4f53\u578b (Variant \uff09 \uff1a \u5b57\u7b26\u53d8\u4f53\u548c\u6570\u503c\u53d8\u4f53<br \/>\nvariant \u53ef\u50a8\u7cfb\u7edf\u5b9a\u4e49\u7684\u6240\u6709\u6570\u636e\u7c7b\u578b \uff0c \u5218\u4e00\u4e2a\u53d8\u58f0\u660e\u65f6\u6ca1\u6709\u8bf4\u660e\u7c7b\u578b \uff0c \u9ed8\u8ba4<br \/>\n\u5c31\u662f\u53d8\u4f53\u7c7b\u578b<br \/>\n\u8bbe\u7f6e\u9ed8\u8ba4\u6570\u636e\u7c7b\u578b<br \/>\nDim x,y,z \u201c integer \u672c\u8bed\u65ec\u4e2d\u53ea\u58f0\u660e\u4e86 z \u4e3a\u6574\u578b x \u548c y \u9ed8\u8ba4\u4e3a\u53d8\u4f53\u7c7b\u578b<br \/>\nDim x as integer,y integer,z as integer \u7cbe\u786e\u58f0\u660e\u4e86 x y z \u7684\u7c7b\u578b<br \/>\n\u6a21\u5757\u8bed\u65ec deftype \u5b9a\u4e49\u67d0\u4e00\u8303\u56f4\u5185\u7684\u53d8 0 \u5c5e\u4e8e\u7c7b\u578b<br \/>\n\u5de5\u7a0b 1 &#8211; Form1 (Code)<br \/>\n0r0<br \/>\nD e flnt X\u2014Z<br \/>\nDefStr \u00c5-C<br \/>\nPr ivat e Sub F or CI \u6534 ck 0<br \/>\nPr \u5bb6 nt x= &#038; x<br \/>\nPr nt \u201c &#038; y<br \/>\nPr nt z= &#038; z<br \/>\nEnd Sub<br \/>\nPr vat e Sub F or \u4e00 ad 0<br \/>\nD \u5bb6\u9ab1 z<br \/>\n\u4f0d 0 \u73a9 c<br \/>\nEnd Sub<br \/>\n\u6267\u884c\u7ed3\u679c\u4e3a \u00d7<br \/>\nY=O<br \/>\nZ=O<br \/>\n\u4ee5 \u00d7 \uff0c \u5f00\u5934\u7684\u90fd\u4f1a\u88ab\u7740\u505a\u6574\u578b<br \/>\nC1ick<br \/>\nY=O<br \/>\nZ=O<br \/>\n\u4ee5\u5f00\u5934\u7684\u90fd\u4f1a\u88ab\u656c\u6574\u578b<br \/>\n2 \uff0c \u81ea\u5b9a\u4e49\u636e\u7c7b\u578b \uff08 \u8bb0\u7c7b\u578b\u53d8\u91cf \uff09<br \/>\nType \u6570\u636e\u7c7b\u578b\u540d<br \/>\n\u6570\u636e\u5143\u7d20\u540d as \u7c7b\u578b<br \/>\nEnd Type<br \/>\n3 \uff0e \u679a\u4e3e\u6578\u636e\u7c7b\u578b<br \/>\n\u5341\u4e00 \u3001 \u7cfb\u7edf\u5185\u90e8\u53d8 0<br \/>\n\u5e38\u91cf\u503c\u4e0d\u4f1a\u53d1\u751f\u6539\u53d8\u7684\u91cf \uff0c \u662f\u5bf9\u5e94\u7684\u4e00\u5757\u5185\u5b58\u5730\u5740<br \/>\n\u5e38\u53c8\u5206\u4e3a\u4e24\u79cd \uff1a<br \/>\n\uff08 1) \u7cfb\u7edf\u5e38 \uff0c \u89c6\u56fe\u4e00\u5bf9\u8c61\u6d4f\u89c8\u5668\u4e2d<br \/>\nPrivate Sub Form_Load 0<br \/>\nFom1. c 10r = Ye11 \u201c<br \/>\nEnd Sub<br \/>\n\uff08 2 \uff09 \u81ea\u5b9a\u4e49\u5e38<br \/>\n1 \u6587\u5b57\u5e38\u661f \uff1a \u5b57\u7b26\u4e32\u5e38\u91cf \u3001 \u6570\u503c\u5e38\u661f<br \/>\n\u5b57\u7b26\u4e32\u5e38 \uff1a \u662f\u53cc\u5f15\u53f7\u6216\u56de\u8f66\u4ee5\u5916\u7684\u4efb\u610f ASCLL \u5b57\u7b26<br \/>\n\u6570\u503c\u5e38 \uff0e \u6574\u578b \u3001 \u957f\u6574\u578b \u3001 \u8d27\u5e01\u578b \u3001 \u6d6e\u70b9\u6570<br \/>\n2 \u7b26\u53f7\u5e38 \uff0c \u7528\u5b9a\u4e49\u7684\u7b26\u53f7\u6765\u4ee3\u66ff\u6570\u503c\u6216\u5b57\u7b26\u4e32<br \/>\n(1)Const \u5e38\u91cf\u540d = \u8868\u8fbe\u5f0f Const vbBIue = 16711 0 ()H<br \/>\nCons t PI = 3 \u3001 14 \u5904\u8c03\u5230\u540c\u4e00\u4e2a\u6570\u503c \uff0c \u5c31\u5c06\u5176\u5b9a\u4e49\u4e3a\u4e00\u4e2a\u5e38\u74ba<br \/>\n\uff08 2 \uff09 Const \u5e38\u540d = \u8868\u8fbe\u5f0f \u00b7 \u5e38\u540d = \u8868\u8fbe\u5f0f\u5b9a\u4e49\u4e2a\u5e38 0<br \/>\n\u5341\u4e8c \u3001 \u81ea\u52a8\u53d8 0 \u53ca\u9759\u6001\u53d8 0<br \/>\n\uff08 1 \uff09 \u7a0b\u5e8f\u8fd0\u884c\u8fc7\u7a0b\u4e2d\u4f1a\u53d1\u751f\u6539\u53d8\u7684\u867d \uff0c \u5185\u834f\u5206\u914d\u7684\u4e00\u5757\u547d\u540d\u7a7a\u95f4<br \/>\nVB \u4e5f\u4f7f\u7528\u53d8\u6765\u5b58\u50a8\u6570\u636e\u548c\u503c \uff0c \u53d8\u6570\u636e\u7c7b\u578b\u51b3\u5b9a\u4e86\u53d8\u91cf\u4ee5\u4f55\u79cd\u5f62\u5f0f\u6765\u5b58\u50a8\u6570\u636e<br \/>\n\uff08 2 \uff09 \u53d8 0 \u7684 \uff1a Dec1are \u53d8 08 \u201c \u7c7b\u578b<br \/>\nDeclare \u5305\u62ec \uff1a Dim \u81ea\u52a8\u53d8\u867d \u3001 Static \u9759\u6001\u53d8 \u3001 Redim Public Private<br \/>\nPr i vat e Sub Form CIick 0<br \/>\nDim X As lnteger<br \/>\nStatic y As lnteger<br \/>\nX = X + 1<br \/>\nPrint x= \uff1b X \uff0c y=<br \/>\n\uff1b Y<br \/>\nEnd Sub<br \/>\n\u5ce5\u6001\u53d8\u867d\u4f1a\u4fdd\u7559\u4e0a\u4e00\u6b21\u8fd0\u884c\u7684\u7ed3\u679c<br \/>\n\uff08 3 \uff09 \u53d8\u547d\u540d\u89c4\u5219<br \/>\na) \u53ea\u80fd\u7531\u5b57\u7530 \u3001 \u6570\u5b57 \u3001 \u4e0b\u5212\u7ebf\u7ec4\u6210 \uff0c \u957f\u5ea6\u4e0d\u80fd\u8d85\u8fc7 255 \u4e2a\u5b57\u7b26<br \/>\nb) \u7b2c\u4e00\u4e2a\u5b57\u7b26\u53ea\u80fd\u662f\u82f1\u6587\u5b57\u7530<br \/>\nc) \u4e0d\u533a\u5206\u5927\u5c0f\u5199<br \/>\nd) \u4e0d\u80fd\u4f7f\u7528\u4fdd\u7559\u5b57<br \/>\n\uff08 4 \uff09 \u53d8\u7684\u4f5c\u7528\u57df<br \/>\nmax. b00<br \/>\n\u4e0b\u8f7d\u9ad8<br \/>\n1. \u5c40\u90e8\u53d8 \uff0c \u53ea\u6709\u8fc7\u7a0b\u5185\u90e8\u4ee3\u7801\u72ad\u80fd\u8bbf\u95ee\u6216\u6539\u53d8\u8be5\u53d8\u867d\u7684\u503c \uff0c din\/static<br \/>\n2 \u3001 \u6a21\u5757\u53d8 \uff0c \u7a97\u4f53\u53d8\u8fc7 \uff08 \u53ef\u7528\u4e8e\u7a97\u4f53\u5185\u7684\u6240\u6709\u8fc7\u7a0b \uff09 \u548c\u6807\u51c6\u6f20\u5757\u53d8\u8fc7<br \/>\n\u58f0 \uff1a \u6954\u5757\u7684\u58f0\u660e\u90e8\u5206<br \/>\n\u6a21\u5757<br \/>\n\u7a97\u4f53\u6a21\u5757 \uff1a \u7528\u6237\u754c\u9762\u548c\u5177\u4f53\u4ee3\u7801 \uff08 \u901a\u7528\u4ee3\u7801 \u3001 \u7a97\u4f53\u4ee3\u7801 \u3001 \u7a97\u4f53\u4e2d\u63a7\u4ef6\u4ee3\u7801 \uff09<br \/>\n\u6807\u51c6\u6a21\u5757 \uff1a \u4ee3\u7801\u7ec4\u6210 \uff0c \u4e0d\u5c5e\u4e8e\u5177\u4f53\u7684\u7a97\u4f53\u6216\u63a7\u4ef6 \u00b7 \u7528 d \u548c private<br \/>\nb) \u7b2c\u4e00\u4e2a\u5b57\u7b26\u53ea\u80fd\u662f\u82f1\u6587\u5b57\u7530<br \/>\nc) \u4e0d\u533a\u5206\u5927\u5c0f\u5199<br \/>\nd) \u4e0d\u80fd\u4f7f\u7528\u4fdd\u7559\u5b57<br \/>\n\uff08 4 \uff09 \u53d8\u7684\u7528\u57df<br \/>\n1. \u5c40\u90e8\u53d8 \uff0c \u53ea\u6709\u8fc7\u7a0b\u5185\u90e8\u4ee3\u7801\u4e4b\u80fd\u8bbf\u95ee\u6216\u6539\u53d8\u8be5\u53d8\u7684\u503c \uff0c din\/static<br \/>\n2 \uff0c \u6a21\u5757\u53d8 \uff0c \u7a97\u4f53\u53d8\u8fc7 \uff08 \u53ef\u7528\u4e8e\u7a97\u4f53\u5185\u7684\u6240\u6709\u8fc7\u7a0b \uff09 \u548c\u6807\u51c6\u7bcc\u5757\u53d8\u8fc7<br \/>\n\u58f0\u660e \uff1a \u6954\u5757\u7684\u58f0\u660e\u90e8\u5206<br \/>\n\u6a21\u5757<br \/>\n\u7a97\u4f53\u6a21\u5757 \uff1a \u7528\u6237\u754c\u9762\u548c\u5177\u4f53\u4ee3\u7801 \uff08 \u901a\u7528\u4ee3\u7801 \uff0c \u7a97\u4f53\u4ee3\u7801 \u3001 \u7a97\u4f53\u4e2d\u63a7\u4ef6\u4ee3\u7801 \uff09<br \/>\n\u6807\u51c6\u6a21\u5757 \uff1a \u4ee3\u7801\u7ec4\u6210 \uff0c \u4e0d\u5c5e\u4e8e\u5177\u4f53\u7684\u7a97\u4f53\u6216\u63a7\u4ef6 \u00b7 \u7528 din \u548c private<br \/>\n\u5de5\u7a0b \uff0e \u6dfb\u6a21\u5757\u4e00\u6253\u5f00<br \/>\n\u7c7b\u6a21\u5757 \uff1a \u6717\u5305\u542b\u4ee3\u7801 \uff0c \u53c8\u5305\u542b\u6570\u636e<br \/>\n3 \uff0e \u5168\u5c40\u53d8 \uff1a public \u548c gl \u3002 1 mxblic sr As string<br \/>\n\u58f0\u7f6e \uff1a \u6807\u51c6\u7094\u7684\u58f0\u660e\u90e8\u5206<br \/>\n\u5341\u56db \uff0c VB \u7684\u9ed8\u8ba4\u58f0\u660e<br \/>\n1 \u6e7f\u793a\u58f0\u660e<br \/>\n\u5de5\u5177 \uff0e \u9009\u9879 \u00b7 \u8981\u6c42\u53d8\u91cf\u58f0\u660e\u6253\u5bf9\u52fe<br \/>\n2 \u5f0f\u58f0\u660e \uff1a \u4e0d\u7ecf\u8fc7\u58f0\u660e\u800c\u76f4\u63a5\u4f7f\u7528<br \/>\n\u5341\u4e94 \uff0e \u51fd\u6570<br \/>\n\uff08 \u4e00 \uff09 \u5e38\u7528\u5185\u90e8\u51fd\u6570<br \/>\n1 \uff0e \u6570\u5b66\u51fd\u6570<br \/>\n\u51fd\u6570\u8279\u822c\u683c\u5f0f\u51fd\u6570\u540d \uff08 { \u53c2\u6570\u8868 } \uff09<br \/>\n\u591a\u4e2a\u53c2\u6570 \uff0e \u51fd\u6570\u540d \uff08 \u60e8\u6570 \uff0c \u53c2\u6570 \uff0c \u53c2\u6570 } \uff09<br \/>\n\u51fd\u6570\u540d \u201c \u4ee5\u8868\u8fbe\u5f62\u5f0f\u8fdb\u884c\u8c03\u7528 \u00b7 X=int \uff08 3 \uff0e 7 \uff09<br \/>\n2 \u556d\u6362\u51fd\u6570<br \/>\n\u53d6\u6574\u51fd\u6570 int \uff08 x \uff09 \u8fd4\u56de\u5c0f\u4e8e\u7b49\u4e8e\u81ea\u53d8\u91cf \u00d7 \u7684\u6700\u5927\u6574\u6570\u90e8\u5206<br \/>\n\u51f6\u8fd4\u56de\u503c\u4e3a\u5927\u4e8e\u7b49\u4e8e\u81ea\u53d8\u91cf \u00d7 \u7684\u6574\u6570\u90e8\u5206<br \/>\n\u89c6 \u00b7 \u7acb\u5373\u7a97\u56d7\u8f93\u5165 print int \uff08 8 \uff0e 4 \uff09 \u7ed3\u679c\u4e3a 8<br \/>\nprint \uff08 8 \uff0e 4 \uff09 \u7ed3\u679c\u4e3a 8<br \/>\npn nt int \uff08 \u00b7 &#038; 4 \uff09 \u7ed3\u679c\u4e3a 9<br \/>\nprint \uff08 \uff0e 8 \uff0e 4 \uff09 \u7ed3\u679c\u4e3a 8<br \/>\n3 \uff0e \u5b57\u7b26\u4e32\u51fd\u6570<br \/>\n4 \uff0e \u65f6 \u300c \u65e5\u671f\u51fd\u6570<br \/>\n5 \uff0e \u968f\u6751\u6db5\u6570<br \/>\n\uff08 \u4e8c \uff09 \u5220\u9664\u7a7a\u767d\u7684\u51fd\u6570 \uff1a \u62ec\u53f7\u4e2d\u7684 s \u4e3a\u7c7b\u578b<br \/>\n\uff081\uff09\u5220\u9664\u5de6\u4fa7 :LTrim $ \u5012<br \/>\nPrint ltrimC vb \u5b66\u4e60\u4e2d &#8216; \uff09<br \/>\nvb \u5b66\u4e60\u4e2d<br \/>\n\uff08 2 \uff09 \u5220\u9664\u53f3\u4fa7 \uff1a RTrim $(s)<br \/>\nPrint rtrim( \u3001 b \u5b66\u4e60\u4e2d \uff0e \uff09 \uff1b &#8216;<br \/>\nvb \u5b66\u4e60\u4e2d\u4e00<br \/>\n\uff08 3 \uff09 \u5220\u9664\u4e24\u8fb9 \uff1a T \u75c8 m $(s)<br \/>\nPrint trimC vb \u5b66\u4e60\u4e2d &#8216; \uff09 \uff1b &#8216;<br \/>\nvb \u5b66\u4e60\u4e2d\u4e00<br \/>\n\uff08 \u4e09 \uff09 \u5b57\u7b26\u4e32\u622a\u53d6\u51fd\u6570 \uff1a \u4e3e\u4f8b\u8eab\u4efd\u8bc1\u53f7\u7801<br \/>\n1 \uff0e \u5de6\u4fa7 N \u4e2a\u5b57\u7b26 Left(s,n) \uff1a s \u4ee3\u8868\u8981\u622a\u53d6\u7684\u4e32 \uff0c n \u4ee3\u8868\u8981\u622a\u53d6\u7684\u5b57\u7b26\u4e2a\u6570<br \/>\n2 \uff0e \u53f3\u5f58 N \u4e2a\u5b57\u7b26 Rig ht(s,n) \uff1a s \u4ee3\u8868\u8981\u622a\u53d6\u7684\u4e32 \uff0c n \u4ee3\u8868\u4ece\u53f3\u5f00\u59cb\u8981\u622a\u53d6\u7684\u4e2a\u6570<br \/>\n3 \uff0e \u4e2d\u95f4 N \u4e2a\u5b57\u7b26 Mid(s,n1,n2) \uff1a s \u4ee3\u8868\u8981\u622a\u53d6\u7684\u5b57\u7b26\u4e32 \uff0c nl \u4ee3\u8868\u4ece\u4e2d\u95f4\u7684\u54ea\u4e2a\u4f4d\u7f6e\u622a\u53d6 \uff0c n2<br \/>\n\u4ee3\u8868\u8981\u622a\u53d6\u7684\u5b57\u7b26\u4e2a\u6570<br \/>\n\uff08 \u56db \uff09 Sting \u51fd\u6570\u548c space \u51fd\u6570<br \/>\n1.Sting \u751f\u6210\u7531 N \u4e2a\u540c\u4e00\u5b57\u7b26\u7ec4\u6210\u7684\u5b57\u7b26\u4e32<br \/>\npnnt stri \u56db \uff08 10 \uff0c \u201c &#8216; \uff09<br \/>\n25 \uff08 e \uff1a \u751f\u6210\u7531 N \u4e2a\u7a7a\u683c\u7ec4\u4e32<br \/>\nprint \u2022a\u2022;space( 5 \uff09 \uff1b &#8216; b \u7136 p e \uff08 5 \u5739\u8292<br \/>\n\uff08 \u4e94 \uff09 \u5b57\u7b26\u8fdb\u884c\u5927\u5202\u4e10\u8f6c\u6362<br \/>\nUCase(s) \u5c0f\u8f6c\u5927<br \/>\nLcase \uff08 \uff09 \u5927\u8f6c\u5c0f<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u2014.vB \u96c6\u6210\u5f00\u53d1\u73af\u5883 1 \u6807\u9898\u680f 2 &#8230;<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[68],"tags":[],"class_list":["post-6413","post","type-post","status-publish","format-standard","hentry","category-zzjy"],"_links":{"self":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/posts\/6413","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=6413"}],"version-history":[{"count":0,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=\/wp\/v2\/posts\/6413\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=6413"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=6413"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.aiersheng.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=6413"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}