我靠.你這個(gè)要求奇葩哦.都是控制一列的數(shù)據(jù)類型.你要這樣.那你數(shù)據(jù)庫(kù)就全部定義成雙精度的類型.在讀取的時(shí)候.
成都創(chuàng)新互聯(lián)公司-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價(jià)比淮南網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫(kù),直接使用。一站式淮南網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋淮南地區(qū)。費(fèi)用合理售后完善，10年實(shí)體公司更值得信賴。
當(dāng)前行為第一行的CTYPE(內(nèi)容,De....) 忘記了.這樣你第一行就是帶小數(shù)點(diǎn)的
判斷當(dāng)前行數(shù)大于1.全部 CTYPE(內(nèi)容,INTEGER) 就可以了. 這樣一來.第二行開的的全部都是整數(shù)型的了
1．基本數(shù)據(jù)類型
基本數(shù)據(jù)類型是由系統(tǒng)定義的數(shù)據(jù)類型，包括數(shù)值數(shù)據(jù)類型、字節(jié)型、邏輯型、日期型、字符型、字符串類型和對(duì)象類型。
（1）數(shù)值（Numeric）數(shù)據(jù)類型
數(shù)值數(shù)據(jù)類型分別是：Integer、Long、Single、Double和Decimal，它們的表數(shù)范圍、所占字節(jié)數(shù)如表3－1所列。
表3－1 VB ．NET的數(shù)值數(shù)據(jù)類型
類型 數(shù)值范圍 字節(jié)數(shù)
Integer －2147483648 ～ 2147483647 4
Long 9223372036854775808 ～ 9223372036854775807 8
Short －32768 ～ 32767 2
Single －3．402823E38 ～－1．401298E－451．041298E－45 ～ 3．402823E38 4
Double －1．7976313486231E308 ～ 4．94065645841247E－324
4．94065645841247E－324 ～ 1．79769313486231E308 8
Decimal －7922816251426433759354 ～ 79228162514264337593543950335
絕對(duì)值最小的非0數(shù)為：＋/－0．000000000000000000000000001 12
（2）字節(jié)（Byte）數(shù)據(jù)類型
字節(jié)類型用以存儲(chǔ)二進(jìn)制數(shù)據(jù)，占1字節(jié)，其數(shù)值范圍在0～255的整數(shù)，是一個(gè)無符號(hào)的數(shù)據(jù)類型。在進(jìn)行ANSI與Unicode格式轉(zhuǎn)換時(shí)，若數(shù)據(jù)是用Byte格式存儲(chǔ)的，就可以保留其原值；若數(shù)據(jù)是用String格式存儲(chǔ)的則可能會(huì)遭到破壞。在讀文件、寫文件、調(diào)用DIL、調(diào)用對(duì)象的方法和屬性時(shí)，VB ．NET都會(huì)自動(dòng)在ANSI和Unicode之間進(jìn)行轉(zhuǎn)換。注意，除了一元減號(hào)外，所有對(duì)整數(shù)起作用的運(yùn)算符都可用于Byte類型的數(shù)據(jù)。
（3）邏輯（Boolean）數(shù)據(jù)類型
邏輯類型數(shù)據(jù)占2個(gè)字節(jié)，主要用來存放邏輯判斷的結(jié)果，取值為邏輯值，即True（真）或False（假）。當(dāng)將其他數(shù)據(jù)類型轉(zhuǎn)換為邏輯數(shù)據(jù)時(shí)，非0轉(zhuǎn)換為True，0轉(zhuǎn)換為False。
（4）日期（Date）數(shù)據(jù)類型
Date類型用來保存日期和時(shí)間數(shù)據(jù)，占8字節(jié)，取值范圍為1－1－0001 0：00：00～12－31－9999 23：59：59的日期時(shí)間，即日期范圍為公元1年1月1日～9999年12月31日，時(shí)間范圍為0：00：00～23：59：59。Date數(shù)據(jù)要求在日期時(shí)間值前后加上“#”，日期時(shí)間值的格式為m－d－yyyy hh ： mm ： ss（月－日－年時(shí)：分：秒）。例如：#12－3－2003 10：20：18#。
（5）字符（Char）型
字符型數(shù)據(jù)占2字節(jié)，取值范圍0～65535，代表一個(gè)Unicode字符。Char數(shù)據(jù)類型與數(shù)值類型之間不允許隱式轉(zhuǎn)換，但可使用系統(tǒng)的Asc（）或AscW（）將Char數(shù)據(jù)顯示轉(zhuǎn)換為數(shù)值數(shù)據(jù)。
（6）字符串（String）數(shù)據(jù)類型
String類型用于保存字符串?dāng)?shù)據(jù)，一個(gè)字符占1字節(jié)，一個(gè)漢字占2字節(jié)，字符串最大長(zhǎng)度可達(dá)20億（231）個(gè)Unicode字符。字符串前后要加上" "。例如："Good morning ！"、"程序"。
（7）對(duì)象（Object）數(shù)據(jù)類型
Object類型用來存儲(chǔ)應(yīng)用程序中的對(duì)象，可存放任何類型的數(shù)據(jù)，占4字節(jié)。
2．自定義數(shù)據(jù)類型
用戶自定義類型在Visual Basic．NET中稱為“結(jié)構(gòu)”（Structure），包含一個(gè)或多個(gè)不同種類的數(shù)據(jù)類型，視自定義類型的成員來決定存放的數(shù)據(jù)，關(guān)鍵字為System．ValueType。用戶自定義類型數(shù)據(jù)占用的內(nèi)存空間是其包含的所有數(shù)據(jù)類型所占用內(nèi)存空間的總和。
保留兩位小數(shù)的一般方法是四舍五入法。
保留兩位小數(shù)，看千分位。是4或比4小舍去；是5或比5大舍去以后向前一位進(jìn)1。
如：3.425保留兩位小數(shù)就是3.43
3.421保留兩位小數(shù)就是3.42
又如： 3.4263保留兩位小數(shù)就是3.43
3.4233保留兩位小數(shù)就是3.42
再如：3.4保留兩位小數(shù)就是3.40
VB6中Mod 運(yùn)算符功能是兩數(shù)相除求余。
如果兩數(shù)中帶小數(shù)，Mod 會(huì)先四舍六入取整，再按整數(shù)求余，余數(shù)帶小數(shù)的話只取整數(shù)部分。
注意，如果有書說四舍五入，是錯(cuò)的。
在 VB6 用的是所謂銀行家算法，是四舍六入：
小數(shù)部分比 0.5 小就舍(例如0.4，0.49999)，比 0.5 大就進(jìn)(例如0.6，0.500001)，
剛好是 0.5 可能舍可能進(jìn)，如果小數(shù)點(diǎn)前面是偶數(shù)就舍(例如2.5 得 2)，是奇數(shù)就進(jìn)(例如3.5 得 4)。
Mod 運(yùn)算符在VB.NET中有改動(dòng)，余數(shù)可以帶小數(shù)。
以上資料來自：
所以2.5 mod 2結(jié)果是0
用這個(gè)函數(shù)把
Math.Round 方法 (Decimal, Int32)
將小數(shù)值舍入到指定精度。
命名空間： System
程序集： mscorlib（在 mscorlib.dll 中）
語(yǔ)法
Visual Basic（用法）
Dim d As Decimal
Dim decimals As Integer
Dim returnValue As Decimal
returnValue = Math.Round(d, decimals)
參數(shù)
d
類型：System.Decimal
要舍入的小數(shù)。
decimals
類型：System.Int32
返回值中的小數(shù)位數(shù)（精度）。
返回值
類型：System.Decimal
精度等于 decimals，最接近 d 的數(shù)字。
Math.Round(3.4666666, 4) 結(jié)果是 3.4667.
可以用Rnd函數(shù)實(shí)現(xiàn)
Rnd 函數(shù)返回小于 1 但大于或等于 0 的值。
為了生成某個(gè)范圍內(nèi)的隨機(jī)整數(shù)，可使用以下公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
這里，upperbound 是隨機(jī)數(shù)范圍的上限，而 lowerbound 則是隨機(jī)數(shù)范圍的下限。
你這里可以先把范圍擴(kuò)大10倍，看成21到34之間的隨機(jī)數(shù)，最后再除以10就行了。
Int((34 - 21 + 1) * Rnd + 21) / 10
重慶分公司
重慶分公司
