作者MOONRAKER (㊣乌笨秃，又笨又秃)
看板Visual_Basic
标题Re: [VB6 ] VScroll1
时间Mon Jun 30 21:48:32 2008
※ 引述《BlueFeel (蓝色感觉)》之铭言：
: 我的照片大於Frame大小,
: 最多只能放原图的1/2大小
那就在load的时候把picture的大小调成跟图片一样大。
: 所以想利用Hscrol的卷动,来看那另外的1/2
: 我试过您的方法,有卷动的效果,但是没办法看.....另外1/2
我实际试过了，并无问题
做法不脱这样
Private Sub VScroll_Change()
Image1.Top = -VScroll.Value
End Sub
Private Sub HScroll_Change()
Image1.Left = -HScroll.Value
End Sub
没什麽特别难的。
把你程式的重要部份贴上来看看。
--
BATCH 1 (4/20) - 如何隐身 - SPAM - 英国杀人笑话 -
http://tinyurl.com/65vvbx
BATCH 2 (5/10) - 当众脱裤 - 主教 - 傻蛋奥运会 -
http://tinyurl.com/68grk7
BATCH 3 (6/14) - 买张床 - 切达大侠 - 伐木人之歌 -
http://tinyurl.com/3zpyx5
▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
■ 蒙帝派松正体中文计画 ■ Spam-a-lot and enjoy the pythonesque delight!
▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.115.202.131
1F：推 BlueFeel:是用image喔?不是用picture box喔?成功了~我用错了~~ 06/30 21:54
2F：→ BlueFeel:谢谢~ 06/30 21:54
3F：→ MOONRAKER:呃…其实是因为我用VBA只有image好用…VB6.0忘记装… 06/30 23:36
4F：→ MOONRAKER:真是不好意思 XD 06/30 23:37
※ 编辑: MOONRAKER 来自: 59.115.202.142 (06/30 23:37)