Private Sub Form_Load()
Timer1.Interval = 100
HScroll1.Max = 10000
HScroll1.Min = 0
End Sub
Private Sub Timer1_Timer()
Picture1.Left = Picture1.Left + 50
If Picture1.Left > 10000 Then Timer1.Enabled = False: Exit Sub
HScroll1.Value = Picture1.Left
End Sub
vb6.0 滚动条调整打印在picturebox的文字上下滚动
方法有二：法一：多次执行Print语句，每一个Print语句右面是一行的内容。法二：在需要换行的地方加上“&vbCrlf&”。例如我要输出“欢迎使用！MicrosoftWindows”则语句为Picture1.Print"欢迎使用！"&vbCrlf&"MicrosoftWindows"
vb中怎样让图片框中的内容随着滚动条滚动?
很简单 先设置最小值 最大值 然后在水平滚动条的Scroll事件中写这个代码 Image1.Left=-HScroll.val 这样就可以了 ，如果你要源码 就把邮箱给我 然后把我提交为最佳答案 我会在两天内给你发过去的 不过我希望你自己能完成这个
vb中图片框画满了,怎么让它继续自动向左移?
时间同步，要一个Timer控件。控件中的命令就是图片框的移动，用的是它属性中的(image.left)值随时间递减，减大就跑得快，减小就慢。但这还有一个问题，就是它在移向左边对不，右边框那不就断开了，所以在它移动时我们再加入一个和它左移的步长对等的右边框加宽(image.width)注移动和加宽要对等，...
VB中 怎么让图相框闪烁出现,如何让滚动条控制图片闪烁的速度
你可以把图片的名称改为数字的，如：1.jpg 然后用:b=取随机数（，）图片框.图片 = 读入文件("d:\\image\\” 到文本（b） “.jpg")这样。图片框就可以换图片了。或者在你的程序加一个列表框。然后把所有的图片名称写到一个文本文件里，列表框通过读取这个文本文件把这些图片的名称加入到列表框里，...
VB6,矩形窗口后有一个大图板,其上用line( )命令画图,并可放大缩小和上下...
line( )命令，就不用介绍了。使用容器的概念，加滚动条：我给你一个水平移动的饿例子，自己看。
vb中图片框画满了,怎么让它继续自动向左移?
控件中的命令就是图片框的移动，用的是它属性中的(image.left)值随时间递减，减大就跑得快，减小就慢。 但这还有一个问题，就是它在移向左边对不，右边框那不就断开了，所以在它移动时我们再加入一个和它左移的步长对等的右边框加宽(image.width) 注移动和加宽要对等，要不就会出现图这样： ...
在VB6.0中,滚动条如何使用在PictureBox 控件中?
首先给工程(Project)添加一个OCX控件，单击选单上的工程(Project)选单项，在弹出的下拉选单中点击组件(Components)，选中其中的"Microsoft Common Dialog Control 5.0"，确定完成加载工作；然后画一个PictureBox，采用VB提供的默认名字Picture1, 再在Picture1上面画一个PictureBox，默认名字为Picture2，注意...
vb中图片框画满了,怎么让它继续自动向左移?
控件中的命令就是图片框的移动，用的是它属性中的(image.left)值随时间递减，减大就跑得快，减小就慢。 但这还有一个问题，就是它在移向左边对不，右边框那不就断开了，所以在它移动时我们再加入一个和它左移的步长对等的右边框加宽(image.width) 注移动和加宽要对等，要不就会出现图这样： ...
vb中图片框的move方法
可以移动位置 也可以改变大小 4个参数如图所示
vb6中 怎么给窗体添加垂直滚动条?
Picture1.Top = 0 '放一个图片框一和滚动条,再将图片框二放在图片框一的里面,拉大图片框二使它比一大,其它控件放在图片框二中 Picture1.Left = 0 Picture1.Width = Me.ScaleWidth - VScroll1.Width Picture1.Height = Me.ScaleHeight - HScroll1.Height VScroll1.Height = Picture1.Height ...
