Date 变量存储为 IEEE 64 位（8 个字节）
创新互联建站长期为千余家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为福清企业提供专业的成都做网站、网站制作，福清网站改版等技术服务。拥有10余年丰富建站经验和众多成功案例,为您定制开发。
Boolean 变量存储为 16 位（2 个字节）
Byte 变量存储为单精度型、无符号整型、8 位（1个字节）
Currency 变量存储为 64 位（8 个字节）
Double（双精度浮点型）变量存储为 IEEE 64 位（8 个字节）
Integer 变量存储为 16位（2 个字节）
Long（长整型）变量存储为 32 位（4 个字节）
Variant 是一种特殊的数据类型，除了定长 String 数据及用户定义类型外，可以包含任何种类的数据。Variant 也可以包含 Empty、Error、Nothing 及 Null等特殊值。可以用 VarType 函数或 TypeName 函数来决定如何处理 Variant 中的数据。
上面思路是正确的， 用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
input type="text" maxlength="11" /这是控制最大输入字数至于不能少于11个字，需要在点击保存按钮时，通过.length来控制