14

求助,想把随机抽取的图片交替在图片框1和图片框2中显示,每秒交替一次,一定时间后终止,...

 2 years ago
source link: https://bbs.csdn.net/topics/399172963
Go to the source link to view the article. You can view the picture content, updated content and better typesetting reading experience. If the link is broken, please click the button below to view the snapshot at that time.

求助,想把随机抽取的图片交替在图片框1和图片框2中显示,每秒交替一次,一定时间后终止,退出程序,

VB > VBA [问题点数:100分]

Private Sub UserForm_Initialize()
If Cells(1, 1) <> 0 Then Cells(1, 1) = 0
UserForm1.Image2.Enabled = False
UserForm1.Image2.Visible = False
Call aa
End Sub

Private Sub CommandButton1_Click()
Application.OnTime Now + TimeValue("00:00:01"), "aa", schedule:=False
End Sub

Sub aa()
Application.OnTime Now + TimeValue("00:00:01"), "aa", schedule:=True
Cells(1, 1) = Cells(1, 1) + 1
If Cells(1, 1) > 5 Then UserForm1.Image1.Visible = False
If Cells(1, 1) > 5 Then UserForm1.Image2.Visible = True
If Cells(1, 1) > 10 Then Application.OnTime Now + TimeValue("00:00:01"), "aa", schedule:=False
With UserForm1.Image2
.Picture = LoadPicture("d:\" & Int(11 * Rnd + 1) & ".jpg")
.Move 120, 10, 100, 100
.PictureSizeMode = fmPictureSizeModeStretch
End With
With UserForm1.Image1
.Picture = LoadPicture("d:\" & Int(11 * Rnd + 1) & ".jpg")
.Move 10, 10, 100, 100
.PictureSizeMode = fmPictureSizeModeStretch
End With

End Sub

标题你想做一件事情,内容是你做这件事情的代码。
属于炫耀帖吧,CSDN的传统,这种帖子楼主要散分的。

引用 1 楼 脆皮大雪糕的回复:

标题你想做一件事情,内容是你做这件事情的代码。
属于炫耀帖吧,CSDN的传统,这种帖子楼主要散分的。

我炫耀,我一共100多分,散什么分,炫耀什么,上代码为了答题的人看着方便,你可以不回答,不要胡说八道,你没有回答问题的能力可以回避

引用 2 楼 roserice 的回复:

Quote: 引用 1 楼 脆皮大雪糕的回复:

标题你想做一件事情,内容是你做这件事情的代码。
属于炫耀帖吧,CSDN的传统,这种帖子楼主要散分的。

我炫耀,我一共100多分,散什么分,炫耀什么,上代码为了答题的人看着方便,你可以不回答,不要胡说八道,你没有回答问题的能力可以回避

是说你写了半天,都没人知道你问了什么!!!
你期望的是啥,代码执行起来情况是啥,什么地方不符合你的期望,啥现象。一句话做标题加一段代码,你舍不得码字,于是问题放了那么多天也没人回答不是么?

我有没有能力回答问题另说,你连问问题的能力都不足。

说来说去是你没这能力,是我舍不得码字?我码一万多字,那是浪费别人时间,这个道理我知道你不懂,所以给你讲讲,作人做事的道理,别找借口,有能力的话就解决问题,不能解决的话就靠边远离,

引用 4 楼 roserice 的回复:

说来说去是你没这能力,是我舍不得码字?我码一万多字,那是浪费别人时间,这个道理我知道你不懂,所以给你讲讲,作人做事的道理,别找借口,有能力的话就解决问题,不能解决的话就靠边远离,

得,我没能力伺候,您码字浪费您的时间,别人猜测你的想法时间不值钱。
祝你尽快解决问题。

匿名用户不能发表回复!

开始暂停按钮实现图片随机切换并显示在指定图像内_YO

点击开始按钮 图片在框图区域1中随机滚动 点击停止按钮 图片停止滚动并且展示在大框图区域2中 页面标签代码 功能实现 1:点击开始按钮的响应函数 3是定义的循环定时器 定时时间为20ms,其执行的功能是随机抽取图片, ...

对文件夹中的图片进行随机抽取,并放在另个文件夹下

rate=0.1#自定义抽取图片的比例,比方说100张抽10张,那就是0.1 picknumber=int(filenumber*rate)#按照rate比例从文件夹中取一定数量图片 sample = random.sample(pathDir, picknumber)#随机选取picknumber数量的样本图片 ...

精进:如何成为个很厉害的人--作者:采铜

文章目录精进:如何成为个很厉害的人序 用更勇敢的方式去生活01 时间之尺 我们应该怎样对待时间“全部的现在” 从当下出发,联结过去与未来那么,个人应该怎样对待时间呢?不同场合,不同的时间视角由当下向...

mst2

C/C++语言基础 extern 关键字作用 参考链接 extern声明变量或者函数时,它告诉编译器去其他文件寻找定义或者实现。 extern “C”的作用:为了实现C++、C的...修饰变量时表示的是个静态变量,全局数据区分配内存

随机抽取图片_weixin_30339457的博客

随机抽取图片 a = 3 var pp = Math.random(); var foot = Math.round(pp * (a-1))+1; function create() { this.src = '' this.border = '' this.alt = '' } b = new...

吴恩达课后编程作业Course 4 - 卷积神经网络 - 第二周...

原博客中作者用的是tf1.x版本的,本文用的是tf2.x版本 1 - Keras 入门 - 笑脸识别 本次我们将: 学习到一个高级的神经网络的框架,能够运行在包括TensorFlow和CNTK的几个较低级别的框架之上的框架。

linux_study_1

我有个文件abc.txt,我用bunzip2压缩工具进行压缩!... 5 insmod(installmodule)5 记mount NFS遇到的个问题(-o nolock)6 关于C语言结构体赋值(LINUX内核风格). 6 sprintf格式... 8 sprintf格式... 8 ...

R语言与统计分析

R语言与统计分析 汤银才 主编 高等教育出版社 二○○八年五月 内容介绍 本书以数据的常用统计分析方法为基础,简明扼要地阐述统计学...计分析的探索性数据分析、参数的估计与假设检验,还包括的非参数统计分

多张图片交替变换的实现方法---JS实现和flash实现_defo...

Pic[1]='图片路径'<-图片多的话继续加注意PIC后面的[]里面的数值-> //do not edit anything below this line vart; varj=0; varp=Pic.length; varpreLoad=newArray(); for(i=0; i...

操作系统 考研习题 详细解析(2)_Z_timer的博客

2)若文件为连续文件,则要读文件A的第487条记录至少要存取几次硬盘? 3)一般为减少读盘次数,可采取什么措施,此时可减少几次存取操作? 解2:注意:题目中说每个物理块放四个目录项,所以图片的1 2 3 4 5是这样子的,先访问前面的再...

博弈论集锦

 《新约马太福音》有这样个故事,个国王远行前,交给三个仆人每人锭银子,吩咐他们:“你们去做生意,等我回来时,再来见我。”国王回来时,第个仆人说:“主人,你交给我们的锭银子,我已赚了10锭。”...

CISCO技术(1.7万)

0 base|以零为基底\r\n 0 disturbed zero output signal|干扰0输出信号\r\n 0parallel communication cable|平行通讯传输缆线\r\n 1 binary operation|二进制运算\r\n 1 di

...图片框,显示一图片,当鼠标停留在图片框时,显...

/* (程序头部注释开始) * 程序的版权和版本声明部分 * Copyright (c) 2011, 烟台大学计算机学院学生 * All rights reserved. * 文件名称:该窗体中有一个图片框,显示一副图片。 * 作者: 雷恒鑫 * 完成日期: 2012 年 11 月 ...

JavaScript实现:点击图片使两张图片交替出现_有朝一日...

DOCTYPE html> 点击图片使两张图片交替出现 <!--获取图片对象--> var picture = document.getElementById("图片") var flag = true; <!--绑定点击事件--> picture.onclick = function () { if (flag) { picture...

Mencoder MPlayer 参数详解

MPlayer(1) 电影播放器 MPlayer(1) D>0>  mplayer - 影视播放器  mencoder - 影视编解码器 B>8>  mplayer [选项] [文件|URL|播放列表|-]  mplayer

android 知识点大全 面试

3G只是种通信技术标准,符合这个标准的技术有WCDMA、CDMA2000、TD-SCDMA三种制式。中国联通使用的是WCDMA(世界上大部分 3G网络都采用的是该标准) ;中国电信使用的是CDMA2000 (日、韩北美使用);中国移动...

前端在四个图片中随机显示一个_catherine的博客

//前端随机四个图片之一显示在分享有惊喜那里 randomPic() { this.tagHash = { //金钱 "1": { //随机生成的图片 suprizeUrl:"./js/assets/tag/jinqianShare.png", href:"",

用opencv在图片上画框,生成框在图片随机移动...

intisColor=1;//是否为彩色,大于0是,0是把图片转成灰度图(window系统才可能支持)intframe_fps=30;//帧速率为...(1000-random);//生成纵坐标的随机数Rectrect(random1,random2,random,random);//定义框的坐标及大小rectangle(...

java解惑

a Java 谜题 1 1 —— 表达式谜题 谜题 1 1 : 奇数性 下面的方法意图确定它那唯一的参数是否是个奇数。这个方法能够正确运转 吗? public static boolean isOdd(int i){ return i % 2 == 1; } 奇数可以被...

Android常见知识点

Android知识点

像计算机科学家一样思考(C++)

C++Pascal都是高级语言,你或许也听说过Java、CFORTRAN等其他高级语言吧。 从“高级语言”这个名字可以推断,应该同样存在低级语言,低级语言一般也称为机器语言或汇编语言。不严格地讲,计算

android----面试基础概括总结

3G只是种通信技术标准,符合这个标准的技术有WCDMA、CDMA2000、TD-SCDMA三种制式。中国联通使用的是WCDMA(世界上大部分 3G网络都采用的是该标准) ;中国电信使用的是CDMA2000 (日、韩北美使用);中国移动...

Android面试准备复习之Android知识点大扫描 .

3G,全称为3rd Generation,中文含义就是指第三代数字通信。 所谓3G,是指将无线通信与国际互联网等... 3G只是种通信技术标准,符合这个标准的技术有WCDMA、CDMA2000、TD-SCDMA三种制式。中国联通使用的是WCD

Android面试准备复习之Android知识点大扫描

该技术包括TD-LTEFDD-LTE两种制式(严格意义上来讲,LTE只是3.9G,尽管被宣传为4G无线标准,但它其实并未被3GPP认可为国际电信联盟所描述的下一代无线通讯标准IMT-Advanced,因此严格意义上其还未达到4G的标准。...

android面试基础总结

3G只是种通信技术标准,符合这个标准的技术有WCDMA、CDMA2000、TD-SCDMA三种制式。中国联通使用的是WCDMA(世界上大部分 3G网络都采用的是该标准) ;中国电信使用的是CDMA2000 (日、韩北美使用);中国移动...

Android知识点大扫描

Android知识点大扫描... 3G只是种通信技术标准,符合这个标准的技术有WCDMA、CDMA2000、TD-SCDMA三种制式。中国联通使用的是WCDMA(世界上大部分 3G网络都采用的是该标准) ;中国电信使用的是CDMA2000 (日、韩...

java---解惑--

Java谜题1——表达式谜题 谜题1:奇数性 下面的方法意图确定它那唯一的参数是否是个奇数。这个方法能够正确运转吗? public static boolean ...它四分之时间里返回的都是错误的答案。 <b

当和尚遇到钻石

他身商业界,实修清净行,特别是他具有高人一等的智能,将《金刚经》融会贯通,运用万法潜能,发挥商场的经营上…… 罗奇先生的道心坚定,虽然事业经营成功,但内心从来没有忘记自己是位修道者,他尊师重道,...

毕业答辩-毕业论文答辩PPT模板优秀范例.ppt

毕业论文答辩PPT模板优秀范例.ppt

毕业设计:基于Python的网络爬虫及数据处理(智联招聘)

基于Python的网络爬虫,爬虫目标网站为智联招聘,爬取内容为各职业的薪资、技能要求、工资地点等信息,爬取信息转换为散点图和柱状图,并加入了tkinter图形操作界面以增加毕业设计的工作量。 附带我的毕业论文、附带毕业论文、附带毕业论文,重要的事情说三遍。 这只是个简单得网络爬虫,大佬们无视就好,仅供大家参考,如果觉得可以请留言鼓励一下哈,有啥问题也可以留言,不定时查看。

Python疫情大数据分析之可视化分析、GIS地图及文本挖掘代码(博客前三篇)

该资源是针对这次肺炎疫情写个Python大数据分析系列博客,包括网络爬虫、可视化分析、GIS地图显示、情感分析、舆情分析、主题挖掘、威胁情报溯源、知识图谱、预测预警及AI和NLP应用等。希望该系列线上远程教学对您有所帮助,也希望早点战胜病毒,武汉加油、湖北加油、全国加油。待到疫情结束樱花盛开,这座英雄的城市等你们来。

基础性资源,希望对您有所帮助。

详见内容: [Pyhon疫情大数据分析] 三.新闻信息抓取及词云可视化、文本聚类和LDA主题模型文本挖掘 https://blog.csdn.net/Eastmount/article/details/104698926 [Pyhon疫情大数据分析] 二.PyEcharts绘制全国各地区、某省各城市疫情地图及可视化分析 https://blog.csdn.net/Eastmount/article/details/104437215 [Pyhon疫情大数据分析] 一.腾讯实时数据爬取、Matplotlib和Seaborn可视化分析全国各地区、某省各城市、新增趋势 https://blog.csdn.net/Eastmount/article/details/104298388

---------------------------------------------------------------

By:Eastmount CSDN

Java面试题大全(备战2021)

这本面试手册包含了Java基础、Java集合、JVM、Spring、Spring Boot、Spring Cloud、Mysql、Redis、RabbitMQ、Dubbo、Netty、分布式及架构设计等方面的技术点。内容难度参差,满足初中高级Java工程师的面试需求。

Lua语言从入门到精通

深入浅出Lua学习 深入浅出Lua学习

python大作业--爬虫(完美应付大作业).zip

python大作业分享--30多个项目任你选(由于上传大小限制分多个文件上传。爬虫:https://download.csdn.net/download/weixin_43960044/12533382小游戏:https://download.csdn.net/download/weixin_43960044/12533379),应付大作业完全没问题。内涵30多个项目,随意挑选。爬虫(爬抖音视频、下载B站视频、怕天气预报等)小游戏(五子棋、坦克大战、贪吃蛇、拼图等)。

18款表白网页源代码(表白)

18款表白网页源代码(表白),集合了经典款和合并3连款,直接可以发布到网站,来进行表白!!

冰河的渗透实战笔记-冰河(公众号:冰河技术).pdf

冰河整理的全网首个开源的以实战案例为背景的渗透实战笔记,全书共442页,共计37万字(不计空格)。整本书的内容涵盖:Kali基础、渗透工具、木马制作、钓鱼链接生成、爆破密码、内存溢出攻击、web渗透、数据提权、社会工程学。

汇编语言程序设计

汇编语言是一门低级程序设计语言,在数以千计的计算机语言中,有着不可替代的重要地位,广泛地用于开发操作系统内核、设备驱动程序等。随着近年来物联网、嵌入式系统的发展,汇编语言在行业中的地位也再次攀升,在2017年1月的TIOBE排行榜上,再次进入前十。对大多数学习计算机的人士而言,是理解计算机系统核心知识的一个桥梁,在人才培养中也起着特殊的作用。课程面向计算机初学者,介绍汇编语言程序设计基础的部分。 绍寄存器、内存、程序结构、模块化程序设计、中断等内容,课程重视对学习方法的指导和引导,提倡和支持用实践的方式开展学习,目标是培养学习者的自学能力和实践能力,以此支持对最新的汇编语言开发技术的学习。

Everything更新windows专用版2.0.zip

配套地址:https://bamboo.blog.csdn.net/article/details/110222153 (完美解决)升级win10,提示VirtualBox 立即卸载此应用,因为它与Windows 10 不兼容 解压之后打开目录文件的everything.exe,等待5-6秒检索完成,搜索virtualbox,全选删除所有文件(不删除的不用管),之后返回更新界面即可

基于Python网络爬虫毕业论文.doc

这是一份同学的爬虫的毕业论文,完整的。需要的赶紧拿走

Java 面经手册·小傅哥.pdf

这是一本以面试题为入口讲解 Java 核心内容的技术书籍,书中内容极力的向你证实代码是对数学逻辑的具体实现。当你仔细阅读书籍时,会发现Java中有大量的数学知识,包括:扰动函数、负载因子、拉链寻址、开放寻址、斐波那契(Fibonacci)散列法还有黄金分割点的使用等等。

适合人群

1. 具备一定编程基础,工作1-3年的研发人员 2. 想阅读 Java 核心源码,但总感觉看不懂的 3. 看了太多理论,但没有实践验证的 4. 求职面试,总被面试题搞的死去活来的

相关热词 c#子类调用父类构造方法 c#标记 c# gpio cmd编译c# c# 照片 识别 c#获取变量类型名称 c# sql数据库 连 c#全局静态属性 c# 解数独 c# 数组添加数

About Joyk


Aggregate valuable and interesting links.
Joyk means Joy of geeK