【文章內容簡介】
ommand1_Click() = Val(() + Str(2))End SubPrivate Sub Command1_Click() = Val(() + Str(3))End SubPrivate Sub Command1_Click() = Val(() + Str(4))End SubPrivate Sub Command1_Click() = Val(() + Str(5))End SubPrivate Sub Command1_Click() = Val(() + Str(6))End SubPrivate Sub Command1_Click() = Val(() + Str(7))End SubPrivate Sub Command1_Click() = Val(() + Str(8))End Sub Private Sub Command1_Click() = Val(() + Str(9)) End Sub“=”按鈕的click事件:Private Sub Command14_Click()b = If z = 1 Then = a + bIf z = 2 Then = a bIf z = 3 Then = a * bIf z = 4 And b 0 Then = a / bIf z = 6 Then = Sin(a)If z = 7 Then = Tan(a)If z = 8 Then = Cos(a)If z = 9 Then = Hex()End Sub小結通過這次的課程設計,雖然很辛苦,但同時也讓我弄懂了許多以前感覺很模糊的概念,也更加鞏固了自己所學的知識,使得自己所學的知識更加系統(tǒng)化了,這次的程序設計,做的很瘋狂,有時還會熬夜,但心里挺開心的。因為自己可以做出點東西出來,不會覺得自己這半年什么也沒學到。這是其他的實驗中海沒有的事經(jīng)過這幾天的變成訓練。總之,通過這次的程序設計,讓我明白了很多,不管是所學的知識還是所領悟的道理。附錄計算器鍵位設置計算器結果顯示:計算器全部代碼:Dim a As Single, b As Single, z As