我想请教一个VB方面的问题!

[madworld]

Static a, b, s
s = s + 1
If s = 1 Then
a = Image1.Width
Image1.Width = a
b = Image1.Height
Image1.Height = b
Else
Image1.Width = a
a = Image1.Width
Image1.Height = b
b = Image1.Height
End If
Image1.Width = a + HScroll1.Value
Image1.Height = b + HScroll1.Value
End Sub
大家看这段代码,其中选择语句里的a = Image1.Width
Image1.Width = a
else
Image1.Width = a
a = Image1.Width
end if
我怎么就是看不懂什么意思,有谁能指点指点我吗?

[东方之珠]

像是图像浏览器的代码，但是我看不懂。

[东方之珠]

像是图像浏览器的代码，但是我看不懂。

[CrazyNPC]

你问的那个选择语句中的意思是说
当该程序段第一次运行的时候就把图片的原始宽度初始化给了a,以后执行的时候都是用原来图片的大小再加上滚动条的value
其实a中的值一直都没变，你看看是不.
b的情况和a一样

[madworld]

那A的值不变,图像怎么改变大小呢????

[CrazyNPC]

a的值不变但图片的宽度是变的啊就这句代码Image1.Width=a+HScroll1.Value

[madworld]

那为什么在IF THEN里面还要Image1.Width = a
a = Image1.Width
这样反复表示呢

[砸死牛顿的苹果]

那你去掉 再试试看

[CrazyNPC]

其实我感觉。这个程序根本没有必要那么写，你是在哪看到的程序？这个程序运行的时候a和b始终保存的都是原来图片的宽度和高度，你考虑考虑是不是。第一次执行的时候把图片原始宽度，高度给a和b然后又把刚分别给a和b的值重新给了宽度和高度，然后执行下面的
Image1.Width=a+Scroll1.Value
Image1.Height=b+HScroll1.Value
当第2次执行的时候s=s+1那么s<>1了，那么就执行
Image1.Width=a
a=Image1.Width
Image1.Height=b
b=Image1.Height
这个他是先把静态变量a和b中的值先分别给宽度和高度，然后再把改回原来宽度和高度又重新给了a和b然后又是
Image1.Width=a+Scroll1.Value
Image1.Height=b+HScroll1.Value
执行后a和b中保存的值不还是没变么，以后执行不也是这个意思么。你看看是这个事不，也许我分析错了。现在晚上头脑比较晕，你考虑考虑