資源描述:
《科學(xué)計(jì)算器vb代碼》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在工程資料-天天文庫(kù)。
1、用VB寫(xiě)計(jì)算器似乎有很多例子,這個(gè)代碼就是其中之一,科學(xué)計(jì)算器是在基本計(jì)算器的基礎(chǔ)上,加入角度、弧度、梯度、正切、余切、正弦余弦、平方根等的數(shù)學(xué)計(jì)算,當(dāng)然基礎(chǔ)的加減乘除運(yùn)算就更不用說(shuō)了,這是在一本VB教程屮摘錄的代碼,你可以此為基礎(chǔ)完善擴(kuò)展該計(jì)算器的功能,運(yùn)行截圖如下:核心代碼,只有一個(gè)文件代碼:VERSION5.00BeginVB.FormFrm_ScientificCaption=“計(jì)算器“ClientHeight=2925ClientLeft=165ClientTop=735Clientwidth=5595LinkTopic=nForml"LockContr
2、ols='TrueMaxButton=0'FalseScaleHeight=2925ScaleWidth=5595StartUpPosition=3,窗口缺省BeginVB.CommandButtonCmd_RndCaption=HRndHHeight=390Left=5025TabIndex=39Top=1455Width=510EndBeginVB.CommandButtonCmd_PICaption=”P(pán)I”Height=390Left=1575TabIndex=38Top=2400Width=630EndBeginVB.CommandButtonCmd_F
3、actCaption=”N!”Height=390Left=1575TabIndex=37Top=1935Width=630EndBeginVB.CommandButtonCmd_LogCaption=LogHeight=390Left=1575TabIndex=36Top=1455Width=630EndBeginVB.CommandButtonCmd_LnCaption="Ln"Height=390Left=1575TabIndex=35Top=960Width=630EndBeginVB.CommandButtonCmd_SquareCaption=“xvH
4、eight=390Left=840TabIndex=34Top=2400Width=630EndBeginVB.CommandButtonCmd_CubeCaption=nXA3nHeight=390Left=825TabIndex=33Top=1935Width=630EndBeginVB.CommandButtonCmd_OperatorCaption="XAY"Height=390Index=5Left=840TabIndex=32Top=1455Width=630EndBeginVB.CommandButtonCmd_ExpCaption="Exp”Hei
5、ght=390Left=840TabIndex=31Top=960Width=630EndBeginVB.CommandButtonCmd_SinCaption="Sin"Height=390Left=120TabIndex=30TopWidthEnd960630BeginVB.CommandButtonCmd_CosCaption=”Cos”HeightLeft390120TabIndex=291455630TopWidthEndBeginVB?CommandButtonCmd_Tan=390CaptionHeightLeft=120TabIndex=28Top
6、WidthEnd1935630BeginVB.CommandButtonCmd_AtanCaption=,,Atant,Height=390Left=120TabIndex=27Top=2400Width=630EndBeginVB>FrameFramelHeight=510Left=90TabIndex=233302625TopWidthBeginVBeOptionButtonOtn_GrdCaption=”梯度”Height=180Left=1695TabIndex=26Top=210Width=750EndBeginVB.OptionButtonOtn_Ra
7、dCaption=”弧度”Height=180Left=900Tabindex=25Top=210Width=795EndBeginVB>OptionButtonOtn_DegCaption=“角度,’Height=180Left=135TabIndex=24Top=210Value=-1'TrueWidth=675EndEndBeginVB.CommandButtonCmd_OperatonCaption一h—hHeight=390Index=4Left=5025TabIndex=22Top=2400Width=510EndBeginVB.CommandButt
8、onCmd