excel抓取网页动态数据(2016年上海事业单位医疗招聘考试真题及答案（二）)

　　excel抓取网页动态数据(2016年上海事业单位医疗招聘考试真题及答案（二）)

　　源内容

　　4003,23,16,51;25,56,46,52,13,61,73,49,10,4,60,17,19,58,69,21,16,11,7,23

　　:4002,23,13,21;44,19,31,48,11,29,70,9,74,62,42,40,32,8,35,2,7,16,10, 59

　　:4001,23,09,51;19,21,74,27,4,53,14,58,75,17,72,33,73,54,8,49,79,36,30, 78

　　:4000,23,06,20;36,42,21,60,9,45,79,49,75,37,80,23,38,67,58,1,68,48,27, 61

　　:3999,23,02,50;76,20,67,30,58,13,5,1,51,75,78,59,52,4,68,44,40,8,66, 73

　　:3998,22,59,19;20,74,72,52,18,68,11,66,12,40,13,5,31,69,21,75,58,59,9, 32

　　:3997,22,55,52;43,​​5,61,78,23,1,20,45,2,24,7,56,57,63,36,76,46,28,30, 69

　　:3996,22,52,20;25,57,65,40,47,41,54,15,48,78,52,62,71,23,45,64,74,22,8, 11

　　:3995,22,48,50;9,66,54,68,56,25,29,7,15,16,19,50,3,13,12,11,24,63,70, 17

　　:3994,22,45,20;70,30,26,72,28,4,47,54,25,32,39,12,63,2,77,71,14,15,37, 64

　　:3993,22,41,52;74,35,69,19,7,34,36,78,31,44,10,63,6,13,33,77,4,14,75, 61

　　:3992,22,38,22;3,20,54,15,33,48,78,75,36,14,16,59,8,69,9,12,71,24,40, 50

　　:3991,22,34,51;53,2,79,9,37,17,50,3,43,14,64,42,56,1,59,73,27,28,26, 7

　　:3990,22,31,21;57,73,32,45,30,20,5,55,71,56,52,58,63,78,34,42,68,33,61, 22

　　:3989,22,27,51;25,47,74,26,78,5,49,11,38,70,24,30,18,63,4,27,12,10,33, 57：">

　　网页显示内容

　　在数字源代码中可以找到，不过是把数字从小到大重新排列，应​​该有办法获取。

　　估计会用到2个拆分

　　拆分（“：”）

　　splt(",")

　　再次使用大函数(拆分得到的数组, 20）, large(拆分得到的数组, 19）...large(拆分得到的数组, 1）'这个在函数中很简单，但是在VB中好像很复杂，我还没看懂

　　不过VB还是挺复杂的，慢慢改吧。

　　做了一个半成品VB，发现实现实时更新相当复杂；我暂时只能得到一页；

　　123.zip(33.96 KB，下载：86)

　　2013-4-29 01:48上传

　　点击文件名下载附件

　　有人帮忙修改代码，继续做