说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

图像在图片框中的滚动 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
图像在图片框中的滚动 -VB资料



在VB中可以用图片框来显示图像,若图片框放不下整个图像,通常只能显示图像的一部分,但是图片框没有提供滚动控制,无法浏览图像的其余部分。其实通过VB所提供的工具,可以非常方便地构造出图片框的滚动控制。其思想是提供一个显示区域和一整个图像区,将后者装在前者区域内,当用户改变滚动条位置时,通过程序来改变图像区的Top和Left的值,达到滚动图像的目的。具体操作如下:
新建一个标准EXE工程,在窗体上放置一个图片框Picture1,在Picture1上放置图片框Picture2,将两者的尺寸设为相同,可通过复制、粘贴实现,将Picture1的Autosize设为False,将Picture2的Autosize设为True,再放置垂直、水平滚动条各一个,设计窗体显示如下:

在Picture2中装入要显示的图像,因其Autosize属性为True,所以Picture2的尺寸即为图像的尺寸,Picture2.scalewidth减去Picture1.scalewidth的大小即为Hscroll1的Max值,Picture2.scaleheight减去Picture1.scaleheight的大小即为Vscroll1的Max值,Min值均设为0,在 Vscroll1的Change和Scroll事件中添加如下代码:Picture2.top=-vscroll1.value,在Hscroll1的 Change和Scroll事件中添加如下代码:Picture2.left=-hscroll1.value,将滚动条的Smallchange和 Largechange设为你认为合适的值,按F5运行程序,你就可以通过滚动条来方便地浏览整个图像了。
在运行时维护DBGRID的栏位宽度-VB资料 VB怎样使用VB开发基于Sybase的C/S软件 VB怎样在运行时动态生成多个相同的控件 直接编辑VB中网格控制项的两种方法 自制控件方面的有关知识-VB资料 Unicode vs Ansi -VB资料 VB 中调用 Word 拼写检查 VB4.0安装程序的汉化 VB中对字符串的处理及其扩展 把符串中的一子串替换为另一子串 -VB资料 把数字转成英文字-VB资料 翻转一个字符串-VB资料 混合字符串的长度 -VB资料 将阿拉伯数字转成中文字的程式 -VB资料 将包含有Null结尾的字符串转换为VB字符串 切分字符串-VB资料 清除字符串中指定的字符 -VB资料 VB如何取得计算机的所有字型? VB如何取得中英混合字符串的长度? 使VB的网格控件具有输入功能 VB如何使用未安装的字体? VB如何由两个ASC码(区位码)复原成一个汉字? VB如何转换C代码中的高字和低字 一些字符串操作的问题和回答 -VB资料 VB怎样把VC++代码转换成VB代码 字符串中包含双引号-VB资料 字符串中文的问题 -VB资料 巧用CLIPBOARD建立图像数据库-VB资料 在VB中存取数据库中的图片 Access97的报表解决方案-VB资料 Access下如何使用通用对话框-VB资料 请问C标准函数里是否有这样的函数,可以删除文件名相同但忽略扩展名的函数,如可以同时删除A1.LIN和A1.SA?谢先!!! 如何修改硬盘序列号(不是卷序列号,而是出厂序列号)? MS EXCHANGE SERVER 2000 在WEB页面更改MAILBOX的密码 关于string的简单问题 String和StringBuffer的具体区别是什么? 请问哪里有<<com原理与应用 >>电子书下载?谢谢 高级问题:如何实现在应用程序中动态布置控件。(分数不是问题) TList问题 请问: 我进不了windows2000 advanced server!!怎么办? 北京程序员俱乐部的相关问题 如何修改硬盘序列号(不是卷序列号,而是出厂序列号)? 请问C标准函数里是否有这样的函数,可以删除文件名相同但忽略扩展名的函数,如可以同时删除A1.LIN和A1.SA?谢先!!! 如何用DAO调用MSSQLSERVER中的存储过程获得结果集? sybase的字符串连接符是哪个 如何取得上网ip?(不是本地IP),在局域网中,客户机通过主机代理上网,能否确定客户是否连在网上? 请问网络高手--怎样知道对方的物理地址(知道对方的IP)??? 图片存在数据库中,在asp页上如何让其显示出来!? 如何把文件或图片以Blob类型存入Oracle数据库,并在JSP中把数据库中的Blob数据以最初的文件格式读出来??? 如何把文件或图片以Blob类型存入Oracle数据库,并在JSP中把数据库中的Blob数据以最初的文件格式读出来??? 请问大伙《TCP/IP详解》1,2,3卷----机械械工业出版社,是否值得购买?翻译的怎么样? CRYSTAL REPORTS DEVELOPER EDITION VERSION 哪里有下? 如何控制excel中的图表? 我想在我彻底陷去之前再清醒的看看这个世界..... 十万火急!!!IIS报HTTP 500的错误。 select时间段问题 请推荐uml方面的好书!! CreateWindow和MFC的CFrameWnd::LoadFrame产生的窗口的区别?? 在pb中用SetPicture(lb_image)当lb_image为空时picture的图片不变 有一段代码破不理解?谢谢! 在pb中用SetPicture(lb_image)当lb_image为空时picture的图片不变 用JAVA开发企业MIS系统,需要注意那些? 怎么在没有资源的项目里加入菜单资源?(急) 有一段代码破不理解?谢谢! 如何动态设置一个字段的类型。例如:下拉型,EDIT型,EDITMAST型。急用!!! 试问DELPHI中的线程是一个什么样的概念? need acdsee for linux 汇编火焰源程序,谁要,请留下Email。。。。 我在98下安装完JRUN3。0后做完的JSP网页应放在哪个目录下。急急急!!! 一个我觉得不可能实现的任务。请大家探讨!!!谢谢 在SQL表中如何得到不带年月日时间信息? 为什么要换页? 再问一个关于Delphi中处理字符串的问题 请问unix下是否支持文件流操作 fstream <<,>> 哪位老大给讲讲AVI中音频使用MP3压缩的标准及解压标准啊 need winzip for linux? 请问如何在ASP中实现FTP传输?紧急! need winimg for linux? need ie for linux? 哪有PowerDesigner 9正式版下载的? 怎样移除控件的事件? 已知关于x的多项式(m-2)x的5次方-x的(n+1)+4x+n次数是4,项数为3,求(m-n)的n次方的帮帮忙;今晚就要的。 已知一元二次方程x的平方+(m-2)x+4m=0的一个根为x=-1,求方程的另一个根. 我想知道四年级奥数题以及答案、必须有算式、跪求 已知方程组x-y=2,mx+y=6方程组有非负正整数解,求正整数m,和方程的解如上 our school is in the centre of the city同义句it rains a lot in thailand同义句 我今年a岁,爸爸比儿子大30岁,再过10年父子年龄之和是多少?怎样做 关于x,y的方程组x-y=2 ,mx+y=6有非负整数解.求正整数m? I study in a secondary school in our city.Everyone kowns it is very-----.The school now has about 3323 students ,------ sina*cosa=1-cos2a 求tana的值? 请问10平方米是不是等于100平方厘米 our school is in the centre of the city(改为同义句)our school is in ____ of the city 想象作文600字 3个连续自然数中必定有一个是3的倍数,名师请入,不懂勿入. 英语翻译:我们的公寓里市中心很近 our flat ____ ____ _____ the center of the city. 一篇想象类作文,600字假如我会七十二变 my mather's last sunday 英语作文初二英语作文急 方程x+y=1,x-y=9的解集是(5,4)为什么答案上写的是{(5,4)} .这不是方程组的解集吗.为什么是集合? 若关于x的一元二次方程x^2-6x+k+1=0有两个相等的实数根,则k的值为 m为正整数,已知二元一次方程组mx+y=10,3x-y=0有整数解,即x,y都为整数,求m的值是多少? 英语翻译 若关于X一元二次方程x^2-6x+k+1=0有两个相等的实数根,则K的值为 已知关于x y的二元一次方程组mx+2y=8,3x-2y=0的解事正整数,试分析正整数m的值,并写出对应方程组的解 there are ----teachers in our school .Atwo hundreds and thirty-four B two hundreds thirty-four C Atwo hundreds and thirt four D two hundred and thirty-four 应该选哪个为什莫B C D 这三个选项 都哪里错了 已知椭圆的中心在原点,焦点为F1(0,负的二倍根号二),且离心率e=三分之二倍根号二,求椭圆的方程 关于很忙的英语作文 I had a busy day last sunday there are 45 man teachers in our school改错 1.sina+cosa=(√2)/2(0 how did you spend last sunday 写一篇八年级上册的英语作文 There are about two h-----teachers in our school 关于想象的600字作文 英语作文:Last Sunday's picnic 101+103+105+……+199 =100*100-50*50 =7500 要是对?那这里为什么要减50的平方呀?不是应该 想象作文 600字 My Last sunday英语作文(七点半起床,早饭后骑车去孤寡老人张大爷家, 101平方加199平方简便运算等于多少 大自然想象作文600字小学六年级第一单元作文 快 急! 自然数中所有5的倍数都是() 谁的平方等于199 《幻想.》 作文600字、正常一点的 随便写, 有一类自然数,其中每一个数与5的和都是9的倍数,与5的差是7的倍数.这类自然数中从小到大排列的第10个是 . 一只青蛙在10米深的井底,它每小时往上爬1米后,要下滑0.6米.问:这只青蛙几小时才能爬到地面? 如果方程组x+y=1,ax+by=c有唯一的解,那么的abc值应满足 有一类自然数,其中每一个数与5的和都是9的倍数,与5的差都是7的倍数没写完:按从小到大的顺序写出这类自然数中的前三个 已知现在父亲比儿子大30岁4年后父亲年龄是儿子的4倍现在父子各是几岁 如果x=2,y=-2是方程组ax+by=1,ax-by=5的解,求a,b的值. 在方程ax+by+=0中,当x=2时,y=-3;当x=-3时,y=4,求a-b的值.ax+by+3=0 our school is a big nice school 的一般疑问句 已知中心在原点O,焦点F1、F2在x轴上的椭圆E经过点C(2,2),且抛物线y^2=(-4根号 6) x已知中心在原点O,焦点F1、F2在x轴上的椭圆E经过点C(2,2),且抛物线y^2=(-4根号 6) x(Ⅰ)求椭圆E的方程 英语翻译 This is our school 的一般疑问句并作否定回答怎么改? 已知m是整数,方程组{4x-3y=6,6x-my=26有整数解,是-哟不是+哟 已知关于x的一元一次方程ax+b=0的解为x=-2,则直线y=ax+b ( )A.与x轴交点的纵坐标为-2B.与y轴交点的纵坐标为-2C.与y轴交点的横坐标为-2D.与x轴交点的横坐标为-2 已知tana=2,则cos2a/(sina-cosa)^2=? 有20个连续自然数,其中所有是3的倍数的数的数相加是168.这20个数中最大的是多少? 已知关于x的多项式(m-2)x的5次方-x的n次方-1+4x-n是四处三项式,求(m-n)的n次方 一班和二班共植树270棵.一班植的树是二班的2倍.一班和二班各植树多少棵. There is a park near our school改成一般疑问句怎么改? 已知关于x的多项式(m-2)x的5次方-x的(n-1)+4x+n次数是4,项数为3,求(m-n)的n次方的值悬赏会在答题后给,对不起啦~ Our parents come and around our school 我们的父母过来参观我们的学校 这样翻译对吗? he is a good student in our school改为一般疑问句和否定句不急,看到能回答就好.
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘