数电课程设计-电子数字钟.
数电电子钟课程设计

数电电子钟课程设计一、课程目标知识目标:1. 让学生掌握数字电路基础知识,特别是时序逻辑电路的原理和应用;2. 能够理解电子时钟的组成和工作原理,掌握电子时钟的设计方法;3. 学会使用常见数字电路元器件,如晶体振荡器、计数器、显示器件等,并能进行正确连接。
技能目标:1. 培养学生运用所学知识进行实际电子电路设计的能力,具备分析和解决实际问题的技能;2. 通过课程实践,提高学生动手操作能力,能够正确使用相关仪器和工具进行电子电路搭建;3. 培养学生团队协作和沟通能力,能够就设计过程中遇到的问题进行有效讨论和解决方案的提出。
情感态度价值观目标:1. 激发学生对电子科学的兴趣,培养积极探索、勇于创新的精神;2. 增强学生的环保意识,养成节约能源、爱护电子元器件的好习惯;3. 培养学生面对挫折和困难时,保持积极乐观的心态,勇于克服和解决问题。
课程性质:本课程为实践性较强的课程,旨在通过电子时钟的设计与制作,让学生将理论知识与实际应用相结合。
学生特点:学生具备一定的数字电路基础,对电子制作有较高的兴趣,但动手能力和实际问题解决能力有待提高。
教学要求:注重理论与实践相结合,充分调动学生的积极性,引导他们通过团队协作完成课程任务。
在教学过程中,关注学生个体差异,鼓励他们提出问题、解决问题,提高自主学习能力。
最终实现对课程目标的分解和达成。
二、教学内容本课程依据以下教材章节组织教学内容:1. 《数字电路》第四章:时序逻辑电路原理及其应用;2. 《电子技术》第三章:数字电路元器件及其特性;3. 《电子制作实践》第五章:电子时钟的设计与制作。
教学内容安排如下:1. 数字电路基础知识回顾,重点复习时序逻辑电路的原理和功能;2. 介绍电子时钟的组成,包括时钟振荡器、分频器、计数器、译码器、显示器件等;3. 讲解晶体振荡器的原理和选型,分析不同类型计数器的特点和应用;4. 实践操作部分,指导学生进行电子时钟的电路设计、元器件选型、电路搭建及调试;5. 依据课程进度,安排以下教学实践活动:a. 2学时:晶体振荡器实验,熟悉振荡器的工作原理和调试方法;b. 2学时:计数器实验,掌握不同类型计数器的连接和使用;c. 4学时:电子时钟设计与制作,分组进行电路设计、搭建、调试及展示。
数电课设-数字钟

数字钟一.基本功能1、设计一个数字钟,能够显示当前时间,分别用6个数码管显示小时、分钟、秒钟的时间,秒针的计数频率为1Hz,可由系统脉冲分频得到。
2、在整点进行提示,可通过LED闪烁实现,闪烁频率及花型可自己设计。
3、能够调整小时和分钟的时间,调整的形式为通过按键进行累加。
4、具有闹钟功能,闹钟时间可以任意设定(设定的形式同样为通过按键累加),并且在设定的时间能够进行提示,提示同样可以由LED闪烁实现。
二.扩展功能1、设计模式选择计数器,通过计数器来控制各个功能之间转换。
2、调整当前时间以及闹钟时间,在按键累加的功能不变的基础上,增加一个功能,即当按住累加键超过3秒,时间能够以4Hz的频率累加。
3、用LCD液晶屏来显示当前时间及功能模式。
library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;use ieee.std_logic_arith.all;entity clock isport(clk: in std_logic; --27M晶振key3,key2,key0: in std_logic:='1'; --时、分、模式按钮,下降沿触发ledg: o ut std_logic_vector(2 downto 0):="000"; --整点提示ledr: out std_logic_vector(2 downto 0):="000"; --闹铃hex7,hex6,hex5,hex4,hex3,hex2,hex0,hex1: out std_logic_vector(6 downto 0) --数码管显示);end;architecture a of clock issignal x: integer range 1 to 13500000:=1; --记27M的上升沿个数signal clka: std_logic; --1HZsignal temp1,temp2,temp3,temp4,temp5,temp6: std_logic_vector(3 downto 0):="0000"; --时分秒走时signal xianshi1,xianshi2,xianshi3,xianshi4,xianshi5,xianshi6:std_logic_vector(3 downto 0):="0000"; --数码管显示signal temp0: std_logic_vector(1 downto 0):="00"; --模式显示signal tfen1,tfen2,tshi1,tshi2,nfen1,nfen2,nshi1,nshi2: std_logic_vector(3 downto 0); --调时和闹铃时的分、时的个位和十位signal naoling1,naoling2,naoling3,naoling4: std_logic_vector(3 downto 0); --闹铃调时时的显示begin--分频,产生1HZ的时钟process(clk)beginif clk'event and clk='1' thenx<=x+1;if x=13500000 thenclka<=not clka; --27M每13500000个上升沿clka取反x<=1;end if;end if;end process;--模式选择器,用按键控制,有0、1、2 三种模式process(key0)beginif key0'event and key0='0' thenif temp0="10" then --模式2时,再按键则进入模式0temp0<="00";elsetemp0<=temp0+1;end if;end if;end process;--模式用数码管显示process(temp0)begincase temp0 iswhen "00" => hex0<="1000000";--显示0when "01" => hex0<="1111001";--显示1when "10" => hex0<="0100100";--显示2when others => hex0<="0000000";--显示全亮end case;end process;--模式1时,调时,调节时钟的分process(key2,temp0)beginif temp0="01" thenif key2'event and key2='0' thenif tfen1="1001" then --个位到9,十位加1if tfen2="0101" then --加到59,则归零tfen1<="0000";tfen2<="0000";elsetfen2<=tfen2+1;tfen1<="0000";end if;elsetfen1<=tfen1+1;end if;end if;end if;end process;--模式1时,调时,调节时钟的时process(key3,temp0)beginif temp0="01" thenif key3'event and key3='0' thenif tshi1="1001" then ----个位到9,十位加1tshi1<="0000";tshi2<=tshi2+1;elsif tshi1="0011" and tshi2="0010" then --到23,则归零tshi1<="0000";tshi2<="0000";elsetshi1<=tshi1+1;end if;end if;end if;end process;--模式2时,设定闹铃,设定时钟的分process(key2,temp0)beginif temp0="10" thenif key2'event and key2='0' thenif nfen1="1001" then ----个位到9,十位加1if nfen2="0101" then --加到59,则归零nfen1<="0000";nfen2<="0000";elsenfen2<=nfen2+1;nfen1<="0000";end if;elsenfen1<=nfen1+1;end if;end if;end if;end process;--模式2时,设定闹铃,设定时钟的时process(key3,temp0)beginif temp0="10" thenif key3'event and key3='0' thenif nshi1="1001" then ----个位到9,十位加1nshi1<="0000";nshi2<=nshi2+1;elsif nshi1="0011" and nshi2="0010" then --到23,则归零nshi1<="0000";nshi2<="0000";elsenshi1<=nshi1+1;end if;end if;end if;end process;--三种模式间的显示及传递process(clka,temp0)beginif temp0="01" then --模式1时,传递调时的时,分temp3<=tfen1;temp4<=tfen2;temp5<=tshi1;temp6<=tshi2;xianshi3<=temp3; --模式1时,显示时,分xianshi4<=temp4;xianshi5<=temp5;xianshi6<=temp6;elsif temp0="10" then --模式2时,传递闹铃的时,分naoling1<=nfen1;naoling2<=nfen2;naoling3<=nshi1;naoling4<=nshi2;xianshi3<=naoling1; --模式2时,显示闹铃的时,分xianshi4<=naoling2;xianshi5<=naoling3;xianshi6<=naoling4;elsifclka'event and clka='1' then --正常走时,即temp0=00if temp1="1001" then --秒的个位到9,十位加1if temp2="0101" then --秒到59,则归零,分的个位加1temp1<="0000";temp2<="0000";temp3<=temp3+1;if temp3="1001" then --分的个位到9,十位加1if temp4="0101" then --分到59,则归零,时的个位加1temp3<="0000";temp4<="0000";temp5<=temp5+1;if temp5="1001" then --时的个位到9,十位加1temp5<="0000";temp6<=temp6+1;elsif temp5="0011" and temp6="0010" then --时到23,则归零temp5<="0000";temp6<="0000";end if;elsetemp3<="0000";temp4<=temp4+1;end if;elsetemp3<=temp3+1;end if;elsetemp1<="0000";temp2<=temp2+1;end if;elsetemp1<=temp1+1;end if;----到设置的闹铃时则ledr(0--2)三个灯亮,一分钟后熄灭if temp3=naoling1 and temp4=naoling2 and temp5=naoling3 and temp6=naoling4 thenledr<="111";elseledr<="000";end if;----到整点时时则ledg(0--2)三个灯亮,一分钟后熄灭if temp3="0000" and temp4="0000" thenledg<="111";elseledg<="000";end if;--将走时传递给显示译码xianshi1<=temp1;xianshi2<=temp2;xianshi3<=temp3;xianshi4<=temp4;xianshi5<=temp5;xianshi6<=temp6;end if;end process;----数码管显示译码process(xianshi1,xianshi2,xianshi3,xianshi4,xianshi5,xianshi6) begincase xianshi1 iswhen "0000" => hex2<="1000000";when "0001" => hex2<="1111001";when "0010" => hex2<="0100100";when "0011" => hex2<="0110000";when "0100" => hex2<="0011001";when "0101" => hex2<="0010010";when "0110" => hex2<="0000010";when "0111" => hex2<="1111000";when "1000" => hex2<="0000000";when "1001" => hex2<="0010000";when others => hex2<="1000000";end case;case xianshi2 iswhen "0000" => hex3<="1000000";when "0001" => hex3<="1111001";when "0010" => hex3<="0100100";when "0011" => hex3<="0110000";when "0100" => hex3<="0011001";when "0101" => hex3<="0010010";when others => hex3<="1000000";end case;case xianshi3 iswhen "0000" => hex4<="1000000";when "0001" => hex4<="1111001";when "0010" => hex4<="0100100";when "0011" => hex4<="0110000";when "0100" => hex4<="0011001";when "0101" => hex4<="0010010";when "0110" => hex4<="0000010";when "0111" => hex4<="1111000";when "1000" => hex4<="0000000";when "1001" => hex4<="0010000";when others => hex4<="1000000";end case;case xianshi4 iswhen "0000" => hex5<="1000000";when "0001" => hex5<="1111001";when "0010" => hex5<="0100100";when "0011" => hex5<="0110000";when "0100" => hex5<="0011001";when "0101" => hex5<="0010010";when others => hex5<="1000000";end case;case xianshi5 iswhen "0000" => hex6<="1000000";when "0001" => hex6<="1111001";when "0010" => hex6<="0100100";when "0011" => hex6<="0110000";when "0100" => hex6<="0011001";when "0101" => hex6<="0010010";when "0110" => hex6<="0000010";when "0111" => hex6<="1111000";when "1000" => hex6<="0000000";when "1001" => hex6<="0010000";when others => hex6<="1000000";end case;case xianshi6 iswhen "0000" => hex7<="1000000";when "0001" => hex7<="1111001";when "0010" => hex7<="0100100";when others => hex7<="1000000";end case;hex1<="1111111"; ---关闭hex1数码管end process;end;。
数电课程设计-数字电子钟PPT课件

3 设计方案的选择与论证
数字电子钟系统框图如下:
图3.1 数 字 电 子 钟 系 统 框 图
6
3 设计方案的选择与论证
3.1) 时间脉冲产生电路
振荡器是数字钟的核心。振荡器的稳定度及频率的 精确度决定了数字钟计时的准确程度。
由集成逻辑门与RC组成的时钟源振荡器或由集成 电路定时器555与RC组成的多谐振荡器作为时间 标准信号源。
本实验中采用4040来构成分频电路。CD4040计数 为最高为12级2进制计数器,可以将32767HZ的信 号先分频为8HZ,再分为1HZ的信号。如图4.1所示 ,可以直接实现振荡和分频的功能。
16
4 电路设计计算与分析
4.2) 时、分、秒计数器
数字钟的计数电路用两个六十进制计数电路和24进 制计数电路实现的。
数字电子钟设计目的数字电子钟设计目的设计任务和要求设计任务和要求设计方案的选择与论证设计方案的选择与论证电路设计计算与分析电路设计计算与分析元器件明细表元器件明细表11掌握数字钟的设计掌握数字钟的设计22熟悉集成电路的使用方法熟悉集成电路的使用方法11显示显示时时分分秒22可以可以2424小时制或小时制或1212小时制小时制
本设计校时电路是将各个位上的使能端引出接一个 单刀双掷开关,一端(1端)接低位的进位信号,另 一端(2端)接校时电路。校正某位上的时间时,可 以将相应位的开关接到2端,通过拨动校时电路就能 实现校时功能。
12
3 设计方案的选择与论证
3.5) 整点报时电路
一般时钟都应具备整点报时电路功能,即在时间出 现整点前数秒内,数字钟会自动报时,以示提醒。
J2是时校正开关。不校正时,J2开关是连接上面的 ,即连接正常计数。当校正时位时,首先截断正常的 计数通路,然后再进行人工出触发计数加到需要校正 的计数单元的输入端,校正好后,再转入正常计时状 态即可。
数电课程设计电子钟

数电课程设计电子钟一、课程目标知识目标:1. 让学生掌握数字电路基础知识,理解电子钟的工作原理。
2. 使学生了解并掌握电子钟各组成部分的功能及相互关系。
3. 培养学生运用数字电路知识分析、设计简单电子系统的能力。
技能目标:1. 培养学生运用所学知识,设计并搭建电子钟的能力。
2. 培养学生运用电子仪器、设备进行测试、调试和故障排查的能力。
3. 培养学生团队协作、沟通表达及解决问题的能力。
情感态度价值观目标:1. 培养学生对电子技术产生兴趣,激发学生学习积极性。
2. 培养学生严谨的科学态度和良好的实验习惯。
3. 培养学生具备创新意识和实践能力,增强学生对我国电子科技发展的自豪感。
课程性质分析:本课程属于电子技术课程,通过设计电子钟,使学生将所学数字电路知识应用于实际项目中,提高学生的实践能力。
学生特点分析:学生具备一定的数字电路基础知识,具有较强的动手能力和探究欲望,对实际应用场景感兴趣。
教学要求:结合学生特点,注重理论与实践相结合,培养学生的动手能力、创新能力和团队协作能力。
通过课程目标分解,实现对学生知识、技能和情感态度价值观的全面提升。
二、教学内容1. 数字电路基础知识回顾:逻辑门、组合逻辑电路、时序逻辑电路等。
2. 电子钟工作原理:振荡器、分频器、计数器、显示电路等。
3. 电子钟各组成部分功能及相互关系:晶振、分频器、秒、分、时计数器、显示驱动等。
4. 电子钟设计流程:需求分析、电路设计、仿真测试、硬件搭建、调试优化等。
5. 教学大纲:(1)第一周:回顾数字电路基础知识,介绍电子钟工作原理及各部分功能。
(2)第二周:分析电子钟各组成部分的相互关系,讲解设计流程。
(3)第三周:分组讨论,确定设计方案,进行电路设计和仿真测试。
(4)第四周:硬件搭建,进行调试和优化,确保电子钟正常工作。
6. 教材章节及内容:(1)第四章:数字电路基础,涉及逻辑门、组合逻辑电路等。
(2)第五章:时序逻辑电路,涉及计数器、寄存器等。
数电课程设计数字钟

数电课程设计数字钟一、课程目标知识目标:1. 理解数字钟的基本原理和组成,掌握数字电路基础知识;2. 学会运用组合逻辑电路设计数字钟的时、分、秒显示部分;3. 掌握数字钟的计时功能,了解其工作过程和调试方法;4. 了解数字钟在实际应用中的优势,如精确度、稳定性等。
技能目标:1. 能够运用所学知识,设计并搭建一个简单的数字钟电路;2. 培养动手实践能力,学会使用相关仪器、工具进行电路搭建和调试;3. 提高问题解决能力,能够分析并解决数字钟运行过程中出现的问题;4. 学会团队协作,与他人共同完成课程设计任务。
情感态度价值观目标:1. 培养学生对电子技术的兴趣,激发创新意识;2. 培养学生的耐心、细心和责任心,养成良好的学习习惯;3. 引导学生关注科技发展,认识数字技术在实际生活中的应用;4. 培养学生的环保意识,注意电子垃圾的处理和回收。
课程性质:本课程为实践性较强的课程,注重培养学生的动手能力和实际操作技能。
学生特点:学生已具备一定的数字电路基础知识,具有较强的求知欲和动手欲望。
教学要求:结合课程性质和学生特点,采用理论教学与实践操作相结合的方式,注重启发式教学,引导学生主动参与课程设计过程,提高学生的实践能力和创新能力。
通过课程目标的分解,确保学生能够达到预定的学习成果,为后续的教学设计和评估提供依据。
二、教学内容1. 数字钟原理及组成- 了解数字钟的基本工作原理- 掌握数字钟的各个组成部分,如振荡器、分频器、计数器、显示电路等2. 组合逻辑电路设计- 学习组合逻辑电路的设计方法- 应用组合逻辑电路设计数字钟的时、分、秒显示部分3. 数字电路基础知识- 复习数字电路基础知识,如逻辑门、触发器、计数器等- 了解不同类型数字电路的特点和应用4. 数字钟电路搭建与调试- 学习数字钟电路的搭建方法- 掌握数字钟电路的调试技巧,分析并解决常见问题5. 教学内容安排与进度- 第一周:数字钟原理及组成,数字电路基础知识复习- 第二周:组合逻辑电路设计,数字钟显示部分设计- 第三周:数字钟电路搭建,初步调试- 第四周:数字钟电路调试,优化与改进6. 教材章节及内容列举- 教材第三章:数字电路基础- 教材第四章:组合逻辑电路- 教材第五章:时序逻辑电路- 教材第六章:数字钟设计与实践教学内容科学、系统,注重理论与实践相结合,以学生动手实践为主,充分调动学生的积极性,培养实际操作能力。
电子数字时钟课程设计报告(数电)

电子数字时钟课程设计报告(数电)第一篇:电子数字时钟课程设计报告(数电)数字电子钟的设计1.设计目的数字钟是一种用数字电路技术实现时、分、秒计时的装置,与机械式时钟相比具有更高的准确性和直观性,且无机械装置,具有更更长的使用寿命,因此得到了广泛的使用。
数字钟从原理上讲是一种典型的数字电路,其中包括了组合逻辑电路和时序电路。
因此,我们此次设计数字钟就是为了了解数字钟的原理,从而学会制作数字钟。
而且通过数字钟的制作进一步的了解各种在制作中用到的中小规模集成电路的作用及实用方法。
且由于数字钟包括组合逻辑电路和时叙电路。
通过它可以进一步学习与掌握各种组合逻辑电路与时序电路的原理与使用方法。
1.1设计指标1.时间以12小时为一个周期;2.显示时、分、秒;3.具有校时功能,可以分别对时及分进行单独校时,使其校正到标准时间; 1.2 设计要求1、电路设计原理说明2、硬件电路设计(要求画出电路原理图及说明)3、实物制作:完成的系统能达到题目的要求。
4、完成3000字的课程设计报告2.功能原理2.1 数字钟的基本原理数字电子钟由信号发生器、“时、分、秒”计数器、LED数码管、校时电路、整点报时电路等组成。
工作原理为时钟源用以产生稳定的脉冲信号,作为数字种的时间基准,要求震荡频率为1HZ,为标准秒脉冲。
将标准秒脉冲信号送入“秒计数器”,该计数器采用60进制计数器,每累计60秒发出一个“分脉冲”信号,该信号将作为“分计数器”的时钟脉冲。
“分计数器”也采用60进制计数器,每累计60分,发出一个“时脉冲”信号,该信号将被送到“时计数器”。
“时计数器”采用24进制计数器,可以实现24小时的累计。
LED数码管将“时、分、秒”计数器的输出状态显示。
校时电路是来对“时、分、秒”显示数字进行校对调整。
2.2 原理框图3.功能模块3.1 振荡电路多谐振荡器也称无稳态触发器,它没有稳定状态,同时无需外加触发脉冲,就能输出一定频率的矩形波形(自激振荡)。
数字电子钟课程设计

一、教学内容
本节“数字电子钟课程设计”依据《电子技术》教材第九章“数字电路应用”的内容进行设计。主要内容包括:
1.数字电子钟的原理与设计:介绍数字电子钟的基本工作原理,引导学生了解时钟信号的产生、分频电路、计数器、显示电路等组成部分。
2. 555定时器应用:讲解555定时器在数字电子钟中的作用,如如何产生稳定的时钟信号。
21.信息技术应用:教授学生如何利用现代信息技术,如互联网资源、在线仿真工具等,来辅助学习和解决实际问题,提高学生的信息素养。
22.教学反馈收集:在课程结束后,收集学生对课程内容、教学方式、实践环节等方面的反馈,以利于教师不断优化教学方法和提升教学质量。
6.实际制作与测试:引导学生动手制作数字电子钟,并进行功能测试与优化。
2、教学பைடு நூலகம்容
7.电路优化与改进:探讨如何优化电子钟电路设计,包括降低功耗、提高显示清晰度、增强电路稳定性等方面。
8.故障分析与排除:分析数字电子钟可能出现的常见故障,如显示错误、计时不准确等,并教授相应的排查与解决方法。
9.创新设计:鼓励学生对电子钟进行创新设计,如增加闹钟功能、温度显示、定时开关等,提升学生的创新能力和实践能力。
13.成果展示与评价:组织学生进行成果展示,相互评价,培养学生表达能力和批判性思维,同时教师给予总结性评价和反馈。
14.知识拓展:介绍数字电子钟在生活中的应用,以及电子时钟的最新技术发展,激发学生对电子技术领域的兴趣和探索欲。
4、教学内容
15.实践技能培养:通过实际操作,加强学生对电子元器件的识别与使用、焊接技术、电路布局与布线等实践技能的掌握。
10.课程总结:对本章内容进行回顾,强调数字电子钟各部分电路的联系与作用,巩固学生的理论知识,提升实际操作技能。
数字电子技术课程设计报告报告——电子钟设计

数字电子技术课程设计报告课题:数字钟的设计与制作学年:专业:班级:姓名:数字电子技术课程设计报告一、设计目的数字钟是一种用数字电路技术实现时、分、秒计时的装置,与机械式时钟相比具有更高的准确性和直观性,且无机械装置,具有更更长的使用寿命,因此得到了广泛的使用。
数字钟从原理上讲是一种典型的数字电路,其中包括了组合逻辑电路和时序电路。
因此,我们此次设计与制作数字钟就是为了了解数字钟的原理,从而学会制作数字钟.而且通过数字钟的制作进一步的了解各种在制作中用到的中小规模集成电路的作用及实用方法.且由于数字钟包括组合逻辑电路和时叙电路.通过它可以进一步学习与掌握各种组合逻辑电路与时序电路的原理与使用方法.二、设计内容及要求〔1〕设计指标①由晶振电路产生1HZ标准秒信号;②分、秒为00~59六十进制计数器;③时为00~23二十四进制计数器;④周显示从1~日为七进制计数器;⑤具有校时功能,可以分别对时及分进展单独校时,使其校正到标准时间;⑥整点具有报时功能,当时间到达整点前鸣叫五次低音〔500HZ〕,整点时再鸣叫一次高音〔1000HZ〕。
〔2〕设计要求①画出电路原理图〔或仿真电路图〕;②元器件及参数选择;③电路仿真与调试。
〔3〕制作要求自行装配和调试,并能发现问题和解决问题。
〔4〕编写设计报告写出设计与制作的全过程,附上有关资料和图纸,有心得体会。
三、原理框图数字钟实际上是一个对标准频率〔1HZ〕进展计数的计数电路。
由于计数的起始时间不可能与标准时间〔如时间〕一致,故需要在电路上加一个校时电路,同时标准的1HZ 时间信号必须做到准确稳定。
通常使用石英晶体振荡器电路构成数字钟。
数字电子钟的总体图如图〔1〕所示。
由图〔1〕可见,数字电子钟由以下几局部组成:石英晶体振荡器和分频器组成的秒脉冲发生器;校对电路;六十进制秒、分计数器、二十进制时计数器及七十进制日计数器;以及秒、分、时的译码显示局部等。
四、主要局部的实现方案1 秒脉冲电路由晶振32768Hz经CD4060分频为2Hz,再经过74LS74一次分频,即得1Hz 标准秒脉冲,提供应时钟计数脉冲。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
(243 Application.AddCustomList listarray:=Range("A1:A8" '自定义当前工作表中单元格A1至A8中的内容为自动填充序列(244 Worksheets("sheet1".Range("A1:B2".CopyPicture xlScreen, xlBitmap '将单元格 A1 至 B2 的内容复制成屏幕快照(245 Selection.Hyperlinks.Delete ‘删除所选区域的所有链接Columns(1.Hyperlinks.Delet e ‘删除第1列中所有的链接Rows(1.Hyperlinks.Delete ‘删除第1行中所有的链接Range("A1:Z30".Hyperlinks.Delete ‘删除指定范围所有的链接(246 ActiveCell.Hyperlinks.Add Anchor:=ActiveCell, _Address:="C:\Windows\System32\Calc.exe", ScreenTip:="按下我,就会开启Windows 计算器", TextToDisplay:="Windows计算器" '在活动单元格中设置开启Windows计算器链接(247 ActiveCell.Value = Shell("C:\Windows\System32\Calc.exe", vbNormalFocus '开启Windows计算器(248 ActiveSheet.Rows(1.AutoFilter ‘打开自动筛选。
若再运行一次,则关闭自动筛选(249 Selection.Autofilter ‘开启/关闭所选区域的自动筛选(250 ActiveSheet.ShowAllData ‘关闭自动筛选(251 A ctiveSheet.AutoFilterMode ‘检查自动筛选是否开启,若开启则该语句返回True(252 ActiveSheet.Columns("A".ColumnDifferences(Comparison:=ActiveSheet. _ Range("A2".Delete '在A列中找出与单元格A2内容不同的单元格并删除(253 ActiveSheet.Range("A6".ClearNotes '删除单元格A6中的批注,包括声音批注和文字批注(254 ActiveSheet.Range("B8".ClearComments '删除单元格B8中的批注文字(255 ActiveSheet.Range("A1:D10".ClearFormats '清除单元格区域A1至D10中的格式(256 ActiveSheet.Range("B2:D2".BorderAround ColorIndex:=5, _Weight:=xlMedium, LineStyle:=xlDouble '将单元格至D2区域设置为蓝色双线(257 Range("A1:B2".Item(2, 3或Range("A1:B2"(2, 3 ‘引用单元格C2的数据Range("A1:B2"(3 ‘引用单元格A2(258 ActiveSheet.Cells(1, 1.Font.Bold = TRUE ‘设置字体加粗ActiveSheet.Cells(1, 1.Font.Size = 24 ‘设置字体大小为24磅ActiveSheet.Cells(1, 1.Font.ColorIndex = 3 ‘设置字体颜色为红色ActiveSheet.Cells(1, 1.Font.Italic = TRUE ‘设置字体为斜体Act iveSheet.Cells(1, = "Times New Roman" ‘设置字体类型ActiveSheet.Cells(1, 1.Interior.ColorIndex = 3 ‘将单元格的背景色设置为红色(259 ActiveSheet.Range("C2:E6".AutoFormat Format:=xlRangeAutoFormatColor3 '将当前工作表中单元格区域C2至E6格式自动调整为彩色 3 格式(260 Cells.SpecialCells(xlC ellTypeLastCell ‘选中当前工作表中的最后一个单元格(261 ActiveCell.CurrentArray.Select '选定包含活动单元格的整个数组单元格区域. (262 ActiveCell.NumberFormatLocal = "0.000; [] 0.000" '将当前单元格数字格式设置为带3位小数,若为负数则显示为红色(263 IsEmpty (ActiveCell.Value '判断活动单元格中是否有值(264 ActiveCell.Value = LTrim(ActiveCell.Value '删除字符串前面的空白字符(265 Len(ActiveCell.Value '获取活动单元格中字符串的个数(266 ActiveCell.Value = UCase(ActiveCell.Value '将当前单元格中的字符转换成大写(267 ActiveCell.Value = StrConv(ActiveCell.Value, vbLowerCase '将活动单元格中的字符串转换成小写(268 ActiveSheet.Range("C1".AddComment '在当前工作表的单元格C1中添加批注(269 Weekday(Date '获取今天的星期,以数值表示,1-7分别对应星期日至星期六(270 ActiveSheet.Range("A1".AutoFill Range(Cells(1, 1, Cells(10, 1 '将单元格A1的数值填充到单元格A1至A10由图-1中所示的数字中系统组成框图按照信号的流向分级安装,逐级级联。
这里的每一级是指组成数字中的各个功能电路。
(272 ActiveCell.Value = DateAdd("yyyy", 2, Date '获取两年后的今天的日期(273 MsgBox WeekdayName(Weekday(Date '获取今天的星期数(274 ActiveCell.Value = Year(Date '在当前单元格中输入今年的年份数ActiveCell.Value = Month(Date '在当前单元格中输入今天所在的月份数ActiveCell.Value = Day(Date '在当前单元格中输入今天的日期数(275 ActiveCell.Value = MonthName(1 '在当前单元格中显示月份的名称,本句为显示"一月"(276 ActiveCell.Value = Hour(Time '在当前单元格中显示现在时间的小时数ActiveCell.Value = Minute(Time '在当前单元格中显示现在时间的分钟数ActiveCell.Value = Second(Time '在当前单元格中显示现在时间的秒数(277 ActiveSheet.Shapes(1.Delete '删除当前工作表中的第一个形状(278 ActiveSheet.Shapes.Count '获取当前工作表中形状的数量(279 ActiveSheet.Shapes(1.TextEffect.ToggleVerticalText '改变当前工作表中第一个艺术字的方向(280 ActiveSheet.Shapes(1.TextEffect.FontItalic = True '将当前工作表中第一个艺术字的字体设置为斜体(281 ActiveSheet.Shapes.AddTextEffect(msoTextEffect21, "三峡", _"Arial Black", 22#, msoFalse, msoFalse, 66#, 80.Select '在当前工作表中创建一个名为"三峡"的艺术字并对其进行格式设置和选中(282 ActiveSheet.Shapes.AddLine(BeginX:=10, BeginY:=10, EndX:=250, _EndY:=100.Select '在当前工作表中以(10,10为起点(250,100为终点画一条直线并选中(283 ActiveSheet.Shapes.AddShape(Type:=msoShapeRightTriangle, _Left:=70, Top:=40, Width:=130, Height:=72.Select '在当前工作表中画一个左上角在(70,40,宽为130高为72的三角形并选中(284 ActiveSheet.Shapes.AddShape(Type:=msoShapeRectangle, _Left:=70, Top:=40, Width:=130, Height:=72.Select '在当前工作表中画一个以点(70,40为起点,宽130高72的矩形并选中(285 ActiveSheet.Shapes.AddShape(Type:=msoShapeOval, _Left:=70, Top:=40, Width:=130, Height:=72.Select'(70,40,宽为130高为72(286 ActiveSheet.Shapes(1.Line.ForeColor.RGB = RGB(0, 0, 255 '将当前工作表中第一个形状的线条颜色变为蓝色(287 ActiveSheet.Shapes(2.Fill.ForeColor.RGB = RGB(255, 0, 0 '将当前工作表中第2个形状的前景色设置为红色总结与心得体会此次课程设计,我们三个人分工合作,努力把课程设计做好,在完成数字时钟的基本功能的前提下,不断完善它的外观、课程设计的费用等其他外部问题。