{"id":1028,"date":"2022-03-24T20:42:41","date_gmt":"2022-03-24T12:42:41","guid":{"rendered":"http:\/\/www.henrycome.com\/wordpress\/?p=1028"},"modified":"2022-03-24T20:42:41","modified_gmt":"2022-03-24T12:42:41","slug":"202203242042","status":"publish","type":"post","link":"http:\/\/www.henrycome.com\/wordpress\/202203242042\/1028","title":{"rendered":"\u3010VBA\u3011\u6570\u7ec4\u76f8\u5173\u5c5e\u6027\u548c\u65b9\u6cd5\u3001TimeValue\u51fd\u6570\u3010\u8349\u7a3f\u3011"},"content":{"rendered":"<p>\u6570\u7ec4\u7684\u58f0\u660e<br \/>\n\u52a8\u6001\u548c\u9759\u6001<\/p>\n<pre><code class=\"language-vb\">VBA\u4e2d\u58f0\u660e\u53d8\u91cf\u53ef\u4ee5\u76f4\u63a5\u8d4b\u503c\u6307\u5b9a\u7c7b\u578b\u3002\uff08\u6709\u7591\u95ee\uff09\nDim arr(1 To 10, 1 To 2)\nredim arr()\n\u4fdd\u7559\u539f\u6570\u636e\u53d8\u52a8\u6570\u7ec4\u5bb9\u91cf\nredim preserve arr()<\/code><\/pre>\n<p>TimeVlaue\u51fd\u6570\u8fd4\u56deDate\u7c7b\u578b<\/p>\n<pre><code class=\"language-vb\">Sub arraygetvalue()\n'\u6240\u8c13\u4e0b\u6807\uff08subscript\uff09\u5c31\u662f\u7f16\u53f7\uff0c\n'\u4e0b\u754c\u4e0a\u754c\u662f\u6307\u7f16\u53f7\u7684\u8d77\u6b62\u3002 the largest\/smallest available subscript,\n'\u5b9e\u9645\u4e0a,\u6570\u7ec4arrayexample(10)\u7684\u5bb9\u91cf\u662f+1=11\uff0c\u56e0\u4e3a\u4e0b\u6807\u662f\u4ece0\u5f00\u59cb\u7684\u3002\n'\u8fd8\u6709\u6570\u7ec4\u7684\u58f0\u660e\u548c\u6539\u53d8\u5927\u5c0f\n'\u591a\u7ef4\u6570\u7ec4\u548c\u6570\u7ec4\u7684\u7ef4ubound\u5f97\u5230\u7684\u662f\u4e0a\u754c\u7684\u7f16\u53f7\uff0c\u4e0d\u662f\u6210\u5458\u6570\u91cf\n\n'\u6240\u8c13\u4e0b\u6807\uff08subscript\uff09\u5c31\u662f\u7f16\u53f7\uff0c\n'\u4e0b\u754c\u4e0a\u754c\u662f\u6307\u7f16\u53f7\u7684\u8d77\u6b62\u3002 the largest\/smallest available subscript,\n'\u5b9e\u9645\u4e0a,\u6570\u7ec4arrayexample(10)\u7684\u5bb9\u91cf\u662f+1=11\uff0c\u56e0\u4e3a\u4e0b\u6807\u662f\u4ece0\u5f00\u59cb\u7684\u3002\nDim arr1(10)\n'\u67e5\u770b\u5230\u8fd9\u4e2a\u4e0b\u754c\u548c\u4e0a\u754c\nDebug.Print LBound(arr1) '0\nDebug.Print UBound(arr1) '10\n\narr1(0) = 1\narr1(10) = 11\nDebug.Print arr1(0)'1\nDebug.Print arr1(10)'11\n\nEnd Sub<\/code><\/pre>\n<p>Ubound\u4e0e\u591a\u7ef4\u6570\u7ec4<\/p>\n<pre><code class=\"language-vb\">Sub arrytest()\nDim upper\n&#039;\u5b9a\u4e49\u4e00\u4e2a\u4e09\u7ef4\u6570\u7ec4\uff0c\u6bcf\u4e2a\u7ef4\u5ea6\u91cc\u7684\u7f16\u53f7\u5206\u522b\u662f1-10\uff0c5-15,10-20\nDim myarray(1 To 10, 5 To 15, 10 To 20)\n&#039;\u5b9a\u4e49\u4e00\u4e2a\u4e00\u4f4d\u6570\u7ec4\uff0c\u7f16\u53f7\u662f0-9\nDim anyarray(10)\n\nupper = UBound(myarray) &#039;\u9ed8\u8ba4\u662f1\uff0c\u7b2c\u4e00\u7ef4\u7684\u4e0a\u754c\nDebug.Print upper &#039;10\nDebug.Print anyarray(1);\n\nupper = UBound(anyarray, 1) &#039;\u7b2c\u4e00\u7ef4\u7684\u4e0a\u754c\nDebug.Print upper &#039;10\n\nEnd Sub<\/code><\/pre>\n<p>TimeValue\u8fd4\u56deDate\u7c7b\u578b\u6570\u636e\u3002\u53c2\u6570\u662f\u65f6\u95f4\u5b57\u7b26\u4e32\u6216\u8005Date\u7c7b\u578b\u6570\u636e\u3002Date\u7c7b\u578b\u4e0d\u4ec5\u4ec5\u662f\u65e5\u671f\u4e5f\u5305\u62ec\u7eaf\u7cb9\u7684\u65f6\u95f4\u683c\u5f0f\u3002\u6bd4\u5982\uff0c#12:00:00#\u8fd9\u6837\u7684\u5199\u6cd5\u662fDate\u7c7b\u578b\u3002\u5982\u679c\u662f&quot;12:00:00&quot;\u7528\u5f15\u53f7\uff0c\u662f\u5b57\u7b26\u4e32\u3002\u4f46\u662f\u90fd\u80fd\u8fd4\u56de\u6b63\u786e\u7684\u65e5\u671f\u683c\u5f0f\u3002<\/p>\n<pre><code class=\"language-vb\">Sub timevaluetest()\nDim time\ntime = #12:00:00 PM# &#039;\u6570\u636e\u672c\u8eab\u662fdate\nDebug.Print time &#039;12:00:00\nDebug.Print TypeName(time) &#039;Date\n\ntime2 = &quot;12:00:00 PM&quot; &#039;\u6570\u636e\u672c\u8eab\u662f\u5b57\u7b26\u4e32\nDebug.Print TypeName(time2) &#039;String\n\nDim totimevalue\ntotimevalue = timevalue(&quot;12:00:00 PM&quot;) &#039;timevalue\u7684\u8fd4\u56de\u503c\u662fDate\n\nDebug.Print TypeName(totimevalue) &#039;Date\n\nEnd Sub<\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u6570\u7ec4\u7684\u58f0\u660e \u52a8\u6001\u548c\u9759\u6001 VBA\u4e2d\u58f0\u660e\u53d8\u91cf\u53ef\u4ee5\u76f4\u63a5\u8d4b\u503c\u6307\u5b9a\u7c7b\u578b\u3002\uff08\u6709\u7591\u95ee\uff09 Dim arr(1 To 10, 1 [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[58,23],"tags":[],"_links":{"self":[{"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/posts\/1028"}],"collection":[{"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/comments?post=1028"}],"version-history":[{"count":3,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/posts\/1028\/revisions"}],"predecessor-version":[{"id":1031,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/posts\/1028\/revisions\/1031"}],"wp:attachment":[{"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/media?parent=1028"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/categories?post=1028"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.henrycome.com\/wordpress\/wp-json\/wp\/v2\/tags?post=1028"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}