以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个怎么不能执行？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=30821)
--  作者：小星星
--  发布时间：2013/4/4 12:53:00
--  这个怎么不能执行？

怎么就通不过呢？那位大师指示一下？


图片点击可在新窗口打开查看此主题相关图片如下：未命名.jpg
图片点击可在新窗口打开查看
--  作者：小星星
--  发布时间：2013/4/4 12:57:00
--  

那位老师测试一下。这第一个练习呢？怎么回事呢？

Dim stn As new List(of String)
stn.Add("我在学新增")
stn.add("我再增加一个")
stn.Add("再增加一个")
stn.add("用来删除的")
stn.remove("用来删除的")
stn.RemoveAt(0)
stn.Insert(3,"电视机")
stn.Insert(1,"电视机")
stn.Insert(2,"电视机")
Output.show(stn.count)
--  作者：小星星
--  发布时间：2013/4/4 14:04:00
--  

那位老师测试一下。这第一个练习呢？怎么回事呢？
--  作者：布莱克朱
--  发布时间：2013/4/4 14:10:00
--  
你的这个超过范围了,检查下.

Dim stn As new List(of String)
stn.Add("我在学新增")
stn.add("我再增加一个")
stn.Add("再增加一个")
stn.add("用来删除的")

stn.remove("用来删除的")
stn.RemoveAt(0)

stn.Insert(2,"电视机")
Output.show(stn.count)


到这样是  3个长度.
[此贴子已经被作者于2013-4-4 14:16:30编辑过]
--  作者：小星星
--  发布时间：2013/4/4 16:24:00
--  
超过范围 是噻意思？请多指导。超级菜鸟入门。。。
--  作者：小星星
--  发布时间：2013/4/4 16:28:00
--  
stn.Insert(3,"电视机")   这里出错了。谢谢。
--  作者：e-png
--  发布时间：2013/4/6 14:47:00
--  

这样不会报错了，你懂得的：

 

Dim stn As new List(of String)
stn.Add("我在学新增")
stn.add("我再增加一个")
stn.Add("再增加一个")
stn.add("用来删除的")
stn.remove("用来删除的")
stn.RemoveAt(0)
Dim s As String = "stn.Insert(3,""电视机"")"
Dim n As Integer = s.Indexof("(")

If stn.count >= "stn.Insert(3,""电视机"")".Substring("stn.Insert(3,""电视机"")".Indexof("(")+1,1)
    stn.Insert(3,"电视机")
ElseIf  stn.count >= "stn.Insert(1,""电视机"")".Substring("stn.Insert(1,""电视机"")".Indexof("(")+1,1)
    stn.Insert(1,"电视机")
ElseIf  stn.count >= "stn.Insert(2,""电视机"")".Substring("stn.Insert(2,""电视机"")".Indexof("(")+1,1)
    stn.Insert(2,"电视机")
Else
    Return "你要插入的位置不存在"
End If

Output.show(stn.count)