Dim brr()是Sub 按钮4_Click()与Function GetB(bstr, c) 的公用数组，必须放在Sub 按钮4_Click()上，请问应该怎样声明或放置,放在Sub 按钮3_Click()后面提示end sub怎样...要求Dim brr()只在Sub 按钮4_Click()+函数中起作用

Sub 按钮3_Click()
................
end sub

Dim brr()
Sub 按钮4_Click()
    xstep = 21     '每组多少行
    ReDim Err(1 To UBound(crr) / xstep + 1, 1 To 2)
    For i = 1 To UBound(brr)     
        b0 = b0 & "," & i
    Next
    b0 = Mid(b0, 2)
    .................
            c = crr(i + k, 1)
            bstr = GetB(bstr, c)  
            If Len(bstr) = 0 Then GoTo 100     
            If Len(bstr) And InStr(bstr, ",") = 0 Then   
                n = n + 1
                'Err(n, 1) = brr(bstr, 1)   
                ............
100:    Next i
End Sub

Function GetB(bstr, c)     
    cc = " " & Mid(c, 5) & " "     
    bb = Split(bstr, ",")
    For Each i In bb
        b = brr(i, 1)
        xrr = Split(b, " ")
        s = 0
        ..........
        If s >= xmin And s <= xmax Then GetB = GetB & "," & i
    Next
    GetB = Mid(GetB, 2)
End Function

[此贴子已经被作者于2022-11-27 23:13编辑过]

sub 按钮3 里面别用brr(),改成br()...

函数声明能修改么？可以修改的话
在按钮4_Click里Dim brr()，传递给函数使用。

申明变量，有几种公用变量
首先明确的公用定义变量都必须在所有的过程/函数之前。
1、工程级公用变量，
在 BAS 模块文件中，使用 public 关键字定义，所有函数/过程 中都可以使用

2、窗体级 公用变量
在 窗体中使用 public 关键字定义，窗体内部可以直接访问，工程内其他 过程/函数 使用 窗体名.变量名 访问。
相关于给窗体增加了一个自定义的属性，只是该属性不起任何作用

3、窗体内部公用变量
在 窗体内使用 private 或 dim 定义，窗体内容可以直接访问，工程内其他 过程/函数 不可访问。

4、过程/函数 内部变量
在过程/函数内定义的变量，使用 dim 或 static（静态变量） 定义的，只能在过程/函数内容访问，外部不可访问。
其中 dim 申明的普通变量占用堆栈内容，static 占用程序内存
--------------
根据需要选择，如果整个工程范围都可以使用的，如 数据库连接对象 变量，就建议定义为 工程级级全局变局
如果 只是某个窗体使用，但整个工程范围内有可能需要访问的，那就定义为窗体级公用变量，如应用分权限访问，每个窗体需要指定一个权限，就可以使用 窗体级公用变量 ，调用前检查一下用户权限是否达到窗体要求。