[讨论]看看这个问题

尘生尘

这是什么问题呢？

..........

'将这些点写入记事本bb1中

Open "bb1" For Output As #2

Print #2, "查得主视图各点坐标如下："

Print #2, "共有："; m1 + 1; "点"

Print #2, "*****************"

For m = 0 To m1

Print #2, "第"; m + 1; "点的坐标为："

Print #2, "x="; mpoints(m, 0)

Print #2, "y="; mpoints(m, 1)

Print #2, "------------------"

Next m

Close #2

i = MsgBox("可读得的顶点数为：" & m1 + 1 & _

vbCrLf & "显示各点坐标？", vbYesNo + vbQuestion)

If i = 6 Then information.show

selset.Delete    '删除选择集

在  information.show这里出现编译错误，方法和数据成员未找到，这是怎么回事？

英雄无敌

方法和数据成员未找到，就是方法和数据成员未找到，还有怎么回事的吗？

没有就是没有