大家帮忙看看VB中计算问题
大家帮忙看下,在VB中有个变量str=0.00016如何计算让它变成是1.6*10的4次方
还有个问题是关于数据库查询的
在ACCESS中如何查询时,判断字段1是否为空如果是则查询字段2
在SQL中应该是select case 字段1 isnul then 字段2 end from 表名
大家看看在ACCESS中是查询的,解决了再加分
str = cdbl(str) * 100000000#
VB code:
Option Explicit
Private Sub Form_Load()
Dim strP As String
strP = "0.00016"
strP = Val(strP) * 100000000
Text1.Text = strP
End Sub
第一个问题本是1.6×10的-4次方,你要变10的4次,就将其×10的8次方(问题有点过于简单?)
[access] select iif(isnull(字段1),字段2,字段1) from 表名
刚才说错了,应该是1.6*10负4次方,我按照你们的方法怎么结果是160000
VB code:
str = Format$(0.00016,"#.#E+")
VB code:
Dim istr As String
istr = Format(0.00016, "0.##E+")
str = Format$(0.00016,"#.#E+")
VB code:
Private Sub Form_Load()
s = Format(0.00016, "0.0E+")
MsgBox
相关问答:
为什么C写的DLL文件C、PB能调用VB不能调用?
VB里为什么有的DLL直接通过引用可以使用?有的需要通过declare申明外部函数?这些DLL有什么差别?
1、为什么PB能通过DECLARE声明而VB不行?
2、如果这个dll中的 ......
请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
由于每月从别的公司送来一个txt文件,格式如下:
0023939608011黄根养 & ......
一个程序,两个窗口,一个用来更改access表数据(Form1),另一个窗口有个combo1用来显示数据(Form2)。form2有一个按钮(command1)用来打开form1。现在我先打开form2,combo1读取出数据,点击command1打开form1,更改数 ......
从网页通过inet控件的Inet1.GetChunk读取其代码,然后想转换为汉字,转换代码如下
Private Sub Inet1_StateChanged(ByVal State As Integer)
Dim strRecText As String
Dim st ......