100165736.htm
来自「C#高级编程(第三版),顶死你们。。 。up」· HTM 代码 · 共 138 行
HTM
138 行
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head><title>
28.4.8 用sink对象创建客户
</title></head>
<body>
<div class="area">
<div class="col1">
<div class="lineBlue">
</div>
<!-- title -->
<div class="arcTitle">
<h1>
<a href="../16">
C#高级编程（第3版）【全文连载】
</a>
</h1>
<div style="text-align: center; font-size: 15px">
<a href="100165736.htm">
28.4.8 用sink对象创建客户
</a>
</div>
<div style="text-align: center; font-size: 15px">
<a class="url" href="../../default.htm">http://book.csdn.net/</a>
2006-10-13 14:41:00
</div>
<div style="margin: 0px auto; width: 700px; border: solid 1px #0b5f98;">
<div style="float: left; width: 16px; background-color: #0b5f98; color: White; padding: 1px;">
图书导读
</div>
<div style="float: right; width: 670px; text-align: left; line-height: 16pt; padding-left: 2px">
<!--导读-->
<h1 id="divCurrentNode" style="color: #b83507; width: 100%; text-align: left; font-size: 12px; padding-left: 2px">当前章节:<a href='100165736.htm'><font color='red'>28.4.8 用sink对象创建客户</font></a></h1>
<div id="divRelateNode" style="padding-left: 2px">
<div style='float:left;width:49%'>·<a href='100165733.htm'>28.4.5 COM注册</a></div><div style='float:right;width:49%'>·<a href='100165734.htm'>28.4.6 创建COM客户程序</a></div><div style='float:left;width:49%'>·<a href='100165735.htm'>28.4.7 添加连接点</a></div><div style='float:right;width:49%'>·<a href='100165737.htm'>28.4.9 在Internet Explorer中运行Windows窗体控件</a></div><div style='float:left;width:49%'>·<a href='100165738.htm'>28.5 小结</a></div><div style='float:right;width:49%'>·<a href='100165739.htm'>29.1 概述</a></div></div>
</div>
</div>
</div>
<!-- main -->
<div id="main">
<div id="text"> <link href="css.css" rel="stylesheet" type="text/css" /><h3 style='margin-top:8.15pt;margin-right:0cm;FTEL:8.15pt;margin-left:
0cm'><span lang=EN-US>28.4.8 </span><span style='font-family:黑体'>用</span><span
lang=EN-US>sink</span><span style='font-family:黑体'>对象创建客户</span></h3>
<p class=MsoNormal><span style='font-family:宋体'>在建立和注册</span><span lang=EN-US>.NET</span><span
style='font-family:宋体'>程序集，把它安装到全局程序集缓存中后，就可以使用事件源建立客户应用程序了。这次我们使用</span><span
lang=EN-US>VB6</span><span style='font-family:宋体'>编写一个使用事件的客户程序。</span></p>
<p class=MsoNormal><span style='font-family:宋体'>启动</span><span lang=EN-US>VB6</span><span
style='font-family:宋体'>，创建一个标准的</span><span lang=EN-US>EXE</span><span
style='font-family:宋体'>文件。选择</span><span lang=EN-US>Project | References</span><span
style='font-family:宋体'>，浏览到</span><span lang=EN-US>.NET</span><span
style='font-family:宋体'>组件的类型库，添加该类型库。接着在窗体上添加一个按钮，再添加下面的代码。使用</span><span
lang=EN-US>VB6</span><span style='font-family:宋体'>，</span><span lang=EN-US>WithEvents</span><span
style='font-family:宋体'>关键字会自动创建一个执行组件的默认源接口的</span><span lang=EN-US>sink</span><span
style='font-family:宋体'>对象。在这个示例中，源接口是</span><span lang=EN-US>IMathEvents</span><span
style='font-family:宋体'>。在组件中引发事件时，就调用处理程序</span><span lang=EN-US>obj_CalcuationCompleted()</span><span
style='font-family:宋体'>，它由对象的变量名和用源接口定义的方法名组成。启动应用程序，就会看到事件被引发了。</span></p>
<p class=2 style='margin-top:8.15pt;margin-right:0cm;FTEL:0cm;
margin-left:21.45pt;FTEL:.0001pt;FTEL:18.45pt'><span
lang=EN-US>Dim WithEvents obj As DotnetComponent.DotnetComponent</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>Dim
math As DotnetComponent.IMath</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US> </span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>Private
Sub Command1_Click()</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
Dim greeting As String</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
Set obj = New DotnetComponent.DotnetComponent</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
greeting = obj. greeting("Bill")</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
MsgBox (greeting)</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US> </span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
Set math = obj</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
Dim result As Integer</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
result = math.Add(4,5)</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
MsgBox(result)</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>End
Sub</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US> </span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>Private
Sub obj_CalcuationCompleted()</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>
MsgBox "calculation ready"</span></p>
<p class=2 style='margin-left:21.45pt;FTEL:18.45pt'><span lang=EN-US>End
Sub</span></p>
</div>
<!-- page -->
<div class="page" style="text-align: center">
<a href="100165735.htm">上一页</a> <a href="index.html">首页</a> <a href="100165737.htm">下一页</a>
</div>
<div style="margin: 0px auto; width: 700px; border: solid 1px #0b5f98;">
<div style="float: left; width: 16px; background-color: #0b5f98; color: White; padding: 1px;">
图书导读
</div>
<div style="float: right; width: 670px; text-align: left; line-height: 16pt; padding-left: 2px">
<!--导读-->
<h1 id="divCurrentNode2" style="color: #b83507; width: 100%; text-align: left; font-size: 12px; padding-left: 2px">当前章节:<a href='100165736.htm'><font color='red'>28.4.8 用sink对象创建客户</font></a></h1>
<div id="divRealteNod2" style="padding-left: 2px">
<div style='float:left;width:49%'>·<a href='100165733.htm'>28.4.5 COM注册</a></div><div style='float:right;width:49%'>·<a href='100165734.htm'>28.4.6 创建COM客户程序</a></div><div style='float:left;width:49%'>·<a href='100165735.htm'>28.4.7 添加连接点</a></div><div style='float:right;width:49%'>·<a href='100165737.htm'>28.4.9 在Internet Explorer中运行Windows窗体控件</a></div><div style='float:left;width:49%'>·<a href='100165738.htm'>28.5 小结</a></div><div style='float:right;width:49%'>·<a href='100165739.htm'>29.1 概述</a></div></div>
</div>
</div>
</div>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?