發表文章

目前顯示的是 2020的文章

葉又瑄17+18週期末考

劉任昌2021年1月期末考 現值 利率 期數 金流 終值

第十六週將word+excel貼上網頁

  利率 12% 月利率 0.001 每月還款兩萬 貸款多少 ? 現值 $4,265,556 = 金流 / 利率 *(1-(1+ 利率 )^- 期數 ) 利率 0.001 期數 240 金流 20000     葉又瑄向劉任昌學習自己在HTML輸入 利率1.2%(月利率0.001),房屋貸款,每月還2萬,貸款多少? 現值 $4,265,556 =金流/利率*(1-(1+利率)^-期數) 利率 0.001 期數 240 金流 20000 投入、陶醉與個性,她壓倒其他所有的舞者。 由 Robert Liu 發佈於  2020年12月18日 星期五

第十五週HTML+CSS+JavaScripe+WORD轉PDF

圖片
利率y(rate) 期數n(nper) 金流m(pmt) 終值f(fv) 參考劉任昌金融市場講義https://drive.google.com/file/d/17z6UZgN5fC2XCO1L8_BQs57dgQXzbwou/view?usp=sharing 葉又瑄學習HTML+CSS+JavaScript程式碼 <style> h1{border: 30px outset red;     background-color: green;     color: white;   text-align: center;} </style> <script> function computePV(){   var r = document.getElementById("rate").value;   var n = document.getElementById("nper").value;   var m = document.getElementById("pmt").value;   var f = document.getElementById("fv").value;   pvif =r;   pvif++;   pvif =1/pvif**n;   var pv = (1-pvif)*m/r + f * pvif;   document.getElementById("pv").innerHTML = pv; } </script> <body> <table border="1"> <tr><td>利率y(rate)</td><td>期數n(nper)</td><td>金流m(pmt)</td><td>終值f(fv)</td></tr>    <td><input id="rate" type="numbe...

第十四週EXCEL環境匯入在WORD執行的程式

圖片
葉又瑄的VBA程式碼 Dim n As Integer Dim spec As String Const period As Integer = 4 Const maxerror As Double = 0.0000001 Dim payment(period) As Double '廣域變數 4 維度的陣列 Private Sub CommandButton1_Click()   Dim a, b, c, f, gap As Double   Dim loopNumber As Integer   n = n + 1 '第幾次計算+1   a = 0     '報酬率0   b = 1     '報酬率1   gap = 10   loopNumber = 10   payment(0) = TextBox1.Value   payment(1) = TextBox2.Value   payment(2) = TextBox3.Value   payment(3) = TextBox4.Value   f = npv(a)   If f = 0 Then      Label9.Caption = 0   ElseIf f < 0 Then      Label9.Caption = "內部報酬率小於 0."   Else      Do While gap > mexerror And Abs(f) > maxerror And loopNumber < 100        loopNumber = loopNumber + 1        c = (a + b) / 2        f = npv(c)        If Abs(f) > maxerror And ...

第十二週葉又瑄教你金融計算

躉繳 第1期 第2期 第3期 注意,包含首期躉繳的現金流量都大於0。 輸出: 報酬率: 淨現值: 迴圈次數: 葉又瑄向劉任昌學程式設計學程式設計 葉又瑄向劉任昌學程式設計學程式設計 <head> <style> h1 {   margin: 0;   padding: 20px 0;       color: #00539F;   text-shadow: 2px 2px 1px yellow;} .Takming {   border: 20px outset red;   background-color: pink;   color: white;   text-align: center;} .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" typ...

13週WORD VBA+TypeText+TypeParagraph+字串處理&

圖片
Const period As Integer = 4 Const maxerror As Double = 0.00000001 Dim payment(period) As Double '廣域變數 4 維度的陣列 Private Sub CommandButton1_Click()   Dim a, b, c, f, gap As Double   Dim loopNumber As Integer   a = 0   b = 1   gap = 10   loopNumber = 10   payment(0) = TextBox1.Value   payment(1) = TextBox2.Value   payment(2) = TextBox3.Value   payment(3) = TextBox4.Value   f = npv(a)   If f = 0 Then      Label9.Caption = 0   ElseIf f < 0 Then      Label9.Caption = "內部報酬率小於 0."   Else      Do While gap > mexerror And Abs(f) > maxerror And loopNumber < 300        loopNumber = loopNumber + 1        c = (a + b) / 2        f = npv(c)        If Abs(f) > maxerror And gap > maxerror Then           If f > 0 Then             a = c ...

葉又瑄第11週CSS+HTML+JavaScript

躉繳 第1期 第2期 第3期 第4期 第5期 第6期 注意,包含首期躉繳的現金流量都大於0。 輸出結果:

葉又瑄 第十週陣列 array

在<body>與</body>增加 <input type="checkbox" id="Address"> 在<script>內增加</script>的最後一個}之前增加   if (document.getElementById("Address").checked)   {   document.getElementById("presentA").innerHTML = BigFiveA[five.selectedIndex];   } 1 最大 2 次大 3 大三 4 第四 5 第五 6 第六 需要地址

第九週期中考 葉又瑄

圖片
中央銀行受財政部委託,發行 91 182 273 364 天期國庫券, 決標貼現率:年息 %。 則每萬元($10,000)新臺幣的發行價格是$ (價格)

第八週

第七週2020/10/19 html vba 輸入國庫券面額: vba 輸入國庫券面額: <input type="text" id="a"> textbox commandbutton <input onclick="alert('你是大帥哥!')" type="button" value="按下我" /> vba 豬 狗 貓 鼠 vba 豬<input type="radio" />狗<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"/>鼠<input type="radio" name="pet"/> vba 董事長 總經理 財務長 vba <select><option>董事長</option><option>總經理</option><option>財務長</option></select> vba EXCEL VBA Private Sub CommandButton1_Click() Dim addnew As Range '定義 變數 addnew 是工作表的一個範圍 If Range("A1").CurrentRegion.Rows.Count = 1 Then Set addn...

第七周

第七周2020/10/19 輸入國庫卷金額: vba 輸入國庫卷金額:<input type="text" id="a"> vba vba <input onclick="alert('你是豬頭!')" type="button" value="按下我" />  vba 豬 狗 貓 vba 豬<input type="radio" />狗<input type="radio" />貓<input type="radio" /> vba 豬 狗 貓 vba 豬<input name="pet" type="radio" />狗<input name="pet" type="radio" />貓<input name="pet" type="radio" /> vba 董事長 總經理 財務長 vba <select><option>董事長</option><option>總經理</option><option>財務長</option></select> vba Excel VBA Private Sub CommandButton1_Click() 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").R...

第五周

圖片
第五週程式設計課程來自 老師FACEBOOK (1)練習定義區塊Division格式 <head> <style> .Takming { border: 20px outset red; background-color: green; color: white; text-align: center; } </style> </head> (2)瀏覽器開發人員模式下的除錯,Function 12鍵 IE 中文介面,但Chrome僅有英文介面 (3)製作OFFICE VBA表單,比較HTML的表單 Excel=>選項=>自訂功能區=>打開開發人員 插入=>自訂表單

第五周獨立文章或網頁

圖片
王八蛋 王八蛋

程式設計學習進度與學習心得 新文章

圖片
第一周9/7 老師給 範本 學生改HTML原始碼 第二周9/14 學習 <input type="button" value="2020年每天通貨走勢" onclick="draw()" > <label>顏色:<input type="radio" name="color"></label> <label>黑色:<input type="radio" name="color"></label> <label>紅色:<input type="radio" name="color"></label> <label>藍色:<input type="radio" name="color"></label> <label>綠色:<input type="radio" name="color"></label><br> 第三周9/21 在HTML處增加。 <form><b>選擇顏色: <input id="linecolor" type="checkbox">紅色 <input onclick="draw()" type="button" value="2020年每天通貨走勢" /></form> 在JavaScript處作如下更改。 ctx.fillStyle="black"; if ( document.getElementById(' linecolor').checked ) ctx.fillStyle="red"; 位元組與變數 10 進位 ...