vb.net求长度 vb中长度函数

在vb.net 怎么指定科学计数法长度？比如说10.0转化成1.000000E+01,而不是1.0000E+001

如果你要纠结这种格式，意思就是要输出字符串类型，那就可以通过各种字符串函数来处理，并不需要.net自带的方法。

成都创新互联公司是一家专业从事网站制作、成都网站建设、网页设计的品牌网络公司。如今是成都地区具影响力的网站设计公司,作为专业的成都网站建设公司,成都创新互联公司依托强大的技术实力、以及多年的网站运营经验,为您提供专业的成都网站建设、营销型网站建设及网站设计开发服务！

o这是因为有字节对齐的问题。每一个变量的首地址必须是它所占字节长度的倍数。

比如int32长度是4，那么它的首地址只能取0,4,8,12……

下面的图形象的表示了MSG在内存中的储存情况：

OOXXOOOO

第一个和第二个O表示两个BYTE类型的数据，两个X表示空地址，里面什么也没放。后面四个OOOO便是一个int32类型数据也就是Code。加起来总共占了8个字节的内存

上面思路是正确的，用ascw 函数也可以

private function LenC( ps as string ) as Integer

Dim n As Integer

Dim StrLen As Integer

For n = 1 To Len(Text1.Text)

If Ascw(Mid(Text1.Text, n, 1)) 256 Then

StrLen = StrLen + 2

Else

StrLen = StrLen + 1

Next n

return strLen

end function

str(22)把数字22转化为字符串后，系统自动在22前增加一个空格，即符号位（因为正号只占位），如果是负数则用－号占用符号位，所以str(22)的结果是“ 22”，长度为3。

后面的str(3)=" 3"，str(2)=" 2"，它们的字符串的长度都是2（包括了一个符号位空格）。

所以：Len(Str(22) + Str(3) + Str(2))＝len(" 22"+" 3"+" 2")=len(" 22 3 2")=7

遍历每一个字符，看是全角还是半角的。半角的字符总数 +1，全角的字符总数 +2。

参考：

Public Function GetByteLength(ByVal value As String) As Long

Dim i As Long = 0

For Each c As Char In value

If (c.ToString().Length = System.Text.Encoding.Default.GetByteCount(value.ToString())) Then

i = i + 1

End If

i = i + 1

Return i

End Function

本文标题：vb.net求长度 vb中长度函数
URL分享：http://ybzwz.com/article/hpgich.html