double是雙精度 有效數(shù)值位52位 表示成指數(shù)的形式 即指數(shù)11位 即表示成
興隆臺ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場景,ssl證書未來市場廣闊!成為創(chuàng)新互聯(lián)的ssl證書銷售渠道,可以享受市場價格4-6折優(yōu)惠!如果有意向歡迎電話聯(lián)系或者加微信:028-86922220(備注:SSL證書合作)期待與您的合作!
所以180.89305用2進(jìn)制表示是10110100.1110010010011110111011001011111110110001010110110101
即
180.89305在double中存在的實(shí)際數(shù)值是
1.01101001110010010011110111011001011111110110001010110110101 *2^7
取小數(shù)點(diǎn)后 52位有效值后 等于10進(jìn)制的180.893049999999998
所及加最后變成了 1808930.99999999998
第一次當(dāng)然輸出近似值1808931
第二次int函數(shù)去掉了小數(shù)點(diǎn)后的數(shù)int就是只取整數(shù)的部位的不是四舍五入 所以少了1
可以用VB6里的函數(shù)
isnumeric()
比如要判斷文本框里的內(nèi)容是否數(shù)字
if isnumeric(TextBox1.text) Then
msgbox("是數(shù)字!")
else
msgbox("不是數(shù)字!")
end if
1、打開VB6.0軟件,新建一個標(biāo)準(zhǔn)exe工程;
2、在設(shè)計(jì)界面上添加一個Text控件和一個Command控件,Text1的屬性Text設(shè)置為空,Command1的Caption屬性設(shè)置為"判斷";
3、雙擊Command1控件,進(jìn)入代碼編輯窗口,在代碼編輯窗口輸入如下代碼:
Private?Sub?Command1_Click()
Dim?n?As?Double
n?=?Val(Text1.Text)
If?n??0?Then
MsgBox?(n??"是一個正數(shù)")
ElseIf?n?=?0?Then
MsgBox?("n等于0")
Else
MsgBox?(n??"是一個負(fù)數(shù)")
End?If
End?Sub
4、點(diǎn)擊運(yùn)行工程,在Text1中輸入一個數(shù)字,單擊判斷按鈕,判斷該數(shù)是正數(shù)、0還是負(fù)數(shù);