資源簡(jiǎn)介
《Word VBA 高效排版范例應(yīng)用》將使讀者對(duì)每天都要面對(duì)的Word軟件有一個(gè)全新的認(rèn)識(shí)，完全發(fā)揮它強(qiáng)大的文字處理和排版功能，并為讀者提供服務(wù)。很多人不知道，其實(shí)幾乎90%的用戶(hù)用到了Word軟件10%的功能，《Word VBA 高效排版范例應(yīng)用》將完全開(kāi)發(fā)出另外的90%！這90%未開(kāi)發(fā)的功能有什么用呢？可以告訴您，它可以使您的工作大大簡(jiǎn)化，工作效率大大提高！ 《Word VBA 高效排版范例應(yīng)用》共分18章，在介紹Word VBA基礎(chǔ)知識(shí)、語(yǔ)法和函數(shù)之后，循序漸進(jìn)地介紹了利用Word VBA處理文檔、繪制表格、排版打印等實(shí)際應(yīng)用，以大量技巧和豐富的實(shí)例，全方展示了Word VBA的精髓。
代碼片段和文件信息
/************************************************************************
** D?B?D?A?O?.?C?P?P *
** *
*************************************************************************
**?Copyright?（C）?1996?by?Microsoft?Corporation ? *
** ???All?Rights?Reserved ? *
************************************************************************/
/*
DBDAO.CPP
Source?code?for?DBDAO?C++?classes
*/
#include?“stdafx.h“
#include?“resource.h“
#define?_DB_NOFORCE_LIBS
#include?
/*****************************************************************************
*?CdbException
*/
CONSTRUCTOR CdbException::CdbException（
HRESULT hr）
{
m_hr?=?hr;
}
/*****************************************************************************
*?CdbBookmark
*/
CONSTRUCTOR CdbBookmark::CdbBookmark（）?//default
{
vt =?0;
parray =?NULL;
}
CONSTRUCTOR CdbBookmark::CdbBookmark（
LPSAFEARRAY?psa）
{
vt =?VT_ARRAY|VT_UI1;
parray =?psa;
}
CONSTRUCTOR CdbBookmark::CdbBookmark（
const?CdbBookmark?&o）
{
VariantInit（this）;
DAOMFC_CALL（VariantCopy（this?（LPVARIANT）&o））;
}
CdbBookmark?& CdbBookmark::operator?=（
const?CdbBookmark?&o）
{
DAOMFC_CALL（VariantCopy（this?（LPVARIANT）&o））;
return?*this;
}
CdbBookmark::operator?LPSAFEARRAY（
VOID）
{
return?（vt&VT_ARRAY?parray:NULL）;
}
/*****************************************************************************
*?CdbOleobject
*/
CONSTRUCTOR CdbOleobject::CdbOleobject（
VOID）
{
m_punkInterface?=?NULL;
}
CdbOleobject?& CdbOleobject::operator?=（
CdbOleobject?&o）
{
SetInterface（o.m_punkInterface?TRUE）;
return?*this;
}
DESTRUCTOR CdbOleobject::~CdbOleobject（
VOID）
{
if?（m_punkInterface）
m_punkInterface->Release（）;
}
BOOL CdbOleobject::StartOLE（
）
{
HRESULT hr;
DAOMFC_CALL（hr=CoInitialize（NULL））;
return?SUCCEEDED（hr）;
}
VOID CdbOleobject::SetInterface（
LPUNKNOWN punk
BOOL bAddRef） //?=?FALSE
{
//?Get?rid?of?existing?interface?if?we?have?one
if?（m_punkInterface）
m_punkInterface->Release（）;
//?Addref?new?interface?so?we?have?a?valid?reference
if?（bAddRef?&&?punk）
punk->AddRef（）;
m_punkInterface?=?punk;
OnInterfaceChange（）;
}
VOID CdbOleobject::SetInterface（
REFIID riidClass
REFIID riidInterface）
{
LPUNKNOWN punk;
if?（!StartOLE（））
return;
DAOMFC_CALL（CoCreateInstance（riidClass?NULL?CLSCTX_INPROC_SERVER?riidInterface?（LPVOID?*）&punk））;
SetInterface（punk）;
}
VOID CdbOleobject::SetInterfaceLic（
REFIID riidClass
REFIID riidInterface）
{
LPUNKNOWN punk;
BSTR m_bstrKey?=?NULL;
LPCLASSFACTORY2?pClassFactory2?=?NULL;
if?（!StartOLE（））
return;
#if?_MSC_VER?>=?1000
????m_bstrKey?=?SysAllocString（CdbWide（（LPSTR）szKEY））;
#else
m_bstrKey?=?SysAllocString（_T（szKEY））;
#endif
DAOMFC_CALL（CoGetClassobject（riidClass?CLSCTX_INPROC_SERVER?NULL?IID_IC ?屬性????????????大小?????日期????時(shí)間???名稱(chēng)
-----------?---------??----------?-----??----
?????文件????????442??2005-03-29?06:23??Word?VBA高效排版范例應(yīng)用\example\aboutbox.zip
?????文件?????120123??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\animate.ZIP
?????文件??????13119??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\animation.ZIP
?????文件??????29897??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\appbar14.ZIP
?????文件???????2607??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\appbar4.zip
?????文件???????2018??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\associate.zip
?????文件??????10612??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\binaryDB.ZIP
?????文件???????2333??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\bmmenu.ZIP
?????文件??????69028??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\bounce1.ZIP
?????文件??????18346??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\browsdlg.ZIP
?????文件????????618??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\bwindowontop.zip
?????文件??????12698??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\calendar.zip
?????文件???????4907??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\capture.ZIP
?????文件??????34850??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\card.zip
?????文件???????1250??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\catalog.ZIP
?????文件?????263807??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\ccdemo.zip
?????文件???????6367??2005-03-29?06:24??Word?VBA高效排版范例應(yīng)用\example\ceaser.zip
?????文件???????5554??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\chunks.ZIP
?????文件??????63907??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\cihsafe.zip
?????文件??????12412??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\cleandsk.ZIP
?????文件???????2677??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\clipcurs.zip
?????文件??????11657??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\cntrlpnl.zip
?????文件???????7573??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\code_format_disk.zip
?????文件???????1782??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\control.ZIP
?????文件???????1138??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\controlpanel.zip
?????文件???????1600??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\copyscr.zip
?????文件??????10052??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\countdown.zip
?????文件?????707575??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\cpocket.zip
?????文件??????15765??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\cpuinfo.zip
?????文件???????1552??2005-03-29?06:25??Word?VBA高效排版范例應(yīng)用\example\crypt.zip
............此處省略682個(gè)文件信息
評(píng)論
共有 條評(píng)論
川公網(wǎng)安備 51152502000135號(hào)