lg2怎么在vb程序中表示

Log(number)
必要的
number
参数是
Double
或任何有效的大于
0
的数值表达式。
说明
自然对数是以
e
为底的对数。常数
e
的值大约是
2718282。
如下所示，将
x
的自然对数值除以
n
的自然对数值，就可以对任意底
n
来计算数值
x
的对数值：
Logn(x)
=
Log(x)
/
Log(n)
下面的示例说明如何编写一个函数来求以
10
为底的对数值：
Static
Function
Log10(X)
Log10
=
Log(X)
/
Log(10#)
End
Function
lg2是在数学中的特有表达式，在VB中则没有，应该写成log10(2)

Private Sub Command1_Click()
If Val(a) <= 0 Or Val(a) = 1 Or Val(N) <= 0 Then
MsgBox "无效的值"
Exit Sub
End If
MsgBox "以" & a & "为底" & N & "的对数为：" & Log(N) / Log(a)
End Sub

对数运算：用log函数，log(n)返回n的自然对数值（double型）。要计算以n为底x的对数值，可写为log(x)/log(n)
三角函数就更简单了，sin(n)返回n的正弦值，cos(n)返回n的余弦值，tan(n)返回n的正切值，都是double型的。

底数是多少？如果你指定的底数是e 就是你那样的没错，在VB默认log函数的底数为e 即自然对数。
如果你要换别的底数
如下所示，将 x 的自然对数值除以 n 的自然对数值，就可以对任意底 n 来计算数值 x 的对数值：
Logn(x) = Log(x) / Log(n)
例如 Log10(X) = log（X）/ log(10)

---