UC知道VB+MO：valid object expected as argument
来源：百度知道 编辑：UC知道 时间：2024/05/26 05:55:24
是用VB+MO打开ESRI的SHAPE文件
功能设计为读取----拓扑关系建立----点匹配----线匹配
我用的MO2.2
现在在图层设置时出错：“实时错误5000，valid object expected as argument”
求助各位大侠！
部分程序如下：
打开：
Private Sub open_Click()
Dim i As Long, N As Long
Dim laynum As Integer
Dim layer As MapObjects2.MapLayer
Dim recs As MapObjects2.Recordset
Dialog1.InitDir = App.Path
Dialog1.Filter = "Pictures(*.shp)|*.shp"
Dialog1.Action = 1
If Dialog1.FileName = "" Then
Exit Sub
End If
dc.Database = Dialog1.FileName + "\..\"
If Not dc.Connect Then
MsgBox "在指定的文件夹下没找到图层数据文件！"
End
End If
LayerSet（******************注：在这里开始转到图层设置程序块！！！！）
Map1.Refresh
省略若干
End Sub
*******************************************************
然后这里是图层设置
在LAYER SET 那里出错
Private Sub LayerSet() '图层设置模块
Dim i
大二、大三期间,他担任化工学院学生会主席。任职前，老师曾经说：不是荣誉而是责任。确实，对于一个毫无学生会工作经验的人来说，这个担子确实不小。但是，在困难面前无非两种结果——征服或者被征服，而人要进步就必须要克服困难。工作不熟悉可以学，工作的宗旨要明确——为同学；同事不熟悉可以交，态度要正确——凭诚心。很快，化工学院学生会就成为了一个凝聚的团队——承校级大型活动，举办院里特色活动，红红火火。阶段性的，扬玉斌还带领干部们走访化院的同学寝室，既树立了学生会的正面形象，更重要的是了解了广大同学对活动的意见，对学生会的看法，为下一步工作的改善提供方向。年终，化院学生会被评为校优秀学生会，他本人也被评为校优秀学生会干部，校优秀共青团员。
大四期间，扬玉斌同学当选为大连理工大学第二十九届学生会主席。之前，曾有老师提醒他：化工学院的主席是要市内、校部来回跑的。但，既然得到了老师同学的信任，就要想办法打消他们的顾虑。他给自己定了任务——每天回校部，让刚刚上任的学生干部们感到，主席一直在他们身边，可以随时找到，他做到了。他认为这一切是值得的，应该的，也是最基本的，因为作为一个主席，他的责任不仅仅是自己吃点苦。在校会这段时间做的最多的是引导校会的和院会的学生干部树立踏实的工作精神，维护大局的观念，维护校园环境的和谐。他坚决抵制做活动拉观众，如果活动本身做的没有意义，不吸引同学就不作，但在本科教学水平评估期间以及其他类似的场合，他积极给院系作工作，保证现场热烈的氛围。针对校园宣传环境杂乱无章，本学期他从每一个调幅、喷板去把握，严格执行预约制度。现在，他马上就要离任了，他在工作期间的工作宗旨，和流程、制度方面作的工作还是具有一定意义的。
大二、大三期间,他担任化工学院学生会主席。任职前，老师曾经说：不是荣誉而是责任。确实，对于一个毫无学生会工作经验的人来说，这个担子确实不小。但是，在困难面前无非两种结果——征服或者被征服，而人要进步就必须要克服困难。工作不熟悉可以学，工作的宗旨要明确——为同学；同事不熟悉可以交，态度要正确——凭诚心。很快，化工学院学生会就成为了一个凝聚的团队——承校级大型活动，举办院里特色活动，红红火火。阶段性的，扬玉斌还带领干部们走访化院的同学寝室，既树立了学生会的正面形象，更重要的是了解了广大同学对活动的意见，对学生会的看法，为下一步工作的