常见字典用法集锦及代码详解

熊文来

蓝桥玄霜老师：
你好！
之前您帮我做了一个48人一个试室的桌贴，非常的完美，但是 现在有2个考试的地点与之前的不一样，是阶梯教室，座位布局完全不一样。能帮我再设计一个吗？
我现在有学生数据表。
在桌贴模板中一共有8个工作表，分别为阶梯教室3人一排    到   阶梯教室10人一排

现阶梯教室一共有16排，每排最多坐10人。8张工作表分别安排48人、64人、80人、 96人、112人、128人、144人、160人考试


座位按照横向S型进行排列  也就是03号学生排完后，后一排的下一行是04号学生 桌贴形式如下（3人坐）

01   02    03
06   05    04
07   08    09
12   11    10
13   14    15
18   17    16
19   20    21
24   23    22
25   26    27
30   29    28
31   32    33
36   35    34
37   38    39
42   41    40
43   44    45
48   47    46


座位按照横向S型进行排列  也就是04号学生排完后，后一排的下一行是05号学生 桌贴形式如下（4人坐，共64考生）


01   02    03   04
08   07    06   05
16   15    14   13
17   18    19   20
24   23    22   21
25   26    27   28
32   31    30   29
33   34    35   36
40   39    38   37
41   42    43   44
48   47    46   45
49   50    51   52
56   55    54   53
57   58    59   60
64   63    62   61

其他5人坐、6人坐、7人坐、8人坐、9人坐、10人坐以此类推

另外 可否实现批量一次打印或者按照需要打印某一个试室。

熊文来

蓝桥玄霜老师：
你好！
蓝桥玄霜老师： 你好！ 之前您帮我做了一个48人一个试室的桌贴，非常的完美，但是 现在有2个考试的地点与之前的试室布局完全不一样。
在桌贴模板中一共有8个工作表，分别为阶梯教室3人一排-----阶梯教室10人一排

现阶梯教室一共有16排，每排最多坐10人。8张工作表分别安排48人、64人、80人、 96人、112人、128人、144人、160人考试


座位按照横向S型进行排列  也就是03号学生排完后，后一排的下一行是04号学生 桌贴形式如下（3人坐，共48人）

01   02    03
06   05    04
07   08    09
12   11    10
13   14    15
18   17    16
19   20    21
24   23    22
25   26    27
30   29    28
31   32    33
36   35    34
37   38    39
42   41    40
43   44    45
48   47    46


座位按照横向S型进行排列  也就是04号学生排完后，后一排的下一行是05号学生 桌贴形式如下（4人坐，共64考生）


01   02    03   04
08   07    06   05
16   15    14   13
17   18    19   20
24   23    22   21
25   26    27   28
32   31    30   29
33   34    35   36
40   39    38   37
41   42    43   44
48   47    46   45
49   50    51   52
56   55    54   53
57   58    59   60
64   63    62   61

其他5人坐、6人坐、7人坐、8人坐、9人坐、10人坐以此类推

另外 可否实现批量一次打印或者按照需要打印某一个试室。

麻烦您按照您之前帮我做48人一个试室的方法 帮我再做这个 行吗？谢谢！

zz1180

代码详解
1、d.Remove(“b”)：清除字典中”b”关键字和与它对应的项。清除之后,现在字典里只有2个关键字了。

这里的关键字，指的是表头中的一列吗？

charhe

mark，学习学习

wt577

感谢版主的无私分享，受益匪浅。

ilikevba2011

感谢分享，好好学习下。

up501813573

For i = 2 To UBound(Arr)
    d(Arr(i, 3)) = d(Arr(i, 3)) + 1
Next
这句看不懂呢

synpix

向 蓝桥 老师致敬，虽然我还没有看完，但会后收藏好好学习！

暗夜守护神

蓝老师在么？想请教您，字典的名称可以用变量么？
比如我现在定义了名为11、12、13、14、15、21、22、23、24、25的十个字典，后面在运算过程中分别调用不同的字典。
我想能不能把字典名定义成变量，定义一次，调用的时候也用变量调用。
不知是否能够实现？

amchat

从这里开始，学习