tag:blogger.com,1999:blog-58707973801832410202024-03-14T07:23:13.939-07:00SDLab.NTUUnknownnoreply@blogger.comBlogger10125tag:blogger.com,1999:blog-5870797380183241020.post-67763645155869999752013-06-23T11:25:00.003-07:002013-06-23T11:52:32.163-07:00當你編輯Word時,改變某一段文字,結果另一段文字跟著變?當你編輯Word時,改變某一段,結果另一段跟著變<br />
那是因為該段文字樣式被設為自動更新
<br />
將樣式改回來即可<br />
以本文為例,樣式"縮3-(一)"跟"標題4,1"都被勾選了"自動更新",將自動更新取消變可以恢復正常。<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhjPgY221Nz8vPUtdeVZQ17B5zlLUVYGn20UyTuprumHxr43CVHwbv_6O13xpaXMX8dANibjl5fADt1amok0QPxdXV_HQxhBAgtBN5spOxI_CO7lah0rqvhJX39Mb05pjA1YmXhnsByCoQ/s1600/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%881.20.47.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhjPgY221Nz8vPUtdeVZQ17B5zlLUVYGn20UyTuprumHxr43CVHwbv_6O13xpaXMX8dANibjl5fADt1amok0QPxdXV_HQxhBAgtBN5spOxI_CO7lah0rqvhJX39Mb05pjA1YmXhnsByCoQ/s400/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%881.20.47.png" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
樣式就是在上面的一排工具,每段文字都可以設成不同樣式,利用樣式可以方便你利用以設定好的樣板來改變不同段落文字格式</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj9trj-c5fqPWp61bWliQn_fB3FetcvCYu-y_oF9EMxFnQDdaceY6teRLiH9kyqOylQZtwo0_wZYNgey1FHu9SP1VMWdmJLzdVtvR59l1SIA1ufDH8V31mvceHTcU1BsfAVEYcrL9CkjM0/s1600/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.50.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj9trj-c5fqPWp61bWliQn_fB3FetcvCYu-y_oF9EMxFnQDdaceY6teRLiH9kyqOylQZtwo0_wZYNgey1FHu9SP1VMWdmJLzdVtvR59l1SIA1ufDH8V31mvceHTcU1BsfAVEYcrL9CkjM0/s400/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.50.png" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEizF5E4Wljij6s6YG7ZDDsf53B0xUEK53_v33iGXopmSQOPhdhkOkwbD4bseNDRJjQ6f1JkCUk_JTCHw12ocfMgcMq0b4Du65CvSk8bzIrAc12kQC_ZVTyTsRlqjszBslB8Q8u1Ki8zZ3A/s1600/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.08.06.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEizF5E4Wljij6s6YG7ZDDsf53B0xUEK53_v33iGXopmSQOPhdhkOkwbD4bseNDRJjQ6f1JkCUk_JTCHw12ocfMgcMq0b4Du65CvSk8bzIrAc12kQC_ZVTyTsRlqjszBslB8Q8u1Ki8zZ3A/s400/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.08.06.png" /></a></div>
<br />
<div class="separator" style="clear: both; text-align: center;">
於樣式按右鍵可以出現樣式選單,請點選"修改"</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhP-cYvrGT3WHz77Rqc-sop_9Ok3cmWV0r5J0PHPMmJHltsN2Sh_NYjQkoI_uLouN1MIusKHmMqEKRVrbyClhRfT5XRt_DMHNzIrAfQk9bVR8hXB0k19o5UcysASsoIP8pW2KuJDUnN_34/s1600/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.02.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhP-cYvrGT3WHz77Rqc-sop_9Ok3cmWV0r5J0PHPMmJHltsN2Sh_NYjQkoI_uLouN1MIusKHmMqEKRVrbyClhRfT5XRt_DMHNzIrAfQk9bVR8hXB0k19o5UcysASsoIP8pW2KuJDUnN_34/s400/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.02.png" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
看到"自動更新"被打勾了吧?將他取消即可恢復正常</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiZAHJPJUxWtuo9EHXQSEoRqOzfck7cNXTs4gSVP06OGi_fyqUXDGoXqHH03VLcGScpVzUdnO5CGmi8Suy6pdeYxThSvHEPEAIKJuJgEOubyKqV_CLpsH5ugb2b6PclWBtm0Tx02XnvFhY/s1600/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.36.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiZAHJPJUxWtuo9EHXQSEoRqOzfck7cNXTs4gSVP06OGi_fyqUXDGoXqHH03VLcGScpVzUdnO5CGmi8Suy6pdeYxThSvHEPEAIKJuJgEOubyKqV_CLpsH5ugb2b6PclWBtm0Tx02XnvFhY/s400/%E8%9E%A2%E5%B9%95%E5%BF%AB%E7%85%A7+2013-06-24+%E4%B8%8A%E5%8D%882.07.36.png" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
同理,樣式"標題4,1"也有同樣問題,將"自動更新"取消吧</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-85387204255408894972011-10-11T03:36:00.000-07:002012-05-15T19:10:48.914-07:00研究人員怎麼用 iPadiPad很好用,可是不同人對於iPad會有不同的需求與用法<br />
所以我大概整理一下<br />
針對研究人員、學者<br />
該怎麼用你的iPad<br />
<br />
一、基本設定<br />
<br />
1.電腦安裝iTunes<br />
對於Apple 設備,iTunes是必備的<br />
請上Apple網站免費下載並安裝iTunes到你的電腦<br />
拿到你的iPad第一步就是將你的iPad與你的電腦連線<br />
作開啟的動作(新的iOS不用開啟)<br />
這樣才能開始使用<br />
<br />
2.Apple ID<br />
<a href="http://support.apple.com/kb/ht2731?viewlocale=zh_TW">設定你的iTunes Store帳號,也就是Apple ID</a><br />
這樣才能下載iTunes Store 上的App<br />
包括免費以及付費的App<br />
<br />
3.收發e-mail<br />
如果是中華電信,請參考此<a href="http://www.aniki520.com/ipad2file/hinet.html">教學</a><br />
如果是台大帳號,可以利用iPad上網<br />
開啟 <a href="http://iphone.cc.ntu.edu.tw/">http://iphone.cc.ntu.edu.tw</a> 網頁<br />
即可依照步驟自動設定。<br />
如果是Gmail帳號,請參考此<a href="http://steachs.com/archives/1910">教學</a><br />
<br />
4.通訊錄 行事曆 同步<br />
單一Google行事曆請參考此<a href="http://steachs.com/archives/1910">教學</a><br />
若有多個跟別人共享的Google行事曆<br />
需使用Exchange設定<br />
請參考此<a href="http://funiphone.pixnet.net/blog/post/28554995-%E3%80%90iphone%E5%8A%9F%E8%83%BD%E6%95%99%E5%AD%B8%E3%80%91iphone%E5%90%8C%E6%AD%A5%E5%A4%9A%E5%80%8Bgoogle%E8%A1%8C%E4%BA%8B%E6%9B%86%E6%95%99" target="_blank">教學</a><br />
<br />
在此強烈建議使用Gmail統整你所有email跟通訊錄<br />
Gmail可以去收你其他信箱的email,包括台大的信箱<br />
並有效過濾垃圾信<br />
且Gmail還跟通訊錄、行事曆結合<br />
讓你有效整理行動通訊<br />
行事曆更是可以利用共用功能<br />
讓您的秘書或助理幫你安排行程至google 行事曆<br />
你在外只要打開你的iPad或iPhone便可以知道任何新增行程<br />
相當方便<br />
<br />
<br />
二、必備App<br />
<br />
1.好用的筆記本 UPAD<br />
可以手寫,編輯<br />
一定要試試<br />
<a href="http://itunes.apple.com/tw/app/upad-lite/id409143694?mt=8">試用版</a><br />
<a href="http://itunes.apple.com/tw/app/upad/id401643317?mt=8">正式版</a><br />
<br />
2.Dropbox<br />
Dropxbox是目前雲端科技的先驅<br />
讓你電腦內的檔案隨時都能備份到雲端<br />
就連誤刪檔案都能救回<br />
相當好用<br />
iPad裝上DropBox App<br />
就能隨時利用iPad讀取你雲端上的檔案<br />
遇到一些臨時討論時相當好用<br />
或是利用共用資料夾<br />
請學生共享檔案給你<br />
讓你可以隨即利用DropBox打開檔案來看<br />
未來的雲端趨勢,就是如此,隨身碟已經慢慢被淘汰了<br />
請先申請 <a href="http://db.tt/G1xbKUh">DropBox</a><br />
並下載安裝其軟體<br />
便可以擁有免費雲端備份的便利<br />
<a href="http://itunes.apple.com/tw/app/dropbox/id327630330?mt=8">DropBox App 在此</a><br />
讓你iPad也可以存取你的檔案<br />
<br />
3.<a href="http://itunes.apple.com/tw/app/usb-disk-for-ipad/id385275533?mt=8">USB Disk</a><br />
iPad沒有檔案總管<br />
所以需要一個虛擬的隨身碟<br />
讓你可以利用他儲存email附件<br />
下載網頁pdf檔<br />
<br />
4.PDF Reader<br />
雖然UPAD 可以讀取pdf檔<br />
可是翻頁的手感卻沒那麼好<br />
所以需要一套reader來讓你利用iPad讀取電子書<br />
建議可以使用<br />
付費的 <a href="http://itunes.apple.com/tw/app/goodreader-for-ipad/id363448914?mt=8">good reader</a><br />
或是免費的 <a href="http://itunes.apple.com/tw/app/cloudreaders-pdf-cbz-cbr/id363484920?mt=8">cloud reader</a> 以及 <a href="http://itunes.apple.com/tw/app/sidebooks/id409777225?mt=8">Sidebooks</a><br />
<br />
其實iTunes上有很多免費的App讓你下載<br />
您可以試試任何免費的App<br />
不喜歡隨時都可以刪掉<br />
另外也有一些網站<br />
推薦<a href="http://www.facebook.com/ipad.ipod.iphone">iPhone4粉絲團</a><br />
隨時提供限時免費App的資訊<br />
有空時注意一下<br />
都可以賺到一些小便宜Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-11343148119256526472011-10-06T20:21:00.001-07:002011-11-02T04:40:30.597-07:00SDLab會議轉播<a href="http://ustre.am/DJ2I">http://ustre.am/DJ2I</a><br />
<br />
下次會議轉播時間為 11/23 上午10:00<br />
<br />
<iframe frameborder="0" height="400" scrolling="no" src="http://www.ustream.tv/embed/9467940" style="border: 0px none transparent;" width="480"></iframe>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-66516938923325278652011-09-18T21:21:00.000-07:002011-10-10T09:43:00.288-07:00利用skype進行多人網路簡報會議由於網路通訊的發達<br />
網路會議已經不再那麼複雜與困難<br />
現在利用Skype就可以做到<br />
不只像電影一樣,螢幕上有許多人一起視訊<br />
還可以一邊播放簡報<br />
一邊進行會議<br />
在普通的簡報會議中<br />
無法蒞臨會議的人<br />
也可以同時利用Skype<br />
加入簡報會議與討論<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhhBencbgHaZx1tJCJBGbkxvucZ-WeitaXzFKwX2qv52O5yBROUcVfdD3IpvbTml_uKDQcFTZUzHtOAMbMzKH9gB9PoHPvheQbikaUjgRyX88rIMZldwyZpPFJKxI6gDrQ-BU2Eg08P9H0/s1600/IMG_1286.JPG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="298" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhhBencbgHaZx1tJCJBGbkxvucZ-WeitaXzFKwX2qv52O5yBROUcVfdD3IpvbTml_uKDQcFTZUzHtOAMbMzKH9gB9PoHPvheQbikaUjgRyX88rIMZldwyZpPFJKxI6gDrQ-BU2Eg08P9H0/s400/IMG_1286.JPG" width="400" /></a></div>
<div style="text-align: center;">
利用網路簡報會議,就算人在遠方,也可以如同親臨現場開會</div>
<div style="text-align: center;">
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiTrYSxucePahtzts4xP02N_LSGeMb__ab-xQ_WGjeG59-i0Pn_FIFu7uxp0islB0zF7-U50RdVlXybBSzJadmnskjPAU-aUlBonhWjnJTaJl7TAibGRf1kGrUDNUCpGPAVI4wfscjay4w/s1600/IMG_1288.JPG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="298" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiTrYSxucePahtzts4xP02N_LSGeMb__ab-xQ_WGjeG59-i0Pn_FIFu7uxp0islB0zF7-U50RdVlXybBSzJadmnskjPAU-aUlBonhWjnJTaJl7TAibGRf1kGrUDNUCpGPAVI4wfscjay4w/s400/IMG_1288.JPG" width="400" /></a></div>
在會議的同時,進行網路簡報會議<br />
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<iframe allowfullscreen="" frameborder="0" height="315" src="http://www.youtube.com/embed/DdOg0BjT0gs" width="560"></iframe>
</div>
<br />
<br />
主要步驟如下:<br />
1.開啟多方通話<br />
按著Ctrl鍵不放,點選多位要進行會議的名單,然後按滑鼠右鍵<br />
便會出現選單,點選"開啟多方通話",便可開啟群組通話<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgTmGkeIPg54siPMJjvzGnAq34hbb7ilzgWO_Ypnkmp2NsoXF7oVXEoJnmpNClDzPG_irN20faEAx540LzHeb-_DF-V1nI5e2Ad8z8hbo4lu3Sq1DUUwu74lomB8kymDBetrczJPGIqkSQ/s1600/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-19+%25E4%25B8%258B%25E5%258D%25888.15.58.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="293" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgTmGkeIPg54siPMJjvzGnAq34hbb7ilzgWO_Ypnkmp2NsoXF7oVXEoJnmpNClDzPG_irN20faEAx540LzHeb-_DF-V1nI5e2Ad8z8hbo4lu3Sq1DUUwu74lomB8kymDBetrczJPGIqkSQ/s400/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-19+%25E4%25B8%258B%25E5%258D%25888.15.58.png" width="400" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
2.開啟"分享畫面"<br />
由主持會議的人(持有Mac電腦)於群組通話畫面點選"分享畫面",<br />
此時其他人便會看到主持人的視訊畫面變成了"桌面畫面"<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEggh3uN3Y4iqt4jk8m9zsBgGnHpdsKlKbFssy6djVsBm4XzuKiKUi35n1elZjHPXDx66nxCbrQ_SfU6TfhkP-nGjeZBKLpKteXjii3Slpm9dJ_2uHDN93aoF1EygHB4PZZ-49txMgAbzmA/s1600/Skype_win0.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="400" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEggh3uN3Y4iqt4jk8m9zsBgGnHpdsKlKbFssy6djVsBm4XzuKiKUi35n1elZjHPXDx66nxCbrQ_SfU6TfhkP-nGjeZBKLpKteXjii3Slpm9dJ_2uHDN93aoF1EygHB4PZZ-49txMgAbzmA/s400/Skype_win0.PNG" width="205" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
3.先點選該畫面,再最大化視窗,便可清楚見到主持人的桌面<br />
<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjMhokkIuEnlhzh3eUsA3tQaMKYye5wu68y9NyQQVKg0kIv_j2f95rMhYLcHSjc-joVDtw1abe-eiGlu-V6FxgMy9XAL859ujBlo_sUxrX8PUEMngj2P1XIv_wOdWN20srJoZ6p6Jx1CQI/s1600/Skype_win1.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="250" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjMhokkIuEnlhzh3eUsA3tQaMKYye5wu68y9NyQQVKg0kIv_j2f95rMhYLcHSjc-joVDtw1abe-eiGlu-V6FxgMy9XAL859ujBlo_sUxrX8PUEMngj2P1XIv_wOdWN20srJoZ6p6Jx1CQI/s400/Skype_win1.PNG" width="400" /></a></div>
<br />
<br />
4.將滑鼠移到分享桌面的右邊緣,可以再拖拉視窗至全螢幕<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj5B4c_np81-saU0Cr7JA8v57X5vh5HBdiQJyNJWmwTl0j14gyfdPLQEqZXrpTQ2VnB5H6OPBce-wVXAazLjLpx9a2lPoBAws88Tj4G1rkS5LDPO3sUzpgdt-SkbjRq_X_c1_cQj8H9xTI/s1600/Skype_win2.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="250" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj5B4c_np81-saU0Cr7JA8v57X5vh5HBdiQJyNJWmwTl0j14gyfdPLQEqZXrpTQ2VnB5H6OPBce-wVXAazLjLpx9a2lPoBAws88Tj4G1rkS5LDPO3sUzpgdt-SkbjRq_X_c1_cQj8H9xTI/s400/Skype_win2.PNG" width="400" /></a></div>
<br />
<br />
5.主持人將簡報開啟,並等待所有人就緒<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgJqr29UA-81tszgD38RSd87dr5d_OK0qbNDxFBa5rUiqYv2A-o1Ty0-F4VAsMCXqzsQylpzB4RdLrEBYqZqw9dCIrtNll0C8-xSYd7-WqyFE_JxxvcS6N0N0R53cPgSQVrYE7iURocR9g/s1600/Skype_win4.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="250" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgJqr29UA-81tszgD38RSd87dr5d_OK0qbNDxFBa5rUiqYv2A-o1Ty0-F4VAsMCXqzsQylpzB4RdLrEBYqZqw9dCIrtNll0C8-xSYd7-WqyFE_JxxvcS6N0N0R53cPgSQVrYE7iURocR9g/s400/Skype_win4.PNG" width="400" /></a></div>
<br />
<br />
6.當一切就緒,便可播放簡報,透過語音通話與分享畫面,就如同親臨現場開會<br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgiKyPtiVoiZgUTCOvL5XbruH1JM8AaKqQanQXmiqwKZD8P7XnOZYAUNBv3fPI-qTQttKxOpF8XOJrMOeDxxchaIIG-_f0YPToAu2gFRvKWhm-Zd3RTTdIimMB-4XX1gZkK1CD39RAXrNI/s1600/Skype_win3.PNG" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="250" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgiKyPtiVoiZgUTCOvL5XbruH1JM8AaKqQanQXmiqwKZD8P7XnOZYAUNBv3fPI-qTQttKxOpF8XOJrMOeDxxchaIIG-_f0YPToAu2gFRvKWhm-Zd3RTTdIimMB-4XX1gZkK1CD39RAXrNI/s400/Skype_win3.PNG" width="400" /></a></div>
<br />
為達成網路簡報會議,以下幾項是必備的<br />
1.一台Mac電腦,並購買<a href="http://www.skype.com/intl/zh-Hant/prices/premium/">Skype Premium</a>,一個群組會議只要有一個有購買即可<br />
2.每台電腦均具備麥克風與耳機(或Speaker)<br />
3.參加會議的電腦,至少要有下載 512kbps / 上傳 128kbps 的高速寬頻連線,以及配備 1 GHz 處理器的電腦<br />
<br />
為了增加會議之討論便利,主持會議地點建議有以下設備<br />
1. 有線網路,以增加網路頻寬,避免視訊討論lag<br />
2. 廣角會議電話,在較大之會議室,可增加擴音量以及收音效果(市價約NT$3500)<br />
(以下圖片取自於Yahoo購物中心<span class="Apple-style-span" style="font-family: arial, helvetica, clean, sans-serif; font-size: 16px; line-height: 19px;"><a href="http://buy.yahoo.com.tw/gdsale/gdsale.asp?gdid=2922182&act=gdsearch#">PeriPower 即時通廣角會議電話</a>)</span><br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjN58GlI_cCcb4R0QEhsbtftOqr0mAiMmXldUhcuRT4mXKkLVK_Hrnn6FlHK39OipKRBhaFkZsaszVRw7r3INpZszMsIobTPKsCQXpjmKIztG7SgR4DYTS6s0ubK52Ypgm52cDIjz8jVrg/s1600/st-2922182-s400.jpeg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="400" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjN58GlI_cCcb4R0QEhsbtftOqr0mAiMmXldUhcuRT4mXKkLVK_Hrnn6FlHK39OipKRBhaFkZsaszVRw7r3INpZszMsIobTPKsCQXpjmKIztG7SgR4DYTS6s0ubK52Ypgm52cDIjz8jVrg/s400/st-2922182-s400.jpeg" width="400" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgmdzWx1exUdeW7qJAO9dHs7fKripyIG0aiUIm6b60Wk9oMZIMjsSTqbJUFE6oGoBwpKkdGZfy23QkCXm42Ph-pP1IODZtBBK1wbnF9hcSgDC72ydoafbdlAMQZ3FptHg6AySohOGxO_S8/s1600/st-2922182-1.jpeg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="353" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgmdzWx1exUdeW7qJAO9dHs7fKripyIG0aiUIm6b60Wk9oMZIMjsSTqbJUFE6oGoBwpKkdGZfy23QkCXm42Ph-pP1IODZtBBK1wbnF9hcSgDC72ydoafbdlAMQZ3FptHg6AySohOGxO_S8/s400/st-2922182-1.jpeg" width="400" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<br />
<br />
目前1對1的"分享畫面"功能是免費且不限定只有Mac電腦才有<br />
建議大家可以找個人試試看此功能<br />
以了解如何操作與環境之設定<br />
<br />Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-68623775068875047122011-09-15T06:54:00.000-07:002013-05-17T00:20:08.789-07:00永續發展研究室成員網頁資料填寫<iframe src="https://docs.google.com/spreadsheet/embeddedform?formkey=dFlCZFNxS2ZwU3dseHZUbE9wYjg1S2c6MQ" width="520" height="3900" frameborder="0" marginheight="0" marginwidth="0">載入中...</iframe>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-71663777589549353422011-09-08T22:56:00.000-07:002011-09-08T22:56:19.856-07:00永續發展研究室FTP帳號申請表單<iframe src="https://docs.google.com/spreadsheet/embeddedform?formkey=dHJsYUsxT195bDNJY2hFZk95S2FROVE6MQ" width="500" height="639" frameborder="0" marginheight="0" marginwidth="0">載入中...</iframe>Unknownnoreply@blogger.com1tag:blogger.com,1999:blog-5870797380183241020.post-64292378427746914192011-09-01T23:49:00.000-07:002011-09-15T23:54:36.113-07:00使用免費的 Ftp Client 軟體 Filezilla登入研究室FTP由於FTP Server一般對於中文字都有固定的編碼<br />
所以如果使用IE 或是檔案總管<br />
便有可能遇到檔案變成亂碼的情形<br />
所以強烈建議使用ftp client 軟體登入FTP<br />
建議使用免費的FileZilla<br />
請用google 搜尋 FileZilla<br />
或直接到 <a href="http://filezilla-project.org/download.php">http://filezilla-project.org/download.php</a> 下載<br />
安裝後<br />
請點選左上角的站台管理員<br />
點選"新增站台"來建立要登入的ftp<br />
在"主機"那欄填寫ip,以本研究室為例,請填140.112.76.49或sdl.ae.ntu.edu.tw<br />
登入形式選"一般"<br />
再依照我們提供的帳號跟密碼填入"使用者"以及"密碼"欄位即可<br />
<br />
最後確定"字碼集"<br />
以本研究室ftp為例,採用Unicode編碼<br />
雖然選"自動偵測"即可<br />
但還是<span class="Apple-style-span" style="color: #cc0000;"><b>建議設定為"強制使用UTF-8"</b></span><br />
因為當FileZilla偵測到目錄裡有亂碼檔案時<br />
會自動取消UTF-8編碼<br />
如此會造成使用者無法下載中文檔案的問題出現<br />
<br />
ps.之前使用BIG5編碼會造成亂碼,請大家更改成以上說明即可<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div style="text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi81GDeZtd8RUA8rASh3U7hVo2otKtPDW0d02Uo_4swQDrzQ3F1xpbJdPSC3INXgHIr7sWWRaArI-RAro5BtemKHSNVzP7aBux4uDx0QYu-_y0UFF-9A8xxshzXr81akDw1az3NhaUy9Q8/s1600/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-09+%25E4%25B8%258B%25E5%258D%25882.13.36.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="276" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEi81GDeZtd8RUA8rASh3U7hVo2otKtPDW0d02Uo_4swQDrzQ3F1xpbJdPSC3INXgHIr7sWWRaArI-RAro5BtemKHSNVzP7aBux4uDx0QYu-_y0UFF-9A8xxshzXr81akDw1az3NhaUy9Q8/s400/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-09+%25E4%25B8%258B%25E5%258D%25882.13.36.png" width="400" /></a></div>
<div style="text-align: center;">
FileZilla站台設定</div>
<br />
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg2F9dz4z3y2NlUYvQ9wbftOatfjSFxKO9QSEJC-B7BczpcYalScda_FczyFMQoWGAWduHkd0H9UJ-wo_pZn_taEGWcGauzQ6jWSFEz2YRQ9DTZ3m9EDziSySrVaflMXkfx9YQf0vjI0b4/s1600/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-16+%25E4%25B8%258B%25E5%258D%258812.53.49.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="278" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg2F9dz4z3y2NlUYvQ9wbftOatfjSFxKO9QSEJC-B7BczpcYalScda_FczyFMQoWGAWduHkd0H9UJ-wo_pZn_taEGWcGauzQ6jWSFEz2YRQ9DTZ3m9EDziSySrVaflMXkfx9YQf0vjI0b4/s400/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-16+%25E4%25B8%258B%25E5%258D%258812.53.49.png" width="400" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
FileZilla站台設定中設定字碼集為強制使用UTF-8</div>
<div class="separator" style="clear: both; text-align: center;">
<br /></div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiUHEYOhFUggG9K7TgOai8-ELe6UqgyIt_Ft_FCQaCFxGKugSJxK0GXwrWNmSlIXWXddtIs9X9bPv8s3eXXUW0Z5VVkBZ-y4r4YTUpchO4POJYx7VFGO7yLDYkA1mCT3nadgLx82DfnQ-M/s1600/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-16+%25E4%25B8%258A%25E5%258D%258811.24.45.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="81" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiUHEYOhFUggG9K7TgOai8-ELe6UqgyIt_Ft_FCQaCFxGKugSJxK0GXwrWNmSlIXWXddtIs9X9bPv8s3eXXUW0Z5VVkBZ-y4r4YTUpchO4POJYx7VFGO7yLDYkA1mCT3nadgLx82DfnQ-M/s400/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-16+%25E4%25B8%258A%25E5%258D%258811.24.45.png" width="400" /></a></div>
<div class="separator" style="clear: both; text-align: center;">
如果字碼集使用自動偵測,當目錄有亂碼時,會自動取消UTF-8編碼</div>
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg2F9dz4z3y2NlUYvQ9wbftOatfjSFxKO9QSEJC-B7BczpcYalScda_FczyFMQoWGAWduHkd0H9UJ-wo_pZn_taEGWcGauzQ6jWSFEz2YRQ9DTZ3m9EDziSySrVaflMXkfx9YQf0vjI0b4/s1600/%25E8%259E%25A2%25E5%25B9%2595%25E5%25BF%25AB%25E7%2585%25A7+2011-09-16+%25E4%25B8%258B%25E5%258D%258812.53.49.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><br />
<br />Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-83227277419135537152011-07-04T01:09:00.000-07:002011-07-04T01:33:57.625-07:00如何利用VB6呼叫VENSIM模式?<div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">如何利用<span lang="EN-US">VB6</span><span lang="EN-US">呼叫VENSIM</span>模式?</span><br />
<blockquote><span class="Apple-style-span" style="font-family: Verdana, sans-serif; font-size: 16px;">劉子明</span></blockquote></div><div align="center" class="MsoNormal" style="text-align: center;"><blockquote><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">台灣大學生物環境系統工程學系</span></blockquote></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-size: 16px;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">博士</span></span><br />
<div style="text-align: left;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><br />
</span></div><div style="text-align: left;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">如有引用,請寫出處:<i><span class="Apple-style-span" style="color: #073763;">劉子明,<span style="font-size: 12pt;">「如何利用</span><span lang="EN-US" style="font-size: 12pt;">VB6</span><span style="font-size: 12pt;">呼叫</span><span lang="EN-US" style="font-size: 12pt;">VENSIM</span><span style="font-size: 12pt;">模式?</span><span style="font-size: 12pt;">」,http://ntusdlab.blogspot.com/2011/07/vb6vensim.html</span></span></i></span></div></div><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><br />
</span><br />
<span class="Apple-style-span" style="font-family: Verdana, sans-serif;">本說明必須搭配我的範例,請下載我寫的<a href="http://www.box.net/shared/v9xvmb9iraei4tg775vm">範例檔</a></span><br />
<br />
<div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">範例內的<span lang="EN-US">Vensim</span>模式乃依據<span lang="EN-US">GWLF</span>集水區流量模式的理論,我利用<span lang="EN-US">Vensim</span>寫出來的,在此稱之為<span lang="EN-US">GWLF_ven</span>。不過,模式內的<span lang="EN-US">CN</span>值仍無法考慮臨前降雨的影響,所以,該模式僅供參考。寫這個模式的重點在於展示如何利用<span lang="EN-US">VB</span>去<span lang="EN-US">Call Vensim</span>的模式,因此我才會寫一個簡單的模式來做<span lang="EN-US">Demo</span>。<span lang="EN-US"><o:p></o:p></span></span></div><div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US">Vensim</span>雖然提供了簡單易操作的介面,讓使用者能夠利用<span lang="EN-US">Vensim</span>去進行系統動力學的相關研究與模擬,但卻有點將使用者受限於只能利用<span lang="EN-US">Vensim</span>所提供的功能進行分析與繪圖。雖然可以針對每個變數輸出,但是輸出的格式實在不好用,雖然能繪圖,但是繪圖標示的功能根本沒有。使用者難免都需要匯出結果之變數資料,再進一步利用其他軟體,如<span lang="EN-US">Excel</span>進行分析與繪圖,因此顯得<span lang="EN-US">Vensim</span>似乎綁手綁腳的。其實,<span lang="EN-US">Vensim</span>背後有許多的技巧與方法,可以讓<span lang="EN-US">Vensim</span>方便又好用,只是你必須花一些時間去摸索,才能漸漸了解那些好用的技巧。<span lang="EN-US"><o:p></o:p></span></span></div><div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US">Vensim</span>模式可以讓許多種程式語言呼叫,如<span lang="EN-US">VB</span>、<span lang="EN-US">Excel VBA</span>、<span lang="EN-US">C</span>、<span lang="EN-US">Java</span>、<span lang="EN-US">Delphi</span>等,本例主要便是藉由<span lang="EN-US">VB</span>程式,去<span lang="EN-US">Call</span>我已經寫好的<span lang="EN-US">GWLF_ven</span>模式,除了改變模式內原本的一些<span lang="EN-US">Constant</span>參數,也可以將原本是<span lang="EN-US">ASCII</span>格式的輸入檔<span lang="EN-US">(*.dat)</span>轉成<span lang="EN-US">Vensim</span>需要的格式<span lang="EN-US">(vdf)</span>,並讓<span lang="EN-US">Vensim</span>去模擬。進而取出任何想要知道的變數結果,由<span lang="EN-US">VB</span>程式進一步分析。<span lang="EN-US"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">程式的表單配置如下:<span lang="EN-US"><o:p></o:p></span></span></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhjOpuBLZXDEGiDla-aozsjhma7biHT6TNguaitvZU5T5w7d6r6d_kRmQetqbKu703rQb9RtDXh_q6tM6czao_5JKTWyxsQHx67Z-Tdjh_5BicsX5ll4vJZ5rWtb3WyGdU6pXDrf4qy2ck/s1600/pic1.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="118" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhjOpuBLZXDEGiDla-aozsjhma7biHT6TNguaitvZU5T5w7d6r6d_kRmQetqbKu703rQb9RtDXh_q6tM6czao_5JKTWyxsQHx67Z-Tdjh_5BicsX5ll4vJZ5rWtb3WyGdU6pXDrf4qy2ck/s320/pic1.png" width="320" /></a></div><div class="MsoNormal"><span lang="EN-US"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><o:p></o:p></span></span></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">圖一、<span lang="EN-US">VB</span>表單配置圖<span lang="EN-US"><o:p></o:p></span></span></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><br />
</span></div><div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US">GWLF_ven</span>的內容如圖二、圖三所示。其中的<span lang="EN-US">CN2</span>便是集水區<span lang="EN-US">CN</span>值,<span lang="EN-US">Area</span>便是集水區面積,<span lang="EN-US">r</span>為退水係數。在<span lang="EN-US">Vensim</span>中,這三個變數都是給定<span lang="EN-US">Constant</span>值。而需要外部輸入<span lang="EN-US">Data</span>的變數只有氣溫<span lang="EN-US">T</span>跟日降雨量<span lang="EN-US">Rt</span>。本案例便是展示如何利用<span lang="EN-US">VB</span>改變集水區面積<span lang="EN-US">Area</span>、<span lang="EN-US">CN</span>值以及退水係數<span lang="EN-US">r</span>值進去<span lang="EN-US">GWLF_ven</span>模式,並將原本需要的輸入檔-溫度<span lang="EN-US">T</span>以及降雨量<span lang="EN-US">Rt</span>,由<span lang="EN-US">VB</span>將<span lang="EN-US">Dat</span>檔轉換成<span lang="EN-US">Vdf</span>檔,並進一步帶入<span lang="EN-US">GWLF_ven</span>模擬。<span lang="EN-US"><o:p></o:p></span></span></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhJcBWSo9KCtIP1GChQNexRV2Ty6RuZKxKTc9jEkouyJwX_kH9fZpzYHS6dRJHSehyoRYTrtj_wPdMTvTIogsUb0BIKnl39Ht_fpnq0Uwzu255IS-psYmNnYe2BlFtg7v2CJI1_xv0kNNs/s1600/pic2.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="305" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhJcBWSo9KCtIP1GChQNexRV2Ty6RuZKxKTc9jEkouyJwX_kH9fZpzYHS6dRJHSehyoRYTrtj_wPdMTvTIogsUb0BIKnl39Ht_fpnq0Uwzu255IS-psYmNnYe2BlFtg7v2CJI1_xv0kNNs/s320/pic2.png" width="320" /></a></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">圖二、<span lang="EN-US">GWLF_ven</span>的地表模組<span lang="EN-US"><o:p></o:p></span></span></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><br />
</span></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiWg3KtP85plf5ysnvzB9-V2QYsujmdQfWdMuWAWt52TIjojjGa7sYHLmO4HyTbkI80vh0cf3IwA8Wo-Y-3QQMfXo07p2Ankr6ag7G00d3XTjj8cjLbaH-lTj82Btve7zzMj5Bxmqnitl8/s1600/pic3.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="306" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiWg3KtP85plf5ysnvzB9-V2QYsujmdQfWdMuWAWt52TIjojjGa7sYHLmO4HyTbkI80vh0cf3IwA8Wo-Y-3QQMfXo07p2Ankr6ag7G00d3XTjj8cjLbaH-lTj82Btve7zzMj5Bxmqnitl8/s320/pic3.png" width="320" /></a></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">圖三、<span lang="EN-US">GWLF_ven</span>的地層模組<span lang="EN-US"><o:p></o:p></span></span></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><br />
</span></div><div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">利用<span lang="EN-US">VB</span>去<span lang="EN-US">Call Vensim</span>模式之前,必須先將該模式打包,也就是利用功能表的<span lang="EN-US">File</span><span lang="EN-US">à</span><span lang="EN-US">Publish</span>,將模式打包,如圖四。本案例之模式檔為<span lang="EN-US">GWLF.mdl</span>,經過打包之後,會產生<span lang="EN-US">GWLF.vpm</span>檔。而<span lang="EN-US">VB</span>要呼叫的便是<span lang="EN-US">GWLF.vpm</span>。<span lang="EN-US"><o:p></o:p></span></span></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgG79T0ZzO23q9iXpm5_LOPRrSx5QVfByICFtD6RGLDCHvzBXAYwp2MVIdwJlbCkyv3RFrnH-yST4TQTSHeMn_Ro7lDvRBzn6NHeo6L0JBNKRkAyi9l-YNeStHGmOS1FkyC-fFoGRXyhcY/s1600/pic4.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="306" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgG79T0ZzO23q9iXpm5_LOPRrSx5QVfByICFtD6RGLDCHvzBXAYwp2MVIdwJlbCkyv3RFrnH-yST4TQTSHeMn_Ro7lDvRBzn6NHeo6L0JBNKRkAyi9l-YNeStHGmOS1FkyC-fFoGRXyhcY/s320/pic4.png" width="320" /></a></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">圖四、以功能表下的<span lang="EN-US">Publish</span>將模式打包成可供其他程式呼叫的<span lang="EN-US">vpm</span>檔。<span lang="EN-US"><o:p></o:p></span></span></div><div class="MsoNormal"><br />
</div><div class="MsoNormal" style="text-indent: 24.0pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">以下便是主要程式內容。一開始必須對<span lang="EN-US">Vensim</span>的<span lang="EN-US">DLL</span>檔宣告,你可以直接<span lang="EN-US">copy</span>所有宣告貼上,建議你不要去更動該宣告,除非你對所有的<span lang="EN-US">dll</span>檔都很了解。程式內容都在附件當中,你可以依照內容,適當的應用在你自己的模式,並做變化。<span lang="EN-US"><o:p></o:p></span></span></div><div class="MsoNormal"><br />
</div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_be_quiet Lib "vendll32.dll" (ByVal quietflag As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_check_status Lib "vendll32.dll" () As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_command Lib "vendll32.dll" (ByVal Vcommand$) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_continue_simulation Lib "vendll32.dll" (ByVal number_time_step As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_finish_simulation Lib "vendll32.dll" () As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_data Lib "vendll32.dll" (ByVal filename$, ByVal varname$, ByVal timename$, varvals As Single, timevals As Single, ByVal maxpoints As Integer) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_dpval Lib "vendll32.dll" (ByVal varname$, varval As Double) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_dpvecvals Lib "vendll32.dll" (vecoff As Long, varvals As Double, ByVal veclen As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_info Lib "vendll32.dll" (ByVal infowanted As Long, ByVal buf$, ByVal maxbuflen As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_sens_at_time Lib "vendll32.dll" (ByVal filename$, ByVal varname$, ByVal timename$, attime As Single, vals As Single, ByVal maxpoint As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_substring Lib "vendll32.dll" (ByVal fullstring$, ByVal frompos As Long, ByVal buf$, ByVal maxbuflen As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_val Lib "vendll32.dll" (ByVal varname$, varval As Single) As Integer<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_varattrib Lib "vendll32.dll" (ByVal varname$, ByVal attrib As Long, ByVal buf$, ByVal maxbuflen As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_varnames Lib "vendll32.dll" (ByVal filter$, ByVal vartype As Long, ByVal buf$, ByVal maxbuflen As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_varoff Lib "vendll32.dll" (ByVal varname$) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_get_vecvals Lib "vendll32.dll" (vecoff As Long, varvals As Single, ByVal nelm As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_set_parent_window Lib "vendll32.dll" (ByVal vwidnow As Long, ByVal r1 As Long, ByVal r2 As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_show_sketch Lib "vendll32.dll" (ByVal viewnum As Long, ByVal wantscroll As Long, ByVal zoompercent As Long, ByVal Vwindow As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_start_simulation Lib "vendll32.dll" (ByVal loadfirst As Integer, ByVal game As Long, ByVal overwrite As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Declare Function vensim_tool_command Lib "vendll32.dll" (ByVal Vcommand$, ByVal Vwindow As Long, ByVal iswip As Long) As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">以上的宣告請不要改更動</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">任何</span><span lang="EN-US" style="color: green; font-size: 9pt;">Vensim</span><span style="color: green; font-size: 9pt;">的模式都必須經過</span><span lang="EN-US" style="color: green; font-size: 9pt;">"Publish"</span><span style="color: green; font-size: 9pt;">才能產生</span><span lang="EN-US" style="color: green; font-size: 9pt;">VB</span><span style="color: green; font-size: 9pt;">可以</span><span lang="EN-US" style="color: green; font-size: 9pt;">call</span><span style="color: green; font-size: 9pt;">的</span><span lang="EN-US" style="color: green; font-size: 9pt;">vpm</span><span style="color: green; font-size: 9pt;">檔</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">本例乃利用</span><span lang="EN-US" style="color: green; font-size: 9pt;">VB</span><span style="color: green; font-size: 9pt;">使用</span><span lang="EN-US" style="color: green; font-size: 9pt;">Vensim</span><span style="color: green; font-size: 9pt;">所提供的</span><span lang="EN-US" style="color: green; font-size: 9pt;">DLL</span><span style="color: green; font-size: 9pt;">去進行變數修改以及模擬</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">案例的模式為自行撰寫的</span><span lang="EN-US" style="color: green; font-size: 9pt;">GWLF</span><span style="color: green; font-size: 9pt;">集水區流量模式</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">僅供測試使用</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">欲了解可以使用的變數以及語法</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">請上</span><span lang="EN-US" style="color: green; font-size: 9pt;">Vensim</span><span style="color: green; font-size: 9pt;">的網站下載</span><span lang="EN-US" style="color: green; font-size: 9pt;">Vensim DSS Reference Supplement<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">有任何疑問與建議</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">歡迎跟我聯繫</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">台灣大學生物環境系統工程學系博士生</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">劉子明</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: green; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">'<st1:personname w:st="on">tedliu13@gmail.com</st1:personname><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim infl, fl, outfl, flvds As String<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim result, ms, ss, ts, vs, i As Integer<o:p></o:p></span></span></div><div class="MsoNormal"><br />
</div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Private Sub Command1_Click()<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'Vensim</span><span style="color: green; font-size: 9pt;">要用的變數最好分行宣告</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim Rval(3660) As Single<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim Tval(3660) As Single<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim maxpoints As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim tpoints As Long<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim area, r, CN As Single<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim ave(2, 12) As Single<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim n, yr1, yr2, chk, TotalDay As Integer<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Dim vvr(2), VVAR As String<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Open "CMD.dat" For Output As #1<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Open "CMS.dat" For Output As #2<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">輸出變數</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">vvr(1) = "CMD"<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">vvr(2) = "CMS"<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If infl = "" Then<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">MsgBox "</span><span style="color: #003366; font-size: 9pt;">請先選擇輸入檔</span><span lang="EN-US" style="color: #003366; font-size: 9pt;">"<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Exit Sub<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End If<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">計算模擬時間</span><span lang="EN-US" style="color: green; font-size: 9pt;"> TotalDay<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">yr1 = Val(Text3.Text)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">yr2 = Val(Text4.Text)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">TotalDay = 0<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For yr = yr1 To yr2<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">chk = yr Mod 4<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If chk = 0 Then<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 366<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Else<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 365<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End If<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">TotalDay = TotalDay + days<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next yr<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">輸入變數</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">area = Val(Text2.Text)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">CN = Val(Text5.Text)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">r = Val(Text6.Text)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">將輸入檔</span><span lang="EN-US" style="color: green; font-size: 9pt;">(dat) </span><span style="color: green; font-size: 9pt;">轉換成</span><span lang="EN-US" style="color: green; font-size: 9pt;">vensim</span><span style="color: green; font-size: 9pt;">的格式</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command("MENU>DAT2VDF|" & infl)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">infl = Replace(infl, "dat", "vdf")<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">開啟模式</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">fl = App.Path & "\GWLF.vpm" 'Vensim</span><span style="color: #003366; font-size: 9pt;">模式</span><span lang="EN-US" style="color: #003366; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command("SPECIAL>LOADMODEL|" & fl)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If result = 0 Then Exit Sub<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">加入</span><span lang="EN-US" style="color: green; font-size: 9pt;">input </span><span style="color: green; font-size: 9pt;">檔</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command("SIMULATE>ADDDATA|" & infl)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If result = 0 Then Exit Sub<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'run name </span><span style="color: green; font-size: 9pt;">為</span><span lang="EN-US" style="color: green; font-size: 9pt;">CMD<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command("SIMULATE>RUNNAME|CMD")<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If result = 0 Then Exit Sub<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">改變模式內變數值</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">comstr$ = "SIMULATE>SETVAL|INITIAL TIME = 1"</span><span lang="EN-US" style="color: green; font-size: 9pt;"> '</span><span style="color: green; font-size: 9pt;">起始時間</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command(comstr$)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">comstr$ = "SIMULATE>SETVAL|FINAL TIME = " + CStr(TotalDay) </span><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">結束時間</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command(comstr$)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">comstr$ = "SIMULATE>SETVAL|Area = " + CStr(area)</span><span lang="EN-US" style="color: green; font-size: 9pt;"> '</span><span style="color: green; font-size: 9pt;">集水區面積</span><span lang="EN-US" style="color: #003366; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command(comstr$)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">comstr$ = "SIMULATE>SETVAL|CN2 = " + CStr(CN)</span><span lang="EN-US" style="color: green; font-size: 9pt;"> 'CN</span><span style="color: green; font-size: 9pt;">值</span><span lang="EN-US" style="color: #003366; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command(comstr$)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">comstr$ = "SIMULATE>SETVAL|r = " + CStr(r)</span><span lang="EN-US" style="color: green; font-size: 9pt;"> '</span><span style="color: green; font-size: 9pt;">退水係數</span><span lang="EN-US" style="color: #003366; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command(comstr$)<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">開始模擬並輸出結果</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">result = vensim_command("MENU>RUN")<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If result = 0 Then Exit Sub<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">讀取結果</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For i = 1 To 2<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">VVAR = vvr(i)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">maxpoints = TotalDay<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">tpoints = vensim_get_data("CMD.vdf", VVAR, "Time", Rval(1), Tval(1), maxpoints)</span><span lang="EN-US" style="color: green; font-size: 9pt;"> '</span><span style="color: green; font-size: 9pt;">讀取變數至</span><span lang="EN-US" style="color: green; font-size: 9pt;">Rval(1)</span><span lang="EN-US" style="color: #003366; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">'</span><span style="color: green; font-size: 9pt;">利用迴圈讀取結果</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">n = 0<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For j = yr1 To yr2<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For m = 1 To 12<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If m = 2 Then<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">If j Mod 4 = 0 Then<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 29<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Else<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 28<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End If<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">ElseIf m = 4 Or m = 6 Or m = 9 Or m = 11 Then<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 30<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Else<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">days = 31<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End If<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For d = 1 To days<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">n = n + 1<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Print #i, n, Rval(n)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">ave(i, m) = ave(i, m) + Rval(n) / days<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next d<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next m<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next j<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Close (i)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next i<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: green; font-size: 9pt;">‘</span><span style="color: green; font-size: 9pt;">將月平均流量繪成折線圖</span><span lang="EN-US" style="color: green; font-size: 9pt;"><o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">For m = 1 To 12<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">ave(2, m) = ave(2, m) / (yr2 - yr1 + 1)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">With MSChart1<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">.Row = m<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">.RowLabel = CStr(m)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">.Data = ave(2, m)<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End With<o:p></o:p></span></span></div><div class="MsoNormal"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">Next m<o:p></o:p></span></span></div><div class="MsoNormal"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;"><span lang="EN-US" style="color: #003366; font-size: 9pt;">MsgBox "</span><span style="color: #003366; font-size: 9pt;">完成</span><span lang="EN-US" style="color: #003366; font-size: 9pt;">!!~"<o:p></o:p></span></span></div><div class="MsoNormal" style="text-align: justify; text-justify: inter-ideograph;"><span lang="EN-US" style="color: #003366; font-size: 9pt;"><span class="Apple-style-span" style="font-family: Verdana, sans-serif;">End Sub<o:p></o:p></span></span></div><div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjIWuo_EH2x-0Q7MguuVChsUG6vnZjozCCbak_jE8O1ulALASQBysUNNrGmq6BynL7WlnKhMDTypODZP5jkyx2ZGWQPXehu3YHT6jZ2DqOHSNIAnnBAXBrL-R8niSiZVbpCu6ty2as6ZEk/s1600/pic5.png" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="118" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjIWuo_EH2x-0Q7MguuVChsUG6vnZjozCCbak_jE8O1ulALASQBysUNNrGmq6BynL7WlnKhMDTypODZP5jkyx2ZGWQPXehu3YHT6jZ2DqOHSNIAnnBAXBrL-R8niSiZVbpCu6ty2as6ZEk/s320/pic5.png" width="320" /></a></div><div align="center" class="MsoNormal" style="text-align: center;"><span class="Apple-style-span" style="color: #003366; font-family: Verdana, sans-serif;"><span class="Apple-style-span" style="font-size: 12px;"><br />
</span></span></div>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-72624450139768431742011-06-28T08:22:00.000-07:002011-06-28T08:31:07.705-07:00參加成大『極端氣候下複合性災害防治研討會』心得此研討會乃游保衫、鄭克聲、李光敦以及張良正教授之國科會計畫之第一年成果發表會<br />
此計畫共四個子計畫,主要以曾文水庫為研究區域,從上游水庫至下游河道在極端氣候影響下之相關問題探討。<br />
游老師的計畫乃針對現有『最大可能降水』-PMP之計算提出修正看法,其認為傳統之颱風移位法並不足以推估南部地區之PMP,應該考慮西南氣流共伴之效應。<br />
我個人最近也在思考傳統計算PMP方式,是否應該加入氣候變遷的影響才算合理,因為PMP的計算目的是推估"未來"可能面臨之最大降雨量,然而傳統計算乃是以"過去"的資料,以統計的方式推估,面對氣候變遷影響下,過去統計特性會因氣候變遷而改變的情況下,傳統的推估方式實際上完全忽略了氣候變遷的影響。不只是PMP,所有水文統計與頻率分析,其實都有以上之問題,只是此問題並非利用簡易降尺度就能分析的,必須透過統計降尺度才能推估,游老師也認同此點。<br />
<br />
鄭老師的計畫著手方向,乃以劉紹臣教授所發表的極端降雨跟全球均溫上升量有關之想法,試圖建立全球均溫改變量與極端降雨之關係,以分析未來可能之極端降與變化程度。我認為這是一個可行的方向,而這應該是國內對於極端降雨之統計降尺度方法的解決之道。<br />
<br />
李光敦老師則是針對極端降雨所造成集水區之泥沙沖刷,匯流至河道後,再以數值方法進行異重流之二維數值演算,以計算極端降雨所造成之河道泥沙量,並由異重流數值模擬結果,提供下游渾水排沙的時機,其模擬結果並提供給張良正老師,進行水庫操作最佳化演算。降雨所造成泥沙沖刷量,由經驗公式推估,由驗證結果,個人認為相當不錯,應可進一步探討。雖然沒有考慮坍方量,但結果已經相當不錯。<br />
<br />
張良正老師的計畫則在建立極端降雨下水庫操作之最佳化模式,其目標函數為最小的水庫操作前後差異水位加上最大的下游河道溢提量,也就是說,此最佳化模式是允許下游溢提淹水的,只是希望溢堤量是最小的,此部份應該可以進一步探討,相信目標函數之設定會造成結果之不同。整個模式是連接上游水文模式,水庫防洪操作以及下游河道演算,由於下游河道演算多以HEC-RAS進行模擬,然而視窗化模式必須人工操作,無法嵌入模式演算法,因此張老師利用遺傳演算法取代HEC-RAS,以利於整個演算進行。<br />
<br />
此整合計畫為三年計畫,且每年都會有成果發表,建議大家有興趣者,可以期待明年之成果發表內容。<br />
<br />
劉子明 2010.6.28Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-5870797380183241020.post-18614457824943393452011-06-26T23:23:00.000-07:002011-06-26T23:55:36.305-07:00如何新增個人行事曆到SDLab為了方便資訊傳遞,<br />
請大家請假時直接上google calender登記你的請假日期與原因<br />
在填寫時間與原因之後<br />
請記得選擇"日曆"為"sdl lab"<br />
如此才會新增至研究室的行事曆<br />
<div class="separator" style="clear: both; text-align: center;"><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgeUO3QAwO4OTOoocKvtiA7RANxClF0JFioWqMBzbdvxm0_dRg27TmrU_Pezqd91avpqGcSpJMRPWdJERh07qYOacd5bDBsFRn48AznOLAShjBEt56G-vJL4Ju5dMwLRXthMjTvCt2azIU/s1600/A2.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><img border="0" height="266" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgeUO3QAwO4OTOoocKvtiA7RANxClF0JFioWqMBzbdvxm0_dRg27TmrU_Pezqd91avpqGcSpJMRPWdJERh07qYOacd5bDBsFRn48AznOLAShjBEt56G-vJL4Ju5dMwLRXthMjTvCt2azIU/s400/A2.png" width="400" /></a></div>Unknownnoreply@blogger.com0