7490
社区成员
- 全部
请教VB如何实现链表？
我要保存大量的，不定数量的结构类型的信息，
如果是使用C，我就会使用链表，不知道VB怎么来实现？
听说VB的数组是可变长度的，不知道怎么做的
谢谢（刚刚尝到VB快速开发的甜头，却发现。。。）
如果是使用C，我就会使用链表，不知道VB怎么来实现？
听说VB的数组是可变长度的，不知道怎么做的
谢谢（刚刚尝到VB快速开发的甜头，却发现。。。）
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
richardbao 2003-05-10
不行的，VB的数组如果缩短，只能去除最后的元素。我是老早做的 VB 链表，现在早忘了，源码也没有了，但是我当时好像是这么干的：
把元素 0 空出来做链表头，如果某元素的索引指向 0 元素，就说明这个元素是空的，可以放数据，如果不是指向 0，说明已经被使用。我当时专门有一个函数用来返回数组中第一个可以使用的元素变量。
总体效果还是差不多的，至少我认为。
把元素 0 空出来做链表头，如果某元素的索引指向 0 元素，就说明这个元素是空的，可以放数据，如果不是指向 0，说明已经被使用。我当时专门有一个函数用来返回数组中第一个可以使用的元素变量。
总体效果还是差不多的，至少我认为。
seeku 2003-05-09
突然想到一个问题，如果我想删除（richardbao(Richard Bao)谈到的）链表的中间的某个变量，不知道VB能否释放内存？
seeku 2003-05-09
谢谢两位，尤其richardbao(Richard Bao)的算法比较妙，
只是有点古怪
呵呵
只是有点古怪
呵呵
richardbao 2003-05-09
忘了说，VB 里声明数组：
Dim MyArr(8) As Integer
事实上定义了 9 个变量，你可以自己试试，从 MyArr(0) 到 MyArr(8)。
Dim MyArr(8) As Integer
事实上定义了 9 个变量，你可以自己试试，从 MyArr(0) 到 MyArr(8)。
richardbao 2003-05-09
先告诉你 VB 数组变长要加 Preserve 才会保留数据，不要还没有弄清楚就乱骂 VB。
Dim MyArr(n) As Integer
Redim Preserve MyArr(m)
至于链表，我的方法是这样，仿照 C 的方法先定义一个类型
Type LinkTable
Data As ...
NextIndex As Long
End Type
然后建立一个数组用来放数据：
Dim LinkedData(...) As LinkTable
然后你就像 C 一样的用嘛，NextIndex 里面不要放地址指针，放数据的下标索引不就可以了？效果差不多的，就是代码看起来没有 C 那么爽而已！
Dim MyArr(n) As Integer
Redim Preserve MyArr(m)
至于链表，我的方法是这样，仿照 C 的方法先定义一个类型
Type LinkTable
Data As ...
NextIndex As Long
End Type
然后建立一个数组用来放数据：
Dim LinkedData(...) As LinkTable
然后你就像 C 一样的用嘛，NextIndex 里面不要放地址指针，放数据的下标索引不就可以了？效果差不多的，就是代码看起来没有 C 那么爽而已！
seeku 2003-05-08
的确要看看书，我学VB是半路出家，没有系统学习过
高一的时候学过BASIC，呵呵
高一的时候学过BASIC，呵呵
xayzmb 2003-05-08
自已笨不要怪别人....
呵呵
^_^
去查书吧.
呵呵
^_^
去查书吧.
seeku 2003-05-08
经过测试，redim会把数组的内容清空
Dim lArr() As Long
ReDim lArr(5)
For i = 0 To 4
lArr(i) = i
Next i
ReDim lArr(8)
lArr(5) = lArr(0)
lArr(6) = lArr(3)
lArr(7) = lArr(4)
现在lArr的8个值都是0了
什么变长啊，都是骗人的
Dim lArr() As Long
ReDim lArr(5)
For i = 0 To 4
lArr(i) = i
Next i
ReDim lArr(8)
lArr(5) = lArr(0)
lArr(6) = lArr(3)
lArr(7) = lArr(4)
现在lArr的8个值都是0了
什么变长啊，都是骗人的
MSSQL 2003-05-08
dim arr() as yourtype
.
.
.
.
.
redim arr(n)
.
.
.
.
.
redim arr(n)
lihonggen0 2003-05-08
http://www.csdn.net/Develop/Read_Article.asp?Id=16430
循环链表以及相关操作（VB实现）
循环链表以及相关操作（VB实现）
seeku 2003-05-08
数组我应该搞定了，使用数组也可以完成我要的效果，只是不知道效率如何。
我的第一个问题有没有人会啊？
用VB怎么做链表？
如何表示指针变量？如果根据指针变量取得内容？
如果VB连这个都做不了，如何实现更复杂的数据结构啊？
我的第一个问题有没有人会啊？
用VB怎么做链表？
如何表示指针变量？如果根据指针变量取得内容？
如果VB连这个都做不了，如何实现更复杂的数据结构啊？
请教结构体链表问题 //边的长度 struct vertex *vb,*ve; //两顶点的指针 int times; //边的使用次数 }EDGE; typedef struct triangle //三角形结构 { int NO; //三角形号 int edgeNO[3]; //三条边的边号 struct vertex *ptr[3]; //...
VB如何只读取字符串中的数字部分?? 逐个字符判断，是否为 "+-0123456789." 中的一个，取出连续的数值部分问题不明确啊 比如： dim s as string dim v as long s="123abc456efg"...遍历~Private Sub Command1_C...
vb/vb.net原创文章精粹（4） [url=http://www.vbbaike.com/show.asp?id=101410]各位帮忙 找一个w70n5msg.dll 文件[/url] ...id=101409]ＶＢ中如何使用insert语句，插入一条纪录[/url] [url=http://www.vbbaike.com/show...
vb.net中多线程数据链表的思路 请教各位，我想实现下面的方式，该如何实现： 从数据库中读取出没有处理的数据记录，然后用多线程把这些没有处理的记录通过socket发送出去，并更新已发送的该记录信息 是不是需要专门创建一个线程，用来从数据库中...
vb/vb.net开发精粹(4) 各位帮忙 找一个w70n5msg.dll ...ＶＢ中如何使用insert语句，插入一条纪录 分布式组件状态问题 在VB6.0中 使用SQLDMO.SQLServer 显示数据库名称出错啦, 请大家指点一下 在VB控制水晶报表中，用不固定的数据源，运行
VB+ADO+Access如何修改数据 我把用adodc1绑定了表Case，并在窗体中用几个Text跟表Case中的对应字段相绑定，我现在想直接通过修改Text(i).text来修改数据库表Case中的记录，问该如何修改，大侠们可否提供一下建议，并帮忙看看我的问题出在哪儿 ...
数据链表的问题，请教 用vb.net想创建一个数据链表，如何创建？比如一个几级目录，有文件夹，有文件等 clist和clistnode是不是类库中已经存在的类？如果是的话，如何导入命名空间， 命名空间是否又要添加引用？如果是，添加哪个引用呢？
vb/vb.net原创文章精粹（3） id=101350]请教VB6.0+数据库的问题！请各位高手指教！[/url] [url=http://www.vbbaike.com/show.asp?id=101349]用VBA能否实现对WORD登陆密码的修改？[/url] [url=http://www.vbbaike.com/show.asp?...
vb/vb.net开发精粹(3) 请教VB6.0+数据库的问题！请各位高手指教！ 用VBA能否实现对WORD登陆密码的修改？ 这两个字符串 为什么无法链接到一起？？？？ 去掉一位数组中包含的另一个数组的值 串口接受的数据如何处理？？？？？？？？？？...
______关于VB.NET中指针的请教，谢谢 今天需要指针，查了下资料，发现VB.NET的指针好像只能指向固定的内存块，而不能指向变量。 问题来了： 1）是不是真的不能指向变量... 2)如果不能指向变量，那如果我要做链表的话怎么实现呢？ 谢谢前辈们指点！谢谢！！
**刚从VB过来** 请教：单链表排序。帮忙看看我的代码是哪的问题？ pcb *sort(pcb *head) /*对以头结点指向的链表按优先级大小排序*/ { /*phead存放头接点的地址，pmax:当前最大值，pmaxp:pmax之前的单元， p1:活动指针,p2:p1之前的单元，*/ pcb *p1,*p2,*pmax,*pmaxp,*p4,*phead;...
向VB.net高手请教：获取本机和远程主机网卡的MAC地址 各位高手： 本人所在学校内部网络采用的是固定分配IP地址，楼宇之间采用可控交换机连接（所以不能直接PING就...） 另外，还想问以下，在VC中的结构体中的链表指针（如指向下一个结构体的指针），在VB.NET中如何转化？
我所经历的Android面试|掘金技术征文 转载地址:https://juejin.im/post/5ab7a9cd6fb9a028c812d24b概述笔者是非计算机专业，15年毕业一直在小公司，觉得完全靠自学已经到了自己的天花板，然后想进大型互联网公司发展，所以年前辞职，放弃了年终奖，年后就...
学GIS开发怎么入门，GIS专业的学生应该掌握什么知识 ？ (一) 打好编程基础这篇文章仅给那些GIS专业的，想学GIS开发的，但现在还没怎么入门不知道该从哪学起的在校生参考的。这篇文章不是讨论GIS开发是否有前途的，也不是讨论做GIS是不是就一定应该做开发的帖子。...
全国(大学)高等教育各学科视频教学全集 为了方便已就业的朋友再学学习，提供一篇覆盖的教程有计算机类全部，机械类，土木建筑类，财经管类 ，电气类，法学类 ，广告类，医学，心理学，大学英语，大学物理，高等数学，大学化学，哲学 应有尽有。...
《疯狂的程序员》三 21 绝影第一次去公司周总先给他介绍同事：“小李是秘书，小周是程序员……以后你就跟着小周，他很厉害的，要好好跟他学习。” 他对小周点点头，本来想跟他打个招呼，但实在又不好称呼他。周总当然可以叫他小周，...
请教高手，这个程序为何不能显示图 ++k) /* 构造表结点链表 */ { cin>>va>>vb; /* 读入两个顶点*/ Edge[cur++]=va; Edge[cur++]=vb; i=LocateVex(G,va); /* 一端 */ j=LocateVex(G,vb); /* 另一端 */ p=(EBox*)malloc(sizeof(EBox)); p->mark=...
iOS 开发怎么入门？ 作者：Fang ...来源：知乎 著作权归作者所有，转载请联系作者获得授权。 这次更新把大多数推荐书籍及网站的图贴了出来，又给大家介绍了很多iOS新的学习资源，我觉得这已经是知乎上最权威的iOS教学资源锦集了吧，令人...
怎么进入BAT的研发部门？ 怎么进入BAT的研发部门？ ======================================剑指offer+leetcode+geeksforgeeks+编程之美+算法导论====秒杀BAT算法题10本专业书+项目（或实习）===专业知识搞定c++知识(有空的话翻个10来本，...
我所经历的Android面试 概述 笔者是非计算机专业，15年毕业一直在小公司，觉得完全靠自学已经到了自己的天花板，然后想进大型互联网公司发展，所以年前辞职，放弃了年终奖，年后就直接来的北京，面试的公司有稳定的大公司，也有...
请教大家一个关于拓扑排序的问题(先谢了) ++k) /* 构造表结点链表 */ { scanf("%s%s",va,vb); i=LocateVex(*G,va); /* 弧尾 */ j=LocateVex(*G,vb); /* 弧头 */ p=(ArcNode*)malloc(sizeof(ArcNode)); p->adjvex=j; p->info=NULL; /* 图 */ p->nextarc=(*G)....
用程序写入到TREEVIEW 怎样在aspx实现象ie收藏夹那样的功能 主 题：怎样在aspx实现象ie收藏夹那样的功能？300分各位大侠，请问怎样在aspx实现象ie收藏夹那样的功能？菜单都放在这夹里，收放可以用按钮控制，谢谢了！回复人： houbinbin() ( ) 信誉：95 2002-10-24 17:08:14Z ...
这些年 真的，感觉很快，一眨眼的功夫，大三的时间就快过去了，这个学期说来真的很惭愧，本来是想写个操作系统的，可是实践却发现自己还有那么多不足，汇编的根底没打好，操作系统的概念没掌握好，保护模式更是云里雾里的。...
哥写的不是代码，是寂寞 发布日期：2009.08.17 作者：Anytao © 2009 Anytao.com ，Anytao原创作品，转贴请注明作者和出处。http://www.cnblogs.com/anytao/archive/2009/08/17/anytao-think-notcodebutalone.html 为什么我的眼里常含泪水...
综教楼后的那个坑用双向链表实现 描述
在 LIT 综教楼后有一个深坑，关于这个坑的来历，有很多种不同的说法。其中一种说法是，在很多年以前，这个坑就已经在那里了。这种说法也被大多数人认可，这是因为该坑有一种特别的结构，想要人工建造是有相当困难的。
从横截面图来看，坑底成阶梯状，由从左至右的 1..N 个的平面构成（其中 1 ≤ N ≤ 100,000），如图：
＊ ＊ :
＊ ＊ :
＊ ＊ 8
＊ ＊＊ ＊ 7
＊ ＊＊ ＊ 6
＊ ＊＊ ＊ 5
＊ ＊＊＊＊＊＊＊＊＊ 4 <- 高度
＊ ＊＊＊＊＊＊＊＊＊ 3
＊＊＊＊＊＊＊＊＊＊＊＊＊＊ 2
＊＊＊＊＊＊＊＊＊＊＊＊＊＊ 1
平面 ｜ 1 ｜2｜ 3 ｜
每个平面 i 可以用两个数字来描述，即它的宽度 Wi 和高度 Hi，其中 1 ≤ Wi ≤ 1,000、1 ≤ Hi ≤ 1,000,000，而这个坑最特别的地方在于坑底每个平面的高度都是不同的。每到夏天，雨水会把坑填满，而在其它的季节，则需要通过人工灌水的方式把坑填满。灌水点设在坑底位置最低的那个平面，每分钟灌水量为一个单位（即高度和宽度均为 1）。随着水位的增长，水自然会向其它平面扩散，当水将某平面覆盖且水高达到一个单位时，就认为该平面被水覆盖了。
请你计算每个平面被水覆盖的时间。
灌水 水满后自动扩散
| |
* | * * | * * *
* V * * V * * *
* * * .... * *~~~~~~~~~~~~*
* ** * *~~~~** : * *~~~~**~~~~~~*
* ** * *~~~~** : * *~~~~**~~~~~~*
* ** * *~~~~**~~~~~~* *~~~~**~~~~~~*
* ********* *~~~~********* *~~~~*********
*~~~~********* *~~~~********* *~~~~*********
************** ************** **************
************** ************** **************
4 分钟后 26 分钟后 50 分钟后
平面 1 被水覆盖 平面 3 被水覆盖 平面 2 被水覆盖输入
输入的第一行是一个整数 N，表示平面的数量。从第二行开始的 N 行上分别有两个整数，分别表示平面的宽度和高度。
输出
输出每个平面被水覆盖的时间。
vue-devtools chrome 插件 chrome（谷歌浏览器）vue代码调试插件， 已打包。解压后，通过chrome扩展程序加载即可使用。
使用方法：
1、chrome浏览器输入地址“chrome://extensions/”进入扩展程序页面
2、勾选开发者模式
3、点击“加载已解压的扩展程序...”按钮，选择解压后的chrome文件夹，即可添加成功。
4、添加完vue-devtools扩展程序之后，我们在调试vue应用的时候，ch
rome开发者工具中会看一个vue的一栏，点击之后就可以看见当前页面vue对象的一些信息
