vb 中如何将数据保留一位小数,如何表示成科学计数法?用什么语言?

vb 中如何将数据保留一位小数,如何表示成科学计数法?用什么语言?
format 不行.因为我的不是直接的数字,是这样的：
Dim aa,ab,ac,ad,ba,bb,bc,bd As Double
For i = 1 To intLastRowNum
aa = objImportSheet.Cells(i,2)
ab = objImportSheet.Cells(i,3)
ac = objImportSheet.Cells(i,4)
ad = objImportSheet.Cells(i,1)
ba = Format(aa,".#")
bb = -(ab / 1000)
bc = ac * 10
bd = ad
objImportSheet.Cells(i,1) = ba
objImportSheet.Cells(i,2) = bb
objImportSheet.Cells(i,3) = bc
objImportSheet.Cells(i,4) = bd
objImportSheet.Cells(i,5) = 0
objImportSheet.Cells(i,6) = 3.4
要求：
objImportSheet.Cells(i,1) 保留一位小数例如117885.0
objImportSheet.Cells(i,2)科学计数 例如-5.400E-03
objImportSheet.Cells(i,3)科学计数例如 3.252E-02
objImportSheet.Cells(i,4) 科学计数例如 1.000E+00
objImportSheet.Cells(i,5) 例如0.000E+00
objImportSheet.Cells(i,6) 例如3.400E+00