杭州交通信息网小班撕纸活动设计意图:在VB6.0中，滚动条如何使用在PictureBox 控件中？
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/20 08:56:55
PictureBox 控件有没有自带滚动条？
如果没有，怎样插入滚动条控件？
该怎么完成，请说清楚一点。
如果没有，怎样插入滚动条控件？
该怎么完成，请说清楚一点。
建立Picture1，AutoSize设为False。
在Picture1内（注意！）建立Picture2，AutoSize设为True，载入图片。
自己添加HScroll和VScroll控件上去。
设置HScroll控件：
.Max=Picture2.Width-Picture1.Width
.Min=0
相似设置VScroll：
.Max=Picture2.Height-Picture1.Height
.Min=0
为HScroll编写Scroll事件过程：
Picture2.Left=-HScroll.Value
为VScroll编写Scroll事件过程：
Picture2.Top=-VScroll.Value
大致就是这样了，手头没有VB，不能运行测试，代码里可能会有些小问题，你可以自己参考些资料改进一下。
共同进步！
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(hInst, MAKEINTRESOURCE(IDB_BITMAP)));
获得控件的大小
CRect rect;
GetClientRect(&rect);
关注