?? 6_5 代碼設計(1).mht
字號:
}=20
}
</SCRIPT>
<DIV class=3DsearchMain>
<DL=20
style=3D"BORDER-RIGHT: #5992ac 1px solid; PADDING-RIGHT: 2px; =
BORDER-TOP: #5992ac 1px solid; PADDING-LEFT: 2px; PADDING-BOTTOM: 2px; =
BORDER-LEFT: #5992ac 1px solid; PADDING-TOP: 2px; BORDER-BOTTOM: #5992ac =
1px solid">
<DD=20
style=3D"PADDING-RIGHT: 5px; PADDING-LEFT: 240px; PADDING-BOTTOM: 5px; =
PADDING-TOP: 5px; BACKGROUND-COLOR: #95c4d9"><INPUT=20
class=3DsearchDi id=3DtxtTopKey size=3D70> <INPUT=20
onclick=3D"SearchBook_Top();return false;" type=3Dimage=20
=
src=3D"http://book.csdn.net/images2/search.gif"> =CD=
=BC=CA=E9=C6=B7=D6=D6=A3=BA<FONT=20
color=3D#ff0000><B>235680</B></FONT>=D6=D6<BR><INPUT id=3DsearchKind1 =
type=3Dradio=20
CHECKED name=3Daa> <LABEL for=3DsearchKind1>=CA=E9=D3=D1=BB=E1</LABEL> =
<INPUT=20
id=3DsearchKind2 type=3Dradio name=3Daa> <LABEL =
for=3DsearchKind2>=C1=AC=D4=D8</LABEL> =20
<INPUT id=3DsearchKind3 type=3Dradio name=3Daa> <LABEL=20
for=3DsearchKind3>Tag</LABEL> <INPUT id=3DsearchKind4 =
type=3Dradio name=3Daa>=20
<LABEL for=3DsearchKind4><FONT =
color=3D#800080>=D3=C3Google=BD=F8=D0=D0=C8=AB=CE=C4=BC=EC=CB=F7</FONT></=
LABEL> =20
<INPUT id=3DsearchKind5 type=3Dradio name=3Daa> <LABEL =
for=3DsearchKind5><FONT=20
=
color=3D#800080>=D3=C3=B0=D9=B6=C8=BD=F8=D0=D0=C8=AB=CE=C4=BC=EC=CB=F7</F=
ONT></LABEL>=20
<DT=20
style=3D"PADDING-RIGHT: 5px; PADDING-LEFT: 245px; PADDING-BOTTOM: 5px; =
PADDING-TOP: 5px">=C8=C8=C3=C5=CB=D1=CB=F7=A3=BA=20
<A =
href=3D"http://club.book.csdn.net/book/s.aspx?key=3DASP.NET">ASP.NET</A> =
<A=20
href=3D"http://club.book.csdn.net/book/s.aspx?key=3DAjax">Ajax</A> <A=20
href=3D"http://club.book.csdn.net/book/s.aspx?key=3DSpring">Spring</A> =
<A=20
=
href=3D"http://club.book.csdn.net/book/s.aspx?key=3DHibernate">Hibernate<=
/A> <A=20
href=3D"http://club.book.csdn.net/book/s.aspx?key=3DJava">Java</A>=20
</DT></DL></DIV><LINK href=3D"http://book.csdn.net/css/newindex2.css"=20
type=3Dtext/css rel=3Dstylesheet>
<DIV id=3Dwrapper>
<DIV id=3DinnerWrapper>
<DIV id=3DmainWrappe>
<DIV id=3DpageContent>
<DIV class=3Dcol1><!-- title -->
<DIV class=3DarcTitle style=3D"WIDTH: 100%">
<H1 style=3D"WIDTH: 100%">
<SCRIPT src=3D"http://wz.csdn.net/javascripts/vote.js"></SCRIPT>
<A href=3D"http://book.csdn.net/bookfiles/79">Visual =
Basic+Access=CA=FD=BE=DD=BF=E2=BF=AA=B7=A2=D3=EB=CA=B5=C0=FD=20
</A></H1>
<DIV style=3D"FONT-SIZE: 15px; TEXT-ALIGN: center"><A=20
href=3D"http://book.csdn.net/bookfiles/79/100792175.shtml">6.5 =
=B4=FA=C2=EB=C9=E8=BC=C6=A3=A81=A3=A9 =20
</A></DIV>
<DIV style=3D"FONT-SIZE: 15px; TEXT-ALIGN: center"><A class=3Durl=20
href=3D"http://book.csdn.net/">http://book.csdn.net/</A> 2006-7-31 =
15:39:00 </DIV>
<DIV class=3Dclear></DIV>
<DIV=20
style=3D"BORDER-RIGHT: #0b5f98 1px solid; BORDER-TOP: #0b5f98 1px solid; =
FLOAT: left; MARGIN: 0px auto; BORDER-LEFT: #0b5f98 1px solid; WIDTH: =
600px; BORDER-BOTTOM: #0b5f98 1px solid">
<DIV=20
style=3D"PADDING-RIGHT: 1px; PADDING-LEFT: 1px; FLOAT: left; =
PADDING-BOTTOM: 1px; WIDTH: 16px; COLOR: white; PADDING-TOP: 1px; =
BACKGROUND-COLOR: #0b5f98">=CD=BC=CA=E9=B5=BC=B6=C1=20
</DIV>
<DIV=20
style=3D"PADDING-LEFT: 2px; FLOAT: right; WIDTH: 570px; LINE-HEIGHT: =
16pt; TEXT-ALIGN: left"><!--=B5=BC=B6=C1-->
<H1 id=3DdivCurrentNode=20
style=3D"PADDING-LEFT: 2px; FONT-SIZE: 12px; WIDTH: 100%; COLOR: =
#b83507; TEXT-ALIGN: left">=B5=B1=C7=B0=D5=C2=BD=DA:<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792175.shtml"><FONT =
color=3Dred>6.5=20
=B4=FA=C2=EB=C9=E8=BC=C6=A3=A81=A3=A9</FONT></A></H1>
<DIV id=3DdivRelateNode style=3D"PADDING-LEFT: 2px">
<DIV style=3D"FLOAT: left; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792172.shtml">6.2 =
=CA=B5=CF=D6=CA=FD=BE=DD=BF=E2</A></DIV>
<DIV style=3D"FLOAT: right; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792173.shtml">6.3 =
=BD=E7=C3=E6=C9=E8=BC=C6</A></DIV>
<DIV style=3D"FLOAT: left; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792174.shtml">6.4 =
=B4=B4=BD=A8=B8=F7=D7=D3=B4=B0=CC=E5</A></DIV>
<DIV style=3D"FLOAT: right; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792176.shtml">7.1 =
=D0=E8=C7=F3=B7=D6=CE=F6</A></DIV>
<DIV style=3D"FLOAT: left; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792177.shtml">7.2 =
=BD=E1=B9=B9=C9=E8=BC=C6</A></DIV>
<DIV style=3D"FLOAT: right; WIDTH: 49%">=A1=A4<A=20
href=3D"http://book.csdn.net/bookfiles/79/100792178.shtml">7.3=20
=CA=FD=BE=DD=BF=E2=C9=E8=BC=C6</A></DIV></DIV></DIV></DIV>
<DIV class=3Dclear></DIV></DIV><!-- main -->
<DIV id=3Dmain>
<DIV id=3Dtext>
<DIV id=3Dcsdn_zhaig_ad_yahoo_2></DIV>
<P class=3DMsoNormal><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=D4=DA=D6=F7=B4=B0=CC=E5=CC=ED=BC=D3=CD=EA=B2=CB=B5=A5=D6=AE=
=BA=F3=A3=AC=BE=CD=D2=AA=CE=AA=B8=F7=B8=F6=D7=D3=B2=CB=B5=A5=B4=B4=BD=A8=CA=
=C2=BC=FE=B4=A6=C0=ED=B3=CC=D0=F2=A1=A3</SPAN></P>
<H3 style=3D"MARGIN: 8pt 0cm"><A name=3D_Toc122942467><SPAN =
lang=3DEN-US>6.5.1 =20
</SPAN></A><SPAN style=3D"FONT-FAMILY: =
=BA=DA=CC=E5">=D6=F7=B4=B0=CC=E5=B4=FA=C2=EB</SPAN></H3>
<P class=3DMsoNormal><SPAN style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=D4=DA=B1=BE=CF=EE=C4=BF=D6=D0=A3=AC=D7=D3=B2=CB=B5=A5=CA=C2=
=BC=FE=B6=BC=CA=C7</SPAN><SPAN=20
lang=3DEN-US>Click</SPAN><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=CA=C2=BC=FE=A3=AC=D5=E2=C0=EF=CF=C8=B8=F8=B3=F6=D6=F7=B4=B0=
=CC=E5=B2=BF=B7=D6=B5=C4=B4=FA=C2=EB=A1=A3</SPAN></P>
<P class=3Da6 style=3D"MARGIN: 8pt 0cm 0pt 21.65pt; TEXT-INDENT: =
18.65pt"><SPAN=20
lang=3DEN-US>Private Sub mnuCheckModi_Click()</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>frmCheckSel.Show</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Private Sub mnuGuanyu_Click()</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>frmGuanyu.Show</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Private Sub munCheckAdd_Click()</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>frmCheckAdd.Show</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Private Sub munCheckQuery_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmCheckInfo2.Show</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munEmpAdd_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmEmpAdd.Show</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munEmpModi_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmEmpInfo.Show</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munEmpQuery_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmEmpInfo2.Show</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munExit_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Unload Me</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munPwdManager_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmPwdChange.Show</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>End Sub</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>Private Sub munUserManager_Click()</SPAN></P>
<P class=3Da6=20
style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt; LINE-HEIGHT: =
13pt"><SPAN=20
lang=3DEN-US>frmUserManger.Show</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>End Sub</SPAN></P>
<H3 style=3D"MARGIN: 8pt 0cm"><A name=3D_Toc122942468><SPAN =
lang=3DEN-US>6.5.2 =20
</SPAN></A><SPAN style=3D"FONT-FAMILY: =
=BA=DA=CC=E5">=B8=F7=D7=D3=B4=B0=CC=E5=B5=C4=B4=FA=C2=EB</SPAN></H3>
<P class=3DMsoNormal style=3D"LINE-HEIGHT: 16pt"><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=D4=DA=B8=F7=B8=F6=D7=D3=B4=B0=CC=E5=BD=A8=C1=A2=BA=C3=BA=F3=
=A3=AC=BE=CD=BF=C9=D2=D4=B8=F9=BE=DD=B8=F7=B8=F6=D7=D3=B4=B0=CC=E5=B5=C4=B9=
=A6=C4=DC=B8=F8=CB=FC=C3=C7=CC=ED=BC=D3=CF=E0=D3=A6=B4=FA=C2=EB=C1=CB=A1=A3=
</SPAN></P>
<P class=3DMsoNormal style=3D"LINE-HEIGHT: 16pt"><SPAN lang=3DEN-US>(1) =
</SPAN><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=D4=F6=BC=D3=D4=B1=B9=A4=D0=C5=CF=A2=D7=D3=B4=B0=CC=E5=B4=FA=
=C2=EB</SPAN></P>
<P class=3DMsoNormal style=3D"LINE-HEIGHT: 16pt"><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=B1=BE=B4=B0=CC=E5=D3=C3=C0=B4=CC=ED=BC=D3=D4=B1=B9=A4=D0=C5=
=CF=A2=A3=AC=D3=C3</SPAN><SPAN lang=3DEN-US>ADO</SPAN><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=C0=B4=C1=AC=BD=D3=CA=FD=BE=DD=BF=E2=A3=AC=CA=C7=B1=BE=B4=B0=
=CC=E5=B5=C4=D6=D8=B5=E3=A1=A3=B2=C9=D3=C3</SPAN><SPAN =
lang=3DEN-US>MDI</SPAN><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=B5=C4=D7=D3=B3=CC=D0=F2=A3=AC=CB=F9=D2=D4=D4=CB=D0=D0=BA=F3=
=A3=AC=CB=FC=B3=F6=CF=D6=D4=DA=D6=F7=B3=CC=D0=F2=B5=C4=BD=E7=C3=E6=CF=C2=A3=
=AC=C8=E7=CD=BC</SPAN><SPAN=20
lang=3DEN-US>6-29</SPAN><SPAN style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=CB=F9=CA=BE=A1=A3</SPAN></P>
<P align=3Dcenter><SPAN lang=3DEN-US><IMG height=3D273=20
src=3D"http://book.csdn.net/BookFiles/79/06/image031.jpg" =
width=3D290></SPAN></P>
<P align=3Dcenter><SPAN style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=CD=BC</SPAN><SPAN lang=3DEN-US>6-29=20
</SPAN><SPAN style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=D4=F6=BC=D3=D4=B1=B9=A4=D0=C5=CF=A2=D7=D3=B4=B0=CC=E5</SPA=
N></P>
<P class=3Dad style=3D"LINE-HEIGHT: 16.6pt"><SPAN=20
style=3D"FONT-FAMILY: =
=CB=CE=CC=E5">=CF=C2=C3=E6=B5=C4=B4=FA=C2=EB=CA=C7=B6=A8=D2=E5=BC=B8=B8=F6=
=B1=E4=C1=BF=A1=A3</SPAN></P>
<P class=3Da6 style=3D"MARGIN: 8pt 0cm 0pt 21.65pt; TEXT-INDENT: =
18.65pt"><SPAN=20
lang=3DEN-US>Option Explicit</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Dim rs As New ADODB.Recordset</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Dim strSql As String</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US>Private Sub cmdAdd_Click()</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> If Trim(txtNative.Text) =3D "" =
Then</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> txtNative.Text =
=3D "=20
"</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> End If</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> </SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> If Trim(txtEmpPro.Text) =3D "" =
Then</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> txtEmpPro.Text =
=3D "=20
"</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> End If</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> </SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> If Trim(txtEmp_des.Text) =3D "" =
Then</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> txtEmp_des.Text =
=3D "=20
"</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
lang=3DEN-US> End If</SPAN></P>
<P class=3Da6 style=3D"MARGIN-LEFT: 21.65pt; TEXT-INDENT: 18.65pt"><SPAN =
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -