譚惟心資料庫管理

發表文章

目前顯示的是 11月, 2020的文章

第十二周譚惟心教你金融市場

11月 22, 2020

躉繳第1期第2期第3期注意，包含首期躉繳的現金流量都大於0。輸出: 報酬率: 淨現值: 迴圈次數: 譚惟心向譚惟心學習的程式碼 <head> <style> .pmt { width: 60pt; height: 20pt; background-color: coral; color: white; text-align: right;} </style> </head> <body> <table border="1"> <tr align="center"><td>躉繳</td><td>第1期</td><td>第2期</td><td>第3期</td></tr> <tr><td><input class="pmt" type="number" /></td> <td><input class="pmt" type="number" /></td> <td><input class="pmt" type="number" /></td> <td><input class="pmt" type="number" /></td></tr> </table><br /> 注意，包含首期躉繳的現金流量都大於0。 <p><input onclick="IRR()" type="button" value="計算內部報酬率" />輸出:</p> <!-- 按下 button 去執行 JavaScri

閱讀完整內容

第七周上課內容

11月 15, 2020

第七週 2020/10/19 網頁 VBA 輸入金額: textbox 輸入金額:<input id="a" type="text" /> VBA VBA <input id="b" type="button" value="點擊" onclick="alert('你是豬頭!')"/> VBA 豬狗貓 VBA 豬<input type="radio">狗<input type="radio">貓<input type="radio" > VBA 豬狗貓 VBA 豬<input type="radio" name="pet">狗<input type="radio" name="pet">貓<input type="radio" name="pet"> VBA 豬狗貓 def EXCEL VBA Private Sub CommandButton1_Click() '註解click事件,在網頁onclick Dim addnew As Range '定義變數 addnew 是工作表的一個範圍 If Range("A1").CurrentRegion.Rows.Count = 1 Then Set addnew = Sheets("DataTable").Range("A1").Offset(1, 0) Else Set addnew = Sheets("DataTable").Range("A1").End(xlDown).Offset(1, 0)