首先给工程(Project)添加一个OCX控件，单击选单上的工程(Project)选单项，在弹出的下拉选单中点击组件(Components)，选中其中的"Microsoft Common Dialog Control 5.0"， 请楼主参考： http://www.programfan.com/article/1454.html http://zhidao.baidu.com/question/60733718.html?si=1
一个控制红灯变黄灯
另一个控制黄灯变绿灯
两个滚动条分别控制两个Timer
当一个Timer执行完图片的切换后就这个Timer的Enabled属性设置为False
另一个Timer的Enabled属性设置为True
不过比较麻烦，各种衔接要处理好~
VB如何为picturebox加滚动条?
为了解决上述问题，我们可以在图片框(PictureBox)内部加上水平和垂直滚动条，利用滚动条来显示看不到的图片。具体方法如下：首先给工程(Project)添加一个OCX控件，单击选单上的工程(Project)选单项，在弹出的下拉选单中点击组件(Components)，选中其中的"Microsoft Common Dialog Control 5.0"， 请楼主...
vb中 怎么样给picturebox加滚动条?
你先添加1个picturebox1作为容器，然后在这个picturebox1里添加picturebox2，现在对你来说，picturebox2是你真正需要的picturebox，然后加垂直滚动条VScroll1，利用VScroll1的Value属性，去改变picturebox2的Top属性，就可以达到你的目的了。比如，减少picturebox2的Top值，就向上，增加picturebox2的Top属性...
关于VB窗体添加滚动条
滚动条,picturebox在工具栏里面都有,你把它们各添加一个然后把窗体控件放到picturebox中,只要全选一下,剪切放进去就行了然后在滚动条中写移动picturebox的代码就行了,别告诉我你不会移动控件
在VB6.0中,滚动条如何使用在PictureBox 控件中?
Re: 如何获得PictureBox控件大小 得到图片大小：CBitmap bitmap;BITMAP bmp;bitmap.LoadBitmap(IDB_BITMAP);bitmap.GetBitmap(&bmp);int nWidth=bmp.bmWidth;int nHeight=bmp.bmHeight;设置图片：HINSTANCE hInst=AfxGetInstanceHandle();((CStatic*)GetDlgItem(IDC_PIC))->SetBitmap(LoadBitmap(hIn...
VB如令图片跟着滚动条移动而移动
'这里图片用Picturebox显示 Private Sub Form_Resize()HScroll1.Max = ScaleWidth - Picture1.WidthHScroll1.Min = 0HScroll1.LargeChange = Picture1.WidthHScroll1.SmallChange = Picture1.Width \\ 10On Error Resume NextHScroll1.Value = Picture1.LeftEnd SubPrivate Sub HScroll1_Change()...
VB窗体加滚动条的问题
'解决窗体加滚动条问题，一个VScroll1，2个Frame，Frame2在Frame1上面 '控件数组Label1(0)在Frame2上面 Option Explicit Dim N As Integer Private Sub Command1_Click()On Error Resume Next Dim i As Integer, lngLabelH As Long, lngLabelTop As Long lngLabelH = Label1(0).Height + 100...
一道VB编程题,如何设计使图片随水平和垂直滚动条上下左右移动?请给出具...
这个简单啊~！首先你要把PictureBox放在一个容器中，强烈推荐使用PictureBox作为容器。也就是在PictureBox中画子PictureBox。这样比较好操作。也便于你日后的处理！~废话不多说。假设Picture2是Picture1的容器，水平滚动条的名称为HSX，垂直滚动条名称为VSY。那么代码可以这样写：Private Sub Form_Load()Pi...
VB编程 如何打印带有垂直滚动条的picturebox里边的图片?方法、代码?
建议方案：先定义个BMP变量=PictureBox.Image 然后在BMP中添加check textbox等控件的内容，再将BMP打印出来。
怎样在vb窗体中加滚动条?
因此，窗体自己想做成带滚动条的不太容易，但此时可以借助这两个容器来帮忙，过程是这样，在窗体上加一个PictureBox，设置它的高，宽和窗体一样，背景色也一样，并把它的BorderStyle设为0因此就看不出窗体上有个PictureBox了，这时把你想要加的控件都加到这个PictureBox上就行了，然后在窗体上加上...
在VB中怎么样使得图片框随水平滚动条进行伸缩呢?呢?
如果是Image控件就很容易实现，如果是PictureBox控件就比较麻烦一些，要用PaintPicture方法重画才能使图片改变宽度。下面是Image控件的实现方法：Private Sub Form_Load()Image1.Stretch = True Image1.Width = HScroll1.Width HScroll1.SmallChange = 60 HScroll1.LargeChange = 600 HScroll1.Max = ...
