西北服装。可以一件代发么
本回答被网友采纳.
.
.
.
.
.
Dim arr() As Byte 语句只是一个类型声明，并没有声明arr数组的元素个数，所以并没有实际开辟数组存储空间，后面用到的时候，就没有办法想数组写入内容。
这就是错误的实质所在。知道了错误是如何产生的，就好办了。因为最初我们并不知道这个数组有多少元素，即元素个数是动态的，取决于temp的长度，所以只能动态声明。
所以，我们需要在正式使用前用redim语句声明arr数组元素的的范围就成了。我们可以看到程序中的n就是数组元素的元素个数-1，而我们的数组下标是从0开始，最大下标正好是n，所以在计算得到n之后，，在循环使用之前使用redim重新声明即可。
即：在n = Len(temp) \ 2 - 1语句和For i = 0 To n语句之间插入一行redim arr（n）就好了
1、 钢丝绳的受力特征：钢丝绳受力复杂。受载时，钢丝绳中产生拉伸应力、弯曲应力、挤压应力以及钢丝绳捻制时的残余应力等。当钢丝绳绕过滑轮时，受到交变应力作用，使金属材料产生疲劳，最终由于钢丝绳与绳槽、钢丝绳之间磨损而破断，试验表明： （1）钢丝绳的弯曲曲率半径对钢丝绳的影响很大，这是因为绳轮直径减小时，钢丝的弯曲变形加剧，弯曲应力加大，因而钢丝绳磨损加快，疲劳损伤加快，钢丝绳的寿命就缩短。 （2）钢丝绳绕过绳轮时，绳轮与钢丝绳接触面的压力和相对滑动，使钢丝绳磨损断丝，接触应力越大，断丝越迅速。 （3） 点接触钢丝绳，由于钢丝间接触应力大，钢丝的交叉又增大了横向压力，强度损失要比线接触型大，抗疲劳性能也差，所以线接触钢丝绳比点接触钢丝绳寿命长。 （4）当钢丝绳一个捻距间的断丝数达到全部钢丝的10%时，继续使用，绳的断丝速率明显加快，短时即出现断股。 （5）当其它条件相同时，选用的钢丝绳安全系数越高，其使用寿命越长。
2、 钢丝绳的破断原因。综上所述，钢丝绳子破断的主要原因是超载和磨损。它与钢丝绳在滑轮、卷筒上的穿绕次数有关，每穿绕一次，钢丝绳就产生由弯变直，再由直变弯的一个过程。这是造成钢丝绳损坏的一个主要原因之一。再就是钢丝绳的破断还与它所穿过滑轮的直径有关。滑轮或卷筒的直径愈小，则钢丝绳的弯曲愈严重，也就愈易损环。因此，一般要求滑轮（卷筒）直径与钢丝绳直径之比D/d大于20—30。此外，钢丝绳的破断还与工作类型、使用环境（高温、腐蚀性气体）、保管、使用状况有关。钢丝绳的磨损，一是与卷筒和滑轮之间的磨损，二是钢丝绳之间的磨损。要减小磨损，关键在于钢丝绳的润滑，如果做到使钢丝绳处于正常润滑状态，必然会使钢丝绳的磨损降到最低限度