slide0101.htm
来自「可作为课程设计或者毕业设计 也可以作为学校精品课程网站使用」· HTM 代码 · 共 185 行
HTM
185 行
<html xmlns:v="urn:schemas-microsoft-com:vml"
xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:p="urn:schemas-microsoft-com:office:powerpoint"
xmlns:oa="urn:schemas-microsoft-com:office:activation"
xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=gb2312">
<meta name=ProgId content=PowerPoint.Slide>
<meta name=Generator content="Microsoft PowerPoint 11">
<link id=Main-File rel=Main-File href="../z4.htm">
<link rel=Preview href=preview.wmf>
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
p\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
v\:textbox {display:none;}
</style>
<![endif]-->
<title>第四章</title>
<meta name=Description content=2008-3-24>
<link rel=Stylesheet href="master04_stylesheet.css">
<![if !ppt]>
<style media=print>
<!--.sld
{left:0px !important;
width:6.0in !important;
height:4.5in !important;
font-size:107% !important;}
-->
</style>
<script src=script.js></script><script><!--
if( !IsNts() ) Redirect( "PPTSld" );
//--></script><!--[if vml]><script>g_vml = 1;
</script><![endif]--><![endif]><p:slidetransition advancetime="0" effect="cover"
direction="right" flag="1"/><o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="186"/>
</o:shapelayout>
</head>
<body lang=ZH-CN style='margin:0px;background-color:black'
onclick="DocumentOnClick()" onresize="_RSW()" onload="LoadSld()"
onkeypress="_KPH()">
<div id=SlideObj class=sld style='position:absolute;top:0px;left:0px;
width:534px;height:400px;font-size:16px;background-color:#E3DDBB;background-image:
url("master04_image001.jpg");clip:rect(0%, 101%, 101%, 0%);visibility:hidden;
filter:revealtrans(Duration=1, Transition=6)'><p:slide coordsize="720,540"
colors="#ffffff,#000000,#808080,#482400,#dfd6c3,#d69b80,#993300,#666600"
masterhref="master04.xml">
<p:shaperange href="master04.xml#_x0000_s206849"/><![if !ppt]><p:shaperange
href="master04.xml#_x0000_s206850"/><![if !vml]><img border=0
v:shapes="_x0000_s206850" src="master04_image005.jpg" style='position:absolute;
top:0%;left:0%;width:7.49%;height:100.0%'><![endif]><p:shaperange
href="master04.xml#_x0000_s206852"/><p:shaperange
href="master04.xml#_x0000_s206853"/><![endif]><v:shapetype id="_x0000_t202"
coordsize="21600,21600" o:spt="202" path="m,l,21600r21600,l21600,xe">
<v:stroke joinstyle="miter"/>
<v:path gradientshapeok="t" o:connecttype="rect"/>
</v:shapetype><v:shape id="_x0000_s189442" type="#_x0000_t202" style='position:absolute;
left:319.75pt;top:231pt;width:14.5pt;height:36pt;mso-wrap-style:none;
v-text-anchor:middle' filled="f" stroked="f" strokecolor="black [1]">
<v:textbox style='mso-fit-shape-to-text:t'/>
</v:shape><v:shape id="_x0000_s189443" type="#_x0000_t202" style='position:absolute;
left:66pt;top:26pt;width:9in;height:496pt' filled="f" fillcolor="#dfd6c3 [4]"
stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]"/>
<v:shadow color="gray [2]"/>
<v:textbox style='mso-fit-shape-to-text:t'/>
</v:shape><v:rect id="_x0000_s189444" href="javascript:parent.GoToPrevSld()"
style='position:absolute;left:503pt;top:495pt;width:53pt;height:30pt;
mso-wrap-style:none;v-text-anchor:middle' filled="f" fillcolor="#dfd6c3 [4]"
stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="previousSlide"/></v:rect><v:rect id="_x0000_s189445"
href="javascript:parent.GoToNextSld()" style='position:absolute;left:574pt;
top:496pt;width:53pt;height:30pt;mso-wrap-style:none;v-text-anchor:middle'
filled="f" fillcolor="#dfd6c3 [4]" stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="nextSlide"/></v:rect><v:rect id="_x0000_s189446"
href="javascript:parent.GoToFirst()" style='position:absolute;left:646pt;
top:496pt;width:53pt;height:30pt;mso-wrap-style:none;v-text-anchor:middle'
filled="f" fillcolor="#dfd6c3 [4]" stroked="f" strokecolor="black [1]">
<v:fill color2="white [0]" o:detectmouseclick="t"/>
<v:shadow color="gray [2]"/>
<p:onmouseclick jump="firstSlide"/></v:rect><![if !vml]><map name="map_s6"><area
href="javascript:parent.GoToFirst()" onclick="window.event.cancelBubble=true;"
shape=rect coords="106, 0, 145, 23"><area
href="javascript:parent.GoToNextSld()"
onclick="window.event.cancelBubble=true;" shape=rect
coords="53, 0, 92, 23"><area href="javascript:parent.GoToPrevSld()"
onclick="window.event.cancelBubble=true;" shape=rect
coords="0, 0, 39, 22"></map><![endif]><![if !vml]><img border=0
v:shapes="_x0000_s189444,_x0000_s189445,_x0000_s189446"
src="slide0101_image166.gif" usemap="#map_s6" style='position:absolute;
top:91.75%;left:69.85%;width:27.52%;height:6.25%'><![endif]>
<div v:shape="_x0000_s189442" class=O style='text-align:center;mso-line-spacing:
"100 50 0"'><span style='position:absolute;top:44.25%;left:45.31%;width:.18%;
height:4.75%'><span style='font-family:宋体;mso-fareast-font-family:宋体;
mso-special-format:lastCR;display:none'> </span></span></div>
<div v:shape="_x0000_s189443" class=O>
<div style='text-align:justify;position:absolute;top:6.25%;left:10.11%;
width:88.2%;height:10.0%'><span style='font-family:宋体;mso-fareast-font-family:
宋体'><b>例如,需要对同一对象设置几个属性。途径之一是使用多条语句。</b></span><span style='font-family:"Arial Unicode MS";
mso-fareast-font-family:"Arial Unicode MS";display:none'><b> </b></span></div>
<div style='text-align:justify;position:absolute;top:16.25%;left:10.11%;
width:46.06%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Private Sub Form_Load() </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:21.5%;left:10.11%;
width:62.73%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Command1.Caption = "</b></span><span
style='font-family:宋体;mso-ascii-font-family:"Courier New";mso-fareast-font-family:
宋体;mso-hansi-font-family:"Courier New"'><b>退出</b></span><span lang=EN-US
style='font-family:"Courier New";mso-ascii-font-family:"Courier New";
mso-bidi-font-family:"Courier New";mso-fareast-language:ZH-CN'><b>(E&xit)" </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:27.0%;left:10.11%;
width:36.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Command1.Top = 500 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:32.25%;left:10.11%;
width:40.07%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Command1.Left = 4500 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:37.5%;left:10.11%;
width:46.06%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Command1.Enabled = True </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:42.75%;left:10.11%;
width:14.23%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>End Sub </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:48.5%;left:10.11%;
width:74.9%;height:5.25%'><nobr><span style='font-family:宋体;mso-fareast-font-family:
宋体'><b>使用</b></span><span lang=EN-US style='font-family:"Times New Roman";
mso-ascii-font-family:"Times New Roman";mso-fareast-font-family:"Arial Unicode MS";
mso-fareast-language:ZH-CN'><b>With...End With </b></span><span
style='font-family:宋体;mso-fareast-font-family:宋体'><b>语句,上面程序的代码如下。</b></span><span
style='font-family:"Arial Unicode MS";mso-fareast-font-family:"Arial Unicode MS";
display:none'><b> </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:53.5%;left:10.11%;
width:46.06%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>Private Sub Form_Load() </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:58.75%;left:10.11%;
width:26.21%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>With Command1 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:64.25%;left:10.11%;
width:30.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>.Caption = "OK" </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:69.5%;left:10.11%;
width:20.22%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>.Top = 500 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:74.75%;left:10.11%;
width:24.15%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>.Left = 4500 </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:80.25%;left:10.11%;
width:30.14%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>.Enabled = True </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:85.5%;left:10.11%;
width:16.1%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>End With </b></span></nobr></div>
<div style='text-align:justify;position:absolute;top:90.75%;left:10.11%;
width:14.23%;height:5.5%'><nobr><span lang=EN-US style='font-family:"Courier New";
mso-ascii-font-family:"Courier New";mso-bidi-font-family:"Courier New";
mso-fareast-language:ZH-CN'><b>End Sub<span style='mso-spacerun:yes'>
</span></b></span></nobr></div>
</div>
</p:slide></div>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?