html在线预览 Visual Basic中实现带预览的对话框

Visual Basic中实现带预览的对话框  

　　用户在图片框中选择图片时 希望预先对图片的轮廓及大小有初步了解 但是VB的通用对话框没有预览的功能 为此需要定制一个自定义对话框 我们可以通过image控件加入窗体中来实现其功能

　　程序示例

　　程序功能说明

　　在窗体的file 中选择一个图片文件 点选 预览 复选框 image控件就显示相应的图片 label 就显示该图片的大小

　　新建一个工程 加入以下控件

　　控件 名称 属性

　　form form borderstyle=

　　(vbsizedouble)

　　caption= 图片预览对话框

　　drivelistbox drive

　　dirlistbox dir

　　filelistbox file pattern= ＊ bmp;

　　＊ jpg;＊ gif

　　image image stretch=true

　　checkbox c value= 预览

　　mandbutton cmd caption= 确定

　　cmd caption= 退出

　　label lab caption=

　　源代码