商業套裝軟體應用Microsoft Office

EXCEL另存範圍為html 蔡耀葳2023/6/1統計於德明科大A106教室 台灣上市公司簽證會計師 簽證公司數目 勤業眾信聯合會計師事務所      339 資誠聯合會計師事務所          227 安侯建業聯合會計師事務所      219 安永聯合會計師事務所          106 國富浩華聯合會計師事務所      28 正風聯合會計師事務所          14 立本台灣聯合會計師事務所      12 信永中和聯合會計師事務所      6 大中國際聯合會計師事務所      5 德昌聯合會計師事務所          5 致遠聯合會計師事務所          4 惠眾聯合會計師事務所          3 群智聯合會計師事務所          3 建智聯合會計師事務所          3 霈昇聯合會計師事務所   ...

h1>VBA程式碼 '廖永睿使用VBA將T轉成10**12, B=^ Public Function TBM_number(abc) '函數將 123.45T 文字轉成數字 i = Len(abc) 'Len() 回傳字串長度 c = Right(abc, 1) 'Right(abc, i) 取 abc 右邊第 1 位 If c = "T" Then n = Val(Left(abc, i - 1)) * 1000000000000# '將 T 轉為兆 ElseIf c = "B" Then n = Val(Left(abc, i - 1)) * 1000000000 '將 B 轉為十億 ElseIf c = "M" Then n = Val(Left(abc, i - 1)) * 1000000 '將 M 轉為百萬 Else n = Val(Left(abc, i - 1)) '直接轉為數字 End If TBM_number = n End Function EXCEL VBA編輯器截圖

程式碼 from tkinter import * #從函式庫 tkinter 輸入所有 * 方法 from math import * #從函式庫 math 輸入所有 * 方法 t = (3,4,5,6,7,8,9,10,11,12,16,20)#宣告一元組tuple(...) tk = Tk() tk.title("廖永睿視窗使用者介面GUI") canvas = Canvas(tk, width=800, height=500) canvas.pack() def show(event): #定義由事件event(按鈕選單)呼叫的函數show cx, cy, cr = 160, 210, 150 #宣告圓中心座標cx, cy半徑cr x, y =[],[] #宣告二陣列[...] k = s.get() #取得 ge t按鈕選單的選擇變數 u = 2 * pi / k #使用模組 math 圓周率 pi for i in range(k): x.append(cx + cr*cos(i*u)) #加入陣列的元素 y.append(cy + cr*sin(i*u)) #使用模組 math 三角函數cos, sin for i in range(k-1): canvas.create_line(x[i], y[i], x[i+1], y[i+1], width=3, fill='purple') canvas.create_line(x[k-1], y[k-1], x[0], y[0], width=3, fill='purple') #可考慮增加width寬度,fill顏色 def diagonal(): cx, cy, cr = 510, 210, 200 #宣告圓中心座標cx, cy半徑cr x, y =[],[] ...