w_dexu的博客

单击表格中的图片放大显示再次单击或是单击其它图片复原需求表格中原始图片样子单击图片后表格及图片的样子实现的原理样例文件需求当表格中需要插入多张图片后，如查图片太大，不利于排版，太小查看时又不方便浏览，如果可以实现按行插入图片，需要查看图片时，自动将图片放大若干倍显示，再次点击或是点击其它图片时，图片自动复原，会比较方便，实现了排版与浏览效果的兼得。下面介绍一下实现这一需求的基本原理。表格中原始图片样子单击图片后表格及图片的样子实现的原理一、表格打开进，遍历图片，将各个图片加上一个OnActi

将图片控件中的图片保存为图片文件调用例子函数例子本例函数可以将图片控件中的图片，保存为多种图片文件格式，调用例子Dim FlName As StringFlName = Application.GetSaveAsFilename("二维码图片_" & Format(Now(), "yyyymmddhhmm"), "图片文件(*.jpg),*.jpg", , "保存二维码为图片")If FlName = "False" Then MsgBox "二维码图片未保存", vbInformatio