如何用VB6做控件Word文档格式.docx
《如何用VB6做控件Word文档格式.docx》由会员分享，可在线阅读，更多相关《如何用VB6做控件Word文档格式.docx（7页珍藏版）》请在冰豆网上搜索。
问题一：
制作一个控件的基本过程────简单说吧，就是怎么着，怎么弄，怎么整，能搞出来一个叫OCX的
标准控件，而且能放之四海皆好用。
这个东西，要比照着书做，做一个嘛用也没有的控件，早就会了。
可以要做个真正有用的，就在下面这个问题上卡住了。
问题二：
这控件的属性────偶自已定义来用的，特别属于偶滴属性────怎么搞？
怎么设定有几个属性，怎么设定属性值，怎么取出属性值这三个问题，就楞没找到一本书
啊！
这个问题，可是偶滴心结。
记得是VB3开始，就可以搞控件，可必须通过什么&
向导&
来做。
搞得好麻烦。
一直没搞懂。
这VB自制控件的属性三问题，就一直&
遗传&
了偶小十年，成了个不大不小的心结。
今天，终于整成了。
这破微软，就告诉咱怎么直接自已敲代码多简单，非得搞出许多&
，让身为行家滴偶捆手绑脚────缺德透顶了。
────您微软想想，都玩自
制控件了，有外行吗？
你有得着把这么简单的代码操作，非用&
给&
藏&
起来，就楞不让咱自已会用啊？
问题三：
怎么生成控件和怎么发布使用控件
这不是问题，自打一会用控件，第一件事就是试试加载不是微软这强盗加流氓的东西做出来的控件。
恨滴就是微软，讨厌滴就是微软。
────可是，偶是真离不开
微软啊。
这些年所有东西，全是在微软平台上做和用滴────哇哇────良心与道德的失衡啊。
再说偶滴另两件糗事儿：
（一）ASP编程
早年间，偶就算是精通HTML了吧，从Ver3.2起步的。
后来，一学ASP，不难啊？
────一周搞定，基本成了个&
小行家&
了吧。
可是，糗事儿来了────偶就是没法在网站上使用────什么服务器端了，什么客户端了────反正，偶的ASP代码，让所有人看了────都说：
挺好，
没问题！
可事儿绝在，我这ASP编的东西，在全世界任是谁（当然也是干ASP编程滴哥们儿）那儿，都能运行得倍儿好────可在我的机器上────就是不执行
────就是报错。
这事一整偶就是两年半，偶楞是用不了ASP啊。
全世界的哥们儿都在纳闷────这小子脑子让驴踢扁了────这代码没事儿啊？
他丫儿的怎么就说不能运行啊？
────我家的机器────是真不能运行啊。
这事儿，整滴偶，每过一两个月，就强迫自已再重学全套
ASP────坚持了。
两年半以后，突然。
在书中一个不起眼儿的地方，看见了&
HTTP:
//&
的说法。
我滴妈啊────调试ASP代码需要在前面加上这东西，电脑才会调用IIS服务。
敢情，全世界都知道这事儿，偶和哥们又全是打字飞快滴人。
他们全习惯成自然，这么两年半，偶就楞没注意到我与他们的区别────偶就是没打HTTP:
//。
为了这破事儿，偶曾经怀疑过────偶是不是老了，干不了编程了？
（二）CSS技术
说起来这不是什么复杂的东西。
想当初，偶做的网站，要说数据库灵活使用，那是没问题的。
但是，偶做的网页那叫一个难看────整个一个&
垮&
字了解。
但是，偶知道CSS这东西啊？
就想学，想用。
结果，当时买了一本DREAMWAVR的教材里，就有这个东西。
。
这下，可坑苦我了。
这书里，东一锒头，西一棒子，这CSS让他丫整得七零八落滴。
要偶是新潮一代做网页滴就好了────不问为什么，会用一点儿是一点儿，怎么快怎么来。
可是偶这老帮子，要是没整明白，学得没条理没体系，鸡零狗碎滴学────可就是身心两方面对偶滴摧残了。
这东西────坑了我四、五年没搞会────整得我一哥们儿就说────不对啊，挺简单的事儿，你怎么
了？
────你是故意的吧────你不可能学不会这么简单的东西啊────我还真搞不懂。
后来，还是这哥们，过了好几年，给偶一本大专教材。
这一看，没把我气死。
用了不到
半小时就看懂了。
这什么玩意儿啊？
太简单了────以后要提CSS，全世界都问我吧。
保证几句话给说清楚。
────这书里有一章专说CSS，条理清楚、简明。
几眼就看明白
了。
以上是三件偶这些年在&
技术上的三件大糗事儿。
二、书归正传，如何用VB6做控件
主要搞清如下几个问题：
（一）制作一个控件的过程（这是核心问题，别一堆儿细节，结果整个事儿怎么办都不知道。
许多人有这个毛病。
）
（二）如何生成一个控件（把您的心血变成产品，而不是源代码）
（三）制作控件的几个关键细节
如果利用已有控件？
如何为控件&
增加&
自已的属性？
有三个小问题────
如何在控件里保存属性值
如何由用户在外部设定属性值
如何向用户提供属性值
如何使控件对&
事件&
有反应
如何使控件具有初始化的能耐
那就齐活儿了。
下面，且顺序问题的方式简明描述。
制作一个控件的过程
步骤一：
&
新建一个工程&
时，选择&
ActiveX控件&
，而不是常用的&
Exe文件&
就行。
搞定。
步骤二：
就跟普通VB编程一样，往上放控件，编相关代码。
还再整点后面所说的几个关键细节。
步骤三：
用&
文件&
菜单下的&
生成XXXXXX.OCX&
菜单项，生成结果的OCX文件。
如何生成一个控件（把您的心血变成产品，而不是源代码）？
问题了已经说明了。
如何利用已有的控件？
就在自制控件的界面（跟普通EXE工程的FORM界面没区别），就把能用的控件玩了命的使劲往上搁就行。
当然，放完东西别忘了配代码。
问题四：
如何在控件里保存属性
这个最简单。
只要在控件的说明部分里加上DIM语句来定义几个变量就行。
问题五：
如
何由用户在外部设定属性值？
只要在代码里，按下面这个形式写一下────
PropertyLet属性名（ByValNew_ValueAs类型）
内部某个变量名=
New_Value
EndProperty
就成。
问题六：
PropertyGet属性名（）As类型
属性名=内部某个变量名
EndProperty
问题七：
如何使控件对
就在自定义控件里，像平常编EXE工程一样，对上在的各个东西，直接编写源代码。
问题八：
如何使控件有初始化的能耐
只要在代码里，按下面的形式写一下────
PrivateSub用户自定义的控件名_Initialize（）
随便写上您想干的事儿的代码。
EndSub
三、一个实例
光说不练嘴
把式，光练不说傻把式────又说又练真把式！
下面是偶为了示范自定义控件做的一个完整样例────
该控件，上面有两个标签────会显示出一个X值，一个Y值────正好一对坐标。
用户可以对这个控件的X和Y属性进行操作────结果马上会在控件上显示出来。
制作步骤：
（一）新建OCX工程
（二）在界面上放上两个标签。
一个叫Lx，一个叫Ly，用来显示属性值。
（三）然后在代码里，写下如下代码（里面都有注解）就成。
DimXmAsInteger'
内部自定义变量，将来就用来为属性X提供住房了
DimYmAsInteger
'
内部自定义变量，将来就用来为属性Y提供住房了
PrivateSubUserControl_Initialize（）'
控件初始化操作
LX.Caption=
"
X="
&
amp;
Xm'
在控件上显示属性X的值
Ly.Caption="
Y="
Ym
在控件上显示属性Y的值
EndSub
PropertyGetX（）AsInteger'
取出控件内的值给&
属性&
X=Xm
End
Property
PropertyLetX（ByValNew_XAsInteger）
把用户写入的&
值设置到OCX控件内部值
Xm=New_X
LX.Caption="
Xm'
改变完X属性住户，顺手在控件界面上显示一下
后面关于属性Y注解就不用加了
GetY（）AsInteger
Y=Ym
PropertyLet
Y（ByValNew_YAsInteger）
Ym=New_Y
Ym
PrivateSubUserControl_Click（）'
控件对单击事件的反应
MsgBox（"
您单击了我"
Sub
PrivateSubUserControl_DblClick（）'
控件对双击事件的反应。
MsgBox
（"
（四）选&
里的&
生成
XXXXXXXX.OCX&
菜单项，稍等，完活儿了。
升级会员 