VB 字符串数组最大容量

1）VB6.0中关于String数据类型的说明如下：

专注于为中小企业提供成都网站建设、网站建设服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业行唐免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了千余家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

字符串有两种：变长与定长的字符串。

*变长字符串最多可包含大约 20 亿 ( 2^31)个字符。

*定长字符串可包含 1 到大约 64K ( 2^16 ) 个字符。

2）VB读入大容量文本文件到富文本框，采取用二进制方法一次读入全部字节，再用StrConv函数根据系统的缺省码页将字符串转成 Unicode，显示与富文本框控件。

3）即使是逐行读入也应该先读到变量，再用可显示控件显示，不然读取速度大大降低。

StrConv 函数，返回按指定类型转换的 Variant (String)。

实现代码如下：

Private Sub Command16_Click()

Dim strWj As String

Dim strj() As String

Dim aryContent() As Byte

Dim i As Long

Dim j As Long

CommonDialog1.CancelError = True ' 设置“CancelError”为 True

On Error GoTo ErrHandler

CommonDialog1.Flags = cdlOFNHideReadOnly    ' 设置标志

' 设置过滤器

CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files"  "(*.txt)|*.txt|Batch Files (*.bat)|*.bat"

CommonDialog1.FilterIndex = 2    ' 指定缺省的过滤器

CommonDialog1.ShowOpen    ' 显示“打开”对话框

' 显示选定文件的名字

'MsgBox CommonDialog1.FileName

Open CommonDialog1.FileName For Binary As #1

ReDim aryContent(LOF(1) - 1)

Get #1, , aryContent

Close #1

strWj = StrConv(aryContent, vbUnicode)

RichTextBox1 = strWj

Exit Sub

ErrHandler:

' 用户按了“取消”按钮

Exit Sub

End Sub

一个VB二维数组最多能存储多少个元素?

理论上最大可以存放4.6116860184274 * 10的18次平方

组要还是看你的计算处理能力.以32位操作系统的计算机来说这个是无限了.64位的话,还要看你的内存.和计算机的处理能力.估计8核处理这样的数组也基本卡死.

在VB中一维数组范围多大？

Dim 数组名（下标） [As 类型]

说明：（1）下标必须为常数，不可以为表达式或变量；

（2）下标下界最小为-32768，最大上界为32767；省略下界，其默认值为为0，一维数组的大小为：上界-下界+1

（3） 如果省略类型，则为变体型

vb.net数组长度

因为下标从零开始。

shuzu 元素分别是 shuzu(0)、shuzu(1)、shuzu(2)、shuzu(3)。

你自己数一数有几个。

当前标题：vb.net数组大小上限,vba数组大小上限
网页网址：http://scyingshan.cn/article/dsispgj.html