vb点虐 内存不足 vba内存不足

在vb点虐 2015中为什么在只用一个picturebox只显示一张图片的情况下，出现“内存不足”的错误

ret(i, j) = input.Clone(New Rectangle(w * i, h * j, w,h), maging.PixelFormat.DontCare)

创新互联是一家集成都网站设计、网站建设、网站页面设计、网站优化SEO优化为一体的专业网站建设公司，已为成都等多地近百家企业提供网站建设服务。追求良好的浏览体验,以探求精品塑造与理念升华,设计最适合用户的网站页面。 合作只是第一步，服务才是根本,我们始终坚持讲诚信，负责任的原则，为您进行细心、贴心、认真的服务,与众多客户在蓬勃发展的市场环境中,互促共生。

宽度高度需要再 * (i + 1)了，可能vb点虐 裁剪范围超出了图片范围会出错的吧，倒不是真的内存不足了。

玩火线精英卡怎么办?

问题一：为什么我家的电脑很卡机，一玩火线精英、穿越火线和生死狙击就很卡。怎么让电脑不卡机。 系统用久，电脑运行肯定会慢，不是电脑配置不行，而是电脑垃圾和插件过多，开机启动项目过多，造成的电脑卡，以及慢的情况，这个时候，最好的选择就是重装系统，重装系统，只会改变电脑C盘里的系统，像电脑D和E和F盘里面的文件和东西一个都不会少。根据你的电脑配置，完全可以装WIN7的64位操作系统。用电脑硬盘安装系统，可以安装WIN7的系统，具体操作如下：1.首先到ghost系统基地去ghost008/win7/shendu/2665下载WIN7的操作系统：2.将下载的WIN7的64位操作系统，解压到D盘，千万不要解压到C盘。3.打开解压后的文件夹，双击“AUTORUN”，在打开的窗口中，点击“安装”.即可4.在出现的窗口中，ghost映像文件路径会自动加入，选择需要还原到的分区，默认是C盘，点击“确定”按钮即可自动安装。

问题二：电脑玩火线精英很卡很卡很卡怎么办 1，打开腾讯电脑管家――工具箱――游戏加速

2，内存占用大，有必要的话，加多条内存

平时也可以清理加速下内存

打开腾讯电脑管家――电脑加速――开启小火箭

3，清理下垃圾，管家带扫一扫，闲时清理省事省心

问题三：火线精英怎么卡的 原因可能很多 比如显卡不支持 比如显示器分辨率设置不当――很多显示器，特别是液晶显示器，要在默认的分辨率下才有最佳表现，要是自己调整了不适当的分辨率与刷新率，买最猛的显卡都没用 比如CPU温度过高 比如没有安装最新的DirectX（注意有些游。

问题四：玩4399火线精英屏幕一卡一卡是不是正常的？ 原因可能很多

比如显卡不支持

比如显示器分辨率设置不当――很多显示器，特别是液晶显示器，要在默认的分辨率下才有最佳表现，要是自己调整了不适当的分辨率与刷新率，买最猛的显卡都没用

比如CPU温度过高

比如没有安装最新的DirectX（注意有些游戏需要的版本）

比如没有安装必须的音视频解码器乃至播放器

比如缺少某些dll文件

比如vb库、vc库、netframework、java虚拟机的支持等 换一下吧，或者是老化了。

问题五：为什么火线精英一玩就很卡 因为你显卡不好

问题六：火线精英为什么玩火线精英这么卡 服务器太垃圾了

问题七：为什么我玩火线精英很卡，还经常掉线，断开连接，游戏里做什么都好卡。而玩其他的游戏就很顺畅（附图） 建议楼主按以下方法进行下检查：

1、网络

检查下网络，是不是网速不好啊，打开腾讯电脑管家一工具箱一网速测试，测试下是不是网速不怎么给力

2、电脑的温度

电脑开机时过长或是运行的软件过多风扇灰尘转速不够灰尘过多导致电脑过热，所以电脑会卡，打开腾讯电脑管家里硬件检测的检测温度的悬浮窗，可以随时查看你电脑的温度

3、电脑的垃圾过多

长时间使用电脑导致电脑的垃圾过多，可以使用腾讯电脑管的垃圾清理功能，清理下电脑的垃圾还有注册表、插件等来提升电脑的速度

4、运行的软件过多

有一些软件运行的话会占用电脑的宽带以及内存，这样也会导致卡，打开腾讯电脑管家使用腾讯电脑管家里的电脑加速功能，优化一些不需要的软件，来提升电脑的速度

5、中了病毒、木马

也会导致电脑过慢，可以开启腾讯电脑管家小红伞查杀引擎（打开腾讯电脑管家一杀毒一扫描查杀）如果杀到木马或病毒后，应立即重启，重启电脑后，来到“隔离|恢复”，彻底删除，木马和病毒！

6、使用电脑诊所查看下

腾讯电脑管家--电脑诊所--腾讯专区--腾讯游戏--自助攻略--玩英雄联盟卡，点击查看，腾讯电脑管家会为我们分析原因并提出解决方案的。

希望我的回答可以帮到你，如未帮上请见谅。

问题八：为什么4399火线精英那么卡 那是因为你的网络不好，建议换一个网络。如果还不行，那就换台电脑试试（换电脑的同时也记得要换网络）。

问题九：为什么我玩火线精英这么卡 先发配置再说话

问题十：火线精英为什么玩火线精英卡 因为运行内存不足导致卡，或者是网络不稳定导致的卡。望采纳，谢谢

学VB还是VB点虐 好？

细说VB．NET（上）

（作者：青苹果工作室编译 2001年03月07日 14:47）

微软公司提出的.NET概念，正从各个方面渗入到我们的生活中。它将产生的作用，

诚如一位业内名家所描述的：“请忘掉你认为你所知道的，.NET将改变一切”！既然如

此，无论是IT业内人士、还是企业决策者，快速领会这个新概念的含义及深远影响，

都显得非常必要。

概要

VB正在不断地发展中，它具备了以前VB编程人员作梦都想拥有的性能，想象一下你

将随心所欲的利用这些性能，是不是很令人激动？然而，这个计划于2001年第四季度上

市销售的VB版本可能会给你带来些小麻烦，因为要完全掌握它需要一个较长的学习周期

，而且其中包括了一些微妙的变化，你可能在使用他们的时候出现错误。

需要准备的条件：建议获得Visual Basic.NET beta 版，这些内容对所有VB程序员

都是有用的。

Microsoft .NET平台的涵盖面很广，而且很难预测它的真正意义。我们注意到，现

在有很多关于.NET的不正确的理解。因此在这篇文章里，我们将把给你一个VB.NET到底

是些什么的概念，从头到尾说一说它是什么、它能干什么以及怎样才能充分发挥它的优

点。我们要特别地细看一下IDE的改变、面向对象特征、底层结构的改变、一些“现代化

”的语法以及包装和分发方面的增强。我们将讨论这些功能能为你做什么，解释他们的

优点与不足。由于这些改变是如此之大，而且涉及方方面面，因此希望这一篇文章能满

足你全部的要求是不现实的，要了解这方面全部的知识请参阅有关文章和书籍。

Visual Basic.NET 和你现在所知的开发工具完全不同，并且这个新版本会改变你的

未来。到底有多大不同？如果你觉得从VB3迁移到VB4是一个很大的变化，那这次VB.NET

会让你感到震惊。这次升级与其说是VB的一个新版本，还不如说是迁移到一个新平台上

，你所面临的情况就和从DOS迁移到Windows差不多。

VB获得了继承能力

VB.NET预期拥有的第一新功能就是继承能力。继承是VB开发者长期以来要求得最多

的功能。判断一下对继承的要求是不是像早些时候对本地化编译器的要求一样将是一件

很有意思的事，后者，当Microsoft提供了一个以后，你就几乎听不到多少这方面的言语

了。

Visual Basic现在是真正的面向对象语言了。过去，你可以通过使用VB的界面继承

性创建伪实现的对象继承，但现在不必这样做了。

Visual Basic.NET 现在提供大量面向对象功能，包括应用程序继承，它允许你从其

它类导出你想创建的类。像在其它面向对象语言里一样，你能覆盖基类的方法和属性，

并且能实现多态以创建健壮的、扩展性好的组件。例如，假定你从基类 Crane里继承产

生了一个ForkLift类，你能使用像下面的代码覆盖基类里对Lift方法的默认实现：

Public Class ForkLift

Inherits Crane

Overrides Sub Lift(ByRef _

Height As Double)

Height = Height + 10

End Sub

End Class

VB.NET不仅能让你覆盖方法或属性；它还能让你重载方法。重载是定义同名、但使

用不同数据类型的方法或属性的能力。例如，假定你有一个组件能对不同数据类型的数

组进行排序，你不需要三个(每种数据类型一个)不同名的方法；实际上你可以重载一个

方法名：

Overloads Sub SortArray(ByRef _

aValues()As String)

...

Overloads Sub SortArray(ByRef _

aValues() As Integer)

...

Overloads Sub SortArray(ByRef _

aValues() As Object)

另一个改变是：表单现在是类模块。这就是说类本身包含建立表单的所有“肥料”

的代码。你可能想知道，为什么你不得不看到这些从前不用看的代码，但这个改变同时

带来强大的新功能，包括继承这些表单的能力。Microsoft把这一技术称为可视化继承。

假定你的对话框有一种标准的格式，例如在表单的一侧有一行按钮，并在角上有一个标

识，那么，通过可视化继承你能创建一个表单模板(类)，并从这个基类里导出所需的表

单。

一切都是对象

代码复用简化了开发过程，像实现和可视化继承这样的功能有利于更简单、更强大

的代码复用。然而，代码复用并不是到此为止。你能通过支持VB.NET的通用语言运行库

(Common Language Runtime - CLR)继承在其它 VS.NET 语言里定义的类。例如，你或别

人创建了一个 C# 类，然后就能从 VB 里继承它。

VB.NET 的面向对象能力扩展了语言本身的通路：一切都是对象。这意味着比在以前

的 VB 版本里，你获得了更多的内在功能，你将很少被迫使用 Windows API。例如，在

以前的 VB 版本里，你使用 LoadPicture 方法加载图片并使用表单的 Line 方法(或较

快的 API) 画线。现在，你使用 System.Drawing 对象来创建并处理图形。你可以使用

以下代码在表单上显示一幅图片：

picshowpicture.Image = _

system.Drawing.Image.FromFile( _

"c:\test.bmp")

注意 VB.NET 的“一切都是对象”方式让你的语句能用得更长久。

考虑以下语句，它在一个图形对象上画一条黄绿色的线：

objgraphics.DrawLine(system.Drawing. _

Pens.Chartreuse, 0, 0, 100, 100)

这些长长的语句也有好处：改进的功能、适应性和易用性。从前，你要实现先进的

功能就不得不在文档中挖掘，经常是不得不诉诸API。现在，相关的功能集符合逻辑地包

含在对象里。这种处理方式的另外一个好处就是：类把相关的功能很好的组织了起来。

所以，浏览你感兴趣的对象，发现它们做些什么实际上很有意思。

Visual Basic.NET 的面向对象功能提供了很多实在的好处。很多情况下，VB.NET

面向对象的本质和实现的继承性能帮助你比在以前的 VB 版本里更容易、更迅速地创建

特定类型的功能。然而，你不一定要仅仅因为你能做到，就使用实现继承性或其它 .NE

T 功能。VB.NET 的新功能使开发许多类型的应用程序变得更简单！但是，就像使用所有

的语言能力一样，你需要使用的是在特定场合下最适合的功能。

自由线程的危险

对于自由线程可能需要特别给出警告。VB6允许你使用独立的线程来创建多线程服务

器程序，但VB过去从来没有让你能创建自由线程的客户端程序。VB.NET 改变了这一切。

现在，创建自由线程应用程序几乎成了最微不足道的事情。实际上，我估计那些没有理

解其中的微妙差别，就在他们的应用程序里添加了自由线程的程序员会遇到很多问题。

只需要几行代码就能启动一个新线程：简单地将线索对象的地址传递给方法，方法本身

就会启动线程。这确实是很酷也很有用的东西，但你需要小心：这些功能适用于特定的

场合，确定哪些是适用的场合并且明智的使用这些工具则是你自己的事。许多开发者使

用继承性和自由线程时给自己找了不少麻烦，请不要让这些发生在你身上。

可能大家讨论得最多的 VB.NET 特征就是 CLR (通用语言运行库)，VB 运行在它的

顶层上。是 CLR 提供了 VB.NET 的许多关键功能。例如，CLR 使实现和跨语言继承性以

及自由线程成为可能。

分发VB程序要求你同时分发VB的运行库，在VB6里即是msvbvm60.dll。许多其它语言

也有类似的要求，包括 C++ 和 Java。在Visual Studio.NET里，所有的Visual Studio

语言共享同一个运行库：CLR。这里有几个较大的变化，首先，所有的Visual Studio语

言现在都共享同一个IDE、同样的表单引擎、同样的异常处理机制等等。这意味着Visua

l Basic和像 C#这样的语言拥有同等的地位，至少差不多是同等的。

回复：

细说VB．NET（中）

（作者：青苹果工作室编译 2001年03月07日 14:47）

易于反编译的中间语言

无论你用VB、C#或其它.NET语言编写应用程序，VS.NET代码都编译成为中间语言(I

L)。当应用程序运行时，一个即时编译器(JITter)处理IL代码并把它编译成为机器语言

。这意味着在理论上可能为Windows以外的平台创建.NET运行库，但现在关于类似的事情

还没有任何官方消息。中间语言的一个缺陷是：它像VB5以前的VB版本一样，容易被反编

译。这种可能性使许多开发者普遍地质疑.NET架构的安全性。

CLR在IL层次内外影响代码，对它的修改将使所有使用CLR的语言受益。然而，语言

只是和代码如何被解释为IL有关，对特定语言的优化可以根据特定语言的语法来编写，

这样在技术上就可能使.NET语言之间的性能差别很小。不管怎样，大体上蓝图是美好的

。例如，CLR使VB的调试和监测工具和C#的相应工具相当，它做到了这一点因为它们本来

就是相同的工具。

CLR提供不平行的跨语言集成，包括跨语言继承代码的能力。所有使用CLR的语言共

享一个通用类型系统，它使使用多种语言开发应用程序变得更简单。我不喜欢把 C API

声明翻译成VB里可以使用的形式，所以我很赞赏通用类型系统带来的好处。

在CLR中运行的代码被称为被管理代码，被管理代码使用的内存完全由CLR来控制。

被管理代码带来很多好处，包括跨语言集成、跨语言异常处理和简化的部件相互作用模

型。Visual Basic被限制为只能以被管理代码的方式工作，然而C#拥有跳到非被管理代

码的能力(执行到运行库之外)，并能做像指针操作这类事情。这是VB和C#不同等的情况

之一。这种能力到底有多重要取决于你想干什么。

CLR造成的体系结构差别要比跨语言集成、共享功能和被管理代码等深刻。首先，V

isual Studio.NET的支撑结构不是 COM。另外，VB.NET里的所有东西，甚至字符串都是

对象。因为这些和其它一些原因，Microsoft改变了支撑结构处理对象的方式。COM实现

了一个引用计数方案，这样每次引用一个对象时，计数器递增。当一个对象引用超出作

用域或被释放时，计数器递减，当引用计数减少到零时就终止这个对象。Microsoft声称

在.NET架构下引用计数的开销太大，以至于不能在 .NET中实现它，所以它放弃了引用计

数转而使用垃圾收集。

垃圾收集需要新体系结构

CLR垃圾收集器主要是监视一个程序的资源，当可用资源达到确定的阈值时寻找无用

的对象，并在发现它们的时候清除这些对象。垃圾收集的一大好处就是你不再需要担心

大多数普通的循环引用，即子对象引用了父对象，然后父对象又引用了子对象。在引用

计数方案下，循环引用使两个对象都不能被释放和清除。然而，垃圾收集器会发现循环

引用并清除它们。这也意味着释放对象的最后一个引用时不再需要立即清除对象。

垃圾收集的一个后果是：你再也不能指望一个类的 Terminate 事件能在适当的时机

发出。实际上，如果线程被阻塞，可能根本就不会发出 Terminate 事件。和COM提供的

确定化终止相反，它被称为不确定的终止。缺乏确定化终止，以及因为垃圾收集器重新

安排并压缩内存从而不能使用指针的事实，在新闻组里激发了一波激烈的辩论。我想这

些新限制可能会令你痛恨，因为你要依靠确定化终止；也可能你漠不关心，因为你不依

赖 Terminate 事件。垃圾收集并不是万灵药，实现弱引用依然需要做一些考虑。

从引用计数到垃圾收集只是 Visual Studio.NET 的支撑结构不是 COM 这个事实的

表象之一。你能在VB.NET中使用COM对象，比如说ActiveX服务器或ActiveX控件。然而，

你必须通过包装访问这些对象。任何时候听到“包装”这个术语，你应该明白你面对着

性能损失，并且对象的行为可能有所不同。如果当计划移植一个使用了大量COM对象的工

程，就需要认真地测试和计划，可能需要重新规划应用程序的结构才能移植成功。坦率

地说，你要有遭受挫折的准备。还记得从VBX迁移到 OCX的过程吗？我记得，我的精神病

医生也记得。我很快就要再去看他了 ;-)

语言本身的变化要远远超过体系结构的变化。大部分改变确有道理，但我并不认为

所有的改变都是如此。以前版本的VB允许你以很多方法来做很多事，以至于统一的编码

标准要么不存在要么就很难强加于人。Microsoft对VB做了大量的改变为的就是“清晰”

这种语言。很多情况下，原来你有好几种方法做一件事，现在就只有一种了。Billy Ho

llis 提供了语法变化的详细列表，包括废弃的关键字列表，但有些东西需要在这里重复

一下。

首先，向过程参数传递数据的默认方法由引用(ByRef)变成了传值(ByVal)。这个改

变主要是因为引用要比传值的风险大得多。它的风险主要是调用过程中的数据可能被无

意中篡改。你仍然能通过引用传递数据，但这一改变使你需要修改新的默认调用方法来

使用引用。

Set语句消失了

其次，Set 语句消失了。在 VB.NET 里如果你需要向变量传递一个对象引用，所需

要的只是一个等号，对象被视为同其它值一样。这很酷，但也有副作用：默认属性消失

了。例如，你不再能用这种方式引用一个属性：

Text1 = "What, me worry?"

作为替代，你必须显式地引用属性：

Text1.Text = "What, me worry?"

也许一眼看来不需要这种改变，但确实必须去掉默认属性。例如，假定你有一个叫

objFoo的对象变量，不用Set语句，下面的语句所设置的引用就产生了歧义性：

objFoo = Text1

这条语句是应该设置到Text1的引用，还是以Text1的Text属性来填充objFoo？你不

能确定，编译器也不能。抛弃Set语句同时要求抛弃默认属性。

有一个改变我不喜欢：你不再能在不同的作用域里声明Property Get和Property S

et过程。注意 VB.NET 没有 Property Let 语句：对象和数值都用 Property Set。这意

味着你不能用一个 Friend Property Let 过程来对应一个 Public Property Get。用V

B建立组件时可能会有麻烦。许多组件开发者创建 Friend Property Set 过程以使他们

的应用程序能改变一个值，但提供 Public Property Get 过程以使他们的客户程序能取

回值。我希望我能为这个改变找到一个合适的理由，可是我找不到。

Microsoft说它力图使语言保持清晰并使之现代化—大部分情况下它做得不错—但这

个作用域问题和其它几个问题令人感到困惑。例如，While...Wend 很早以前就应该消失

了，因为 Do...Loop 完成同样的功能。然而，Microsoft 不仅没能去掉 While...Wend

，还把它改成了 While...End While 来给自己找了更多的麻烦。真奇怪！

我最不喜欢的改变是：Microsoft改变了你已经使用的数据类型含义。在 .NET 里，

Integer 现在是 32 位，而 Long 变成了 64 位。我心存恐惧地想：开发者 (包括我自

己) 会多么频繁地使用错误的变量啊。那个API到底是接受一个16位的 Integer还是32位

的？老天！我希望Microsoft重新考虑这个决定并使用新的变量类型，比如Int32和Long

64。无论迁移到 VB.NET的移植工具是多么的好，它也不能改变开发者的记忆。为什么要

逼着我们再学一遍普通的数据类型呢？

最后，最需要的一个改变是：VB.NET引入了 Option Strict 关键字，你可以使用它

来代替 Option Explicit。Option Strict 结束了万恶的类型强制(tm)，通过它VB乐于

让你把一个数值赋值给一个字符串，然后像犯罪一样做另一个操作。设置 Option Stri

ct 告诉 Visual Basic.NET 不要为你做任何类型强制。注意 VB.NET 并不是彻底的控制

狂，它允许类型向下转换，但不允许向上。例如，不使用像 sngvariable = CSng(dblv

ariable) 这样的语句进行显式类型转换，你就不能把声明为 Single 的变量赋值给声明

为 Double 的变量。因为这有丢失数据的风险。然而，你能不使用显式类型转换就把声

明为 Double 的变量赋值给声明为 Single 的变量，因为这并没有丢失数据的危险。使

用 Option Strict 能帮助开发者减少很多类型错误，包括那些很难调错的。但有一个附

加的缺陷：在工程里使用了 Option Strict 后，就不能进行 后编联了。

回复：

细说VB．NET（下）

（作者：青苹果工作室编译 2001年03月07日 14:47）

表单和新IDE面孔

Visual Basic.NET 的面向对象功能很伟大，但第一次启动 VB.NET 时还注意不到它

。可能你注意到的第一件事是它的 IDE。IDE看起来可能很熟悉，建立VS.NET IDE的团队

以前的工作是开发VB的IDE，对IDE的增强借鉴了VB IDE的经验。

同时，IDE的改变远比外表显示的深刻。所有.NET语言使用相同的IDE，并且IDE中的

新工具功能强大又易于理解。你能把任何一个设计窗口设置为自动隐藏 (就像你能自动

隐藏Windows任务栏那样)，这样就大大地减少了混乱。主工作区域是一系列选项卡，这

意味着IDE不再同时显式多个表单和代码模块。当打开对象的源代码时，IDE在它的主工

作区域为工作的对象添加一个新的选项卡。

IDE还包括一个叫作任务表(Task List)的新窗口。它的内容由IDE创建的项目组成。

例如，如果在试图编译一个工程时收到一个错误，VB在任务表里创建一个项目来解释这

个错误。你能直接向任务表里添加项目，或者通过在代码里以 "TODO:"开始一个注释行

，你可以在代码位置和任务之间建立联系。我喜欢Microsoft实现任务表的方式；在程序

出炉前，都需要完成些什么？估计它能帮我省掉很多时间和麻烦。看到它时，你最容易

产生的一个想法就是：以前怎么就没人想到它呢？

你能注意到的另一个变化就是：VB.NET的表单。Microsoft废弃了旧的表单引擎而使

用Windows Form代替它。所有基于 CLR的语言都使用Windows Form引擎。相对于VB6的表

单引擎，它有几个重要的改进。例如，Windows Form让你能创建能自动调整组件尺寸的

表单，并允许将控件锚定在表单里的特定位置。换句话说，不再需要使用第三方控件就

能完成这些特殊任务。Windows Form还允许表演像透明表单这样的很酷的技术。

过去，VB隐藏了建立表单的所有魔术。你使用IDE设计表单并把代码添加到Initial

ize事件上，但你没有手段来控制这两点之间的过程。现在，表单就是一个类，它包含用

来建立表单所有的代码。我把这些代码称为肥料代码，因为大多数开发者希望远远离开

它们，越远越好。要想可靠地弄坏你的程序，没有比折腾这些代码更好的办法了。另一

方面，技术娴熟的用户可以通过这些代码做很多很酷的事，因为它让你能走到VB.NET表

单的幕后。要是你不想看到这些代码你也能不看，因为新代码编辑器有展开和折叠代码

区的功能，并且这些肥料代码是默认折叠的。代码编辑器还有几个很酷的新功能。例如

，现在它自动为你缩排所有代码(而且还干得不错)，它还有内置的显示行号功能。

创建编译的服务器端代码

除了新的Windows Form引擎，.NET还包括一个为创建Web表单而特别设计的表单引擎

。这些被称为Web Form的表单很聪明，就像VB让你能很容易地为传统Windows桌面应用程

序创建表单一样，它们让你能方便地为Web创建表单。Web Form是 ASP.NET里的技术，让

你能使用熟悉的RAD工具创建带有代码的表单。创建的ASP.NET代码编译并驻留在服务器

上，并在那里被执行，然后以HTML方式发送给任何一个支持HTML 3.2的浏览器。

底层结构捕获客户端上的事件数据，并把它发送给服务器。这意味着可以使用各种

用户界面工具，可以利用现有的表单设计技巧，而且应用程序界面是不依赖浏览器的。

如果可以放弃不依赖浏览器，你还有另一个选择来利用Internet Explorer 某些功能特

有的优势。Web Form使支持Web的应用程序能更容易地创建更好、更丰富多彩的用户界面

。

Web服务策略

VB.NET里的另外一个重要的面向Web的功能是：Web服务。Microsoft的市场部门把W

eb服务列为采用.NET的几大理由之一。实际上，Web服务的本质就是使用标准协议的、由

Web服务器提供的、类似于COM的对象。注意在技术上它们并不是COM对象，但和COM对象

的表现方式很相像。Microsoft希望看到所有的公司使用Web服务，并且未来的应用程序

可以简单地“粘”在不同的Web服务上，就像现在可以使用Visual Basic for Applicat

ions (VBA)建立基于Office和支持VBA的程序的解决方案一样。

在PDC上，对于它希望开发者如何“粘”在这些服务上，Microsoft提供的一个演示

程序给出了很好的例子。在这个演示程序里，一个假想的诊所通过Web服务提供预约系统

，演示了你可以怎样使用智能电话通过Web进行预约。Visual Basic.NET 甚至会允许你

查询服务器，并获得关于服务器能支持的所有Web服务的相关数据。通过IntelliSense

dropdown这个绝对有用的工具，程序员可以访问Web服务。Web服务是Microsoft雄心勃勃

的战略，但只有时间才能检验它是否能成功地被广泛接纳。

Microsoft试图消除与包装和分发应用程序相关的问题，包括令人恐惧的DLL。所有

.NET应用程序被封装为元件。元件包含着数据以描述它运行所需的东西。这些数据被称

为货单，包括很多信息，例如：元件身份(名称、版本等等)；一个列出了所有文件之间

的依赖关系的表，以及它们的位置和版本；包括DLL相关数据的外部依赖关系信息；还有

其它元件需要而开发者没有创建的资源。元件是自说明的(通过它们的货单)，所以.NET

应用程序不需要修改注册表才能工作。换句话说，你不再需要注册表组件。在最好的情

况下，即客户机里已经有了.NET运行库时，分发一个复杂的应用程序可能只是把一个文

件夹复制到目标机器上这么简单的事。元件的另一个好处是：你可以让不同的应用程序

使用同一个DLL的不同版本，并且协调地运行在一台机器上。如果所有这些都可以像计划

中那样工作，有关DLL的地狱和版本的噩梦就将成为往事。

正确之路

Microsoft彻底更新了它的技术，而不仅仅是核心语言。例如，在Visual Studio.N

ET里同时提供了ADO.NET，这是有特殊优点的下一代ActiveX Data Objects (ADO) 版本

。它的一个灵活改变是：ADO.NET用Extensible Markup Language (XML)作为在组件之间

传递数据集的格式。这意味着接收组件不一定必须是ADO.NET组件，同时接收组件可以接

受任何XML 格式的数据集。谈到XML，它支撑着VS.NET中的任何东西，从配置文件到远端

过程调用。ADO.NET在处理断开的数据集时比 ADO的性能要好，并且具有更好的伸缩性。

Visual Basic.NET对我们都很熟悉的VB做了重要的改变。C++革命性地跳跃到.NET后

有了一个新名字：C#，而Visual Basic的名字没变。然而，如果你把VB.NET当作语法相

似的一门新语言而不是简单的“升级”，可能掌握起来就要容易一些。本文给你一个起

点，但吸收掌握各种知识，并对未来做出有根据的决定是一个艰苦的过程，它只是这个

过程的一条起跑线。我不知道.NET会有多么成功，它的很多地方吸引我，但有些地方并

非如此。这个工具做了大量承诺，它夸耀很多功能能使 VB开发者更简单地创建更有伸缩

性的高端应用程序。最后，它的成功将取决于开发者能多好地将它应用于现实世界。纵

观Microsoft在PDC和Beta 1版本之间的性能和稳定性上所跨过的这一步，我坚定地认为

：Microsoft走对了路！

VB.NET的API调用

现在我用我所知道的为楼主介绍VB.NET的API调用，请楼主浏览一下，看看行不行。

Windows API就是Windows系统的API函数简称（Application Program Interface，即：应用程序接口函数），它是Windows操作系统提供给各种开发基于Windows平台应用软件的开发语言的一些公用的函数，这些函数一般都比较底层，所以当各种开发语言使用自带的函数或类库已无法解决问题时，调用Windows API函数往往是一种非常直接、有效的解决方法。但由于在程序中调用Windows API函数一般都很复杂，所以对于程序员来说，是否能够灵活的使用Windows API函数，往往也是其水平高低的一个重要标志。但自从微软推出.Net框架以后，各种开发基于.Net平台下的程序语言，如Visual Basic .Net、Visual C＃等却很少使用Windows API函数，并且微软公司也不像以前那样，提倡在这些.Net开发语言中使用Windows API函数，其主要的原因如下：

1. .Net框架所附带的类库.Net FrameWork SDK是一个内容丰富、功能强大的软件开发包，各种Windows API函数所实现的各种功能几乎都可以在这个软件开发包中找到与之对应的部分。

2. 微软Visual Basic .Net、Visual C＃等目的是编写跨平台的应用程序，如果在Visual Basic .Net、Visual C＃等中使用Windows API函数，这也就注定了编写出的程序只能运行于Windows平台之下，而弱化了.NET的跨平台能力。这也就是为什么微软不提倡在.Net平台调用Windows API函数的原因。

虽然微软并不提倡在Visual Basic .Net、Visual C＃中调用Windows API函数，但由于目前.Net 框架推出时间较短，.Net FrameWork SDK中提供的类库还并不足以完全替换Windows API函数的所有功能，所以在某些时候，.Net开发语言还是必须要调用Windows API函数。

一.平台调用、托管DLL、非托管DLL简介：

托管DLL就是能够在公共语言运行库（Common Language Runtime，简称CLR）中能够直接引用的，并且扩展名为“DLL”的文件。具体所指就是封装各种命名空间所在的DLL文件，如System.dll等。非托管DLL就是平常所的动态链接库等，其中就包括了封装所有Windows API函数的DLL文件。各种非托管DLL中的函数在公共语言运行库中不能直接被调用，而需要经过.Net框架提供的“平台调用”服务后才可以。

“平台调用”是.Net框架为Visual Basic .Net、Visual C＃等.Net开发语言提供的一种服务，用以在托管代码中引入各种非托管DLL中封装的函数（其中包括Windows API函数）。“平台调用”依赖于元数据在运行时查找导出函数并封装其参数。图01公共语言运行库利用“平台服务”调用非托管DLL中的函数的流程图：

图01：“平台服务”的调用非托管函数的流程图

在托管代码中使用“平台调用”服务调用非托管DLL中封装的函数时，“平台服务”将依次执行以下操作：

1． 查找包含该函数所在的DLL文件。

2． 如果找到，则将该DLL文件 加载到内存中。

3． 查找函数在内存中的地址并将其参数推到堆栈上，并封送所需的数据。

4． 将控制权转移给非托管函数。 这样整个函数调用完成。

在Visual Basic .Net中使用“平台调用”服务，申明Windows API函数主要有二种具体的实现方法：

1． 使用DllImport特征类来申明Windows API函数。

2． 使用“Declare”语句来申明Windows API函数。

这二种方法虽有异曲同工之效，但在繁简上却有很大差异，第一种方法申明过程比较复杂，很容易在申明Windows API函数时出错，所以并不提倡。而第二种方法相对简单，并且又保存了以前Visual Basic中的很多语法，所以在平常时大都使用这种方法来申明Windows API函数。

二．VB.Net查看文件中图标的函数及申明Windows API的方法：

Visual Basic .Net要实现查看文件中的图标，目前只使用.Net FrameWork SDK是无法实现这种功能的，正如前面所说，主要是由于.Net FrameWork SDK推出的时间较短，其功能还不可能面面俱到。解决问题的关键是正确使用Windows API函数，其中所涉及到的Windows API函数主要有二个：其一是获得指定文件中的图标数目；其二是从指定文件的指定位置导出图标的Windows句柄。这二个函数都位于“Shell32.dll”文件中，并且函数的入口点都为“ExtractIcon”。下面是在Visual Basic .Net中分别使用DllImport特征类和“Declare”语句申明这二个Windows API函数的具体方法。

（1）.使用DllImport特征类来申明Windows API函数：

下面是在Visual Basic .Net中使用DllImport特征类申明二个Windows API函数的具体示例：

'函数ExtractIcon，其功能是是从指定文件的指定位置导出图标的Windows句柄。

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

'函数Icon_Num，其功能是获得指定文件中的图标数目

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _

Public Function _

Icon_Num ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As Integer ) As Integer

End Function

在使用DllImport特征类申明Windows API函数时，如果申明的函数名称和函数的入口点相同，则可以在申明Windows API函数时，省略定义函数入口点对应的代码，即EntryPoint对象字段对应的代码，这样声明ExtractIcon函数的代码也可以简化为如下所示：

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

（2）.使用“Declare”语句来申明Windows API函数：

使用“Declare”语句的确比使用DllImport特征类要简单了许多，下面是在Visual Basic .Net中使用“Declare”语句来声明上述二个Windows API函数的具体方法：

Declare Auto Function ExtractIcon Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

'声明ExtractIcon函数

Declare Auto Function Icon_Num Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As Integer ) As Integer

'声明Icon_Num函数

在Visual Basic .Net中声明Windows API函数时，“Declare”语句中Alias关键字的作用相当于使用DllImport特征类中的EntryPoint对象字段。同样在使用“Declare”语句声明Windows API函数时，如果声明的函数和函数的入口点相同，也可以省略Alias关键字对应的代码，所以ExtractIcon函数也可以简化为如下：

Declare Auto Function ExtractIcon Lib "Shell32.dll" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

下面就结合一个示例的编写过程来掌握的这二个Windows API函数的具体使用方法，这个示例的作用就是读取指定文件中的图标数目，并显示文件中的图标。

三．本文中程序的编写、调试和运行环境：

（1）.视窗2000高级服务器版。

（2）.Visual Studio .Net 2003企业结构设计版，.Net FrameWork SDK版本号4322。

四．Visual Basic .Net读取文件中的图标的实现步骤：

下面介绍的示例，其功能读取指定文件中包含的图标数目，并把这些图标全部显示出来。下面是这个示例的实现步骤：

1. 启动Visual Studio .Net。

2. 选择菜单【文件】|【新建】|【项目】后，弹出【新建项目】对话框。

3. 将【项目类型】设置为【Visual Basic项目】。

4. 将【模板】设置为【Windows应用程序】。

5. 在【名称】文本框中输入【Visual Basic .Net查看文件中的图标】。

6. 在【位置】的文本框中输入【E:\VS.NET项目】，然后单击【确定】按钮，这样在【E:\VS.NET项目】目录中就产生了名称为【Visual Basic .Net查看文件中的图标】文件夹，里面存放着【Visual Basic .Net查看文件中的图标】项目的所有文件。具体如图02所示：

图02：【Visual Basic .Net查看文件中的图标】项目的【新建项目】对话框

7. 选择菜单【项目】|【添加新项】，在弹出的对话框中的【模板】设置为【模块】，【名称】文本框设置为【Module1.vb】后。单击【打开】按钮，则在项目中增加了一个模板文件，名称为【Module1.vb】。

8. 把Visual Stuido .Net的当前窗口切换到Module1.vb的代码编辑窗口，并在其Module1的代码区中添加下列代码，下列代码是用二种方式声明二个Windows API函数：

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As String , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

'声明ExtractIcon函数

Declare Auto Function Icon_Num Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As String , ByVal uiIconIndex As Integer ) As Integer

9. 把Visual Studio .Net的当前窗口切换到Form1窗体的设计查看，并从【工具箱】中的【Windows窗体】选项卡中拖入下列组件到Form1窗体：

四个Label组件，其中二个用以显示提示信息，另外二个分别用以显示选择的文件名称和这个文件中包含的图标数目。

一个ListView组件，利用其显示大图标的属性用以显示选定文件中的图标。

一个OpenFileDialog组件，用以选择要查看图标的文件名称。

一个ImageList组件，它起的是桥梁的作用，首先把从文件中导出的图标存放到这里，然后再提供ListView组件显示出来。

一个Button组件。

10. 按照表01中数值来设定设定组件的主要属性：

组件类型 组件名称 属性 设置结果

Form Form1 Text VB.NET查看文件中的图标

Form1 MaximizeBox False

Form1 MinimizeBox False

Form1 FormBorderStyle FixedSingle

ListView ListView1 ImageList1 LargeImageList

ListView1 MultiSelect False

ListView1 Size Size ( 380 , 208 )

Button Button1 Text 选择文件

Button1 FlatStyle Flat

ImageList ImageList1 Size Size ( 32 , 32 )

ImageList1 TransparentColor Color.Transparent

Label Label1 Text 文件名称：

Label2 Text 图标数目：

Label3 Text ""

Label4 Text "0"

表01：【Visual Basic .Net查看文件中的图标】项目窗体中各组件的主要属性设定数值表

并按照图02中各组件的位置、大小和排列方式来调整窗体中各个组件：

图02：【Visual Basic .Net查看文件中的图标】项目的设计界面

11. 把Visual Studio .Net当前窗口切换到Form.vb的代码编辑窗口，并用下列代码替换Form1.vb中的Button1组件的Click事件的处理代码，下列代码是在Button1组件的Click事件中处理查看文件中图标的功能，具体如下：

Private Sub Button1_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click

If OpenFileDialog1.ShowDialog ( ) = DialogResult.OK Then

'清除组件中的所有项目

ListView1.Items.Clear ( )

ImageList1.Images.Clear ( )

Dim sfName As String = OpenFileDialog1.FileName

Label3.Text = sfName

Dim iIcon_Num As Integer = Icon_Num ( IntPtr.Zero , sfName , -1 )

'显示文件中的图标数目

Label4.Text = iIcon_Num.ToString ( )

Dim i As Integer

For i = 0 To iIcon_Num - 1 Step 1

'强制实现int到uint类型转换

Dim j As UInt32

j = System.Convert.ToUInt32 ( i )

Dim hIcon As System.IntPtr = ExtractIcon ( IntPtr.Zero , sfName , j )

'在imageList1组件中加入当然提取的图标

ImageList1.Images.Add ( Icon.FromHandle ( hIcon ).ToBitmap ( ) )

'在ListView组件中加入一个项目

ListView1.Items.Add ( "第" + ( i + 1 ).ToString ( ) + "个图标" )

'把加入项目的图象索引指向刚才加入图标在imagList1组件中的索引，从而显示图标

ListView1.Items ( i ).ImageIndex = i

Next i

End If

End Sub

12. 至此，在上述步骤都正确执行后，【Visual Basic .Net查看文件中的图标】项目的全部工作就完成了。单击快捷键F5就可以运行程序，此时单击【选择文件】按钮选择文件后，程序就能够读取这个文件中的图标及其数目，并显示出来了。具体如图03所示：

图03：【Visual Basic .Net查看文件中的图标】项目的运行界面

五．总结：

解决Visual Basic .Net查看文件中的图标的关键并非是使用.Net框架中提供的类库，而是使用Windows的API函数。虽然这与利用Visual Basic .Net开发跨平台程序的初衷相违背，但的确不失为一种解决问题的方法。有些时候通过Windows API函数能够快捷、方便的解决实际问题，而这往往是只使用.Net FrameWork SDK所望尘莫及的，但随着.Net FrameWork SDK内容的不断丰富，各种新的组成部分和新的功能不断加入，可以预见的是，在未来的.Net FrameWork SDK中必将拥有可以替换本文中介绍的二个Windows API函数的组成部分。