Question

VB中with语句的使用问题

在with嵌套的语句中，如何使用上一级的对象，如：
with a
.name="124"
.width=100
with .size
.x=a.with*0.01
.y=a.with*0.02
end with
end with
我如何在with .size内部直接引用a对象

Answer 1

dim tempSize as double ' 先定义一个变量
with a
.name="124"
.width=100
tempSize = .size '?你要的是不是这个对象？
with .size
.x=tempSize *0.01
.y=a.tempSize *0.02
end with
end with

Answer 2

把第一个end with提前到第二个with语句前面。

Answer 3

with a
.name="124"
.width=100
with size
.x=a.name*0.01
.y=a.width*0.02
end with
end with