使用.NET多线程技术显示实时股票信息

　本文的内容是学习如何使用多线程技术建立应用程序，使应用程序在执行时间和资源密集型后台事务的时候，用户界面（UI）仍然保持活动状态。

　　多线程技术（multithreading）是编程中最强大的概念之一。使用多线程技术，你可以把复杂的事务拆分到彼此独立执行的多个线程之中。良好的多线程应用程序是自然地同步的，类似于Web服务调用。在默认情况下，Web服务调用属于阻塞（blocking）调用--即调用者（caller）的代码停止执行，直到Web服务返回结果为止。但是由于Web服务调用通常很慢，就可能导致客户端性能降低，除非你采用特殊的步骤使调用异步进行。

　　本文讲解的是如何建立一个图表应用程序，从这个例子中你可以看到如何在不影响客户端UI的时候异步地调用Web服务。示例代码利用Chart FX组件使用图形来显示股票信息。当然读者也可以使用.NET编写的免费图表类库。

　　建立一个Web服务

　　示例代码需要访问假想的股票报价Web服务。我们在Visual Studio .NET 2003中建立一个Web服务，把它命名为"StockWS"。这个Web服务由一个叫做getPrice()的Web方法组成，该方法只接受一个股票编码参数：

Public Function getPrice(ByVal stock As String) As Single 　Return Rnd() * 100 End Function

　　不管被请求的股票是什么，getPrice()方法都生成一个随机的价格。它的唯一目标是模拟一个返回特定股票价格的真实的Web服务。
尽管本文使用的是一个成型的Web服务来进行演示的，但是你可以轻易地替换这个Web服务以显示真正的股票信息。

　　使用Chart FX组件显示图形

　　在建立上面的Web服务项目之后，先给解决方案浏览器添加一个Windows应用程序项目（叫做Stock Quote，股票报价）。给该项目增加一个对前面所建立的Web服务的引用。解决方案浏览器现在应该如图1所示。

图1：解决方案浏览器中的项目－图中显示了StockWS Web服务项目和

　　Windows窗体项目Stock Quote

　　为了建立本文的示例项目，你必须从http://chartfx.com/下载和安装Chart FX组件30天试用版。在安装这个绘图组件之后，你可以在Visual Studio .NET 2003的工具盒中看到它（如图2所示）。

图2：工具盒中的Chart组件-你需要从网站上下载并安装Chart FX组件30天试用版。

　　在该Windows应用程序默认的Form1中，用下面一些控件填充该窗体，如图3所示：

　　· Chart
　　· ComboBox
　　· Button

图3：Stock Quote主窗体－图中显示了添加适当的控件之后窗体样式。

　　Chart（绘图）组件为定制自己的行为和外观提供了很多选项。你可以使用向导（位于属性窗体底部，如图4所示）格式化这个Chart组件。

图4：Chart组件的格式化向导－该向导为Chart组件提供了大量的格式化选项。

使用示例的最简单的方法是把下面一些Chart属性复制并粘贴到"Windows窗体设计器生成的"代码段中：

'Chart1 Me.Chart1.AxisX.Staggered = True Me.Chart1.AxisX.Step = 10 Me.Chart1.AxisY.Step = 10 Me.Chart1.BackObject = GradientBackground1 Me.Chart1.DataStyle =SoftwareFX.ChartFX.DataStyle.ReadXValues Me.Chart1.DesignTimeData = _ "C:\Program Files\ChartFX for .NET 6.2\Wizard\XYZero.txt" Me.Chart1.Gallery = SoftwareFX.ChartFX.Gallery.Lines Me.Chart1.InsideColor = System.Drawing.Color.Transparent Me.Chart1.LineWidth = 3 Me.Chart1.Location = New System.Drawing.Point(40, 16) Me.Chart1.MarkerShape =SoftwareFX.ChartFX.MarkerShape.None Me.Chart1.Name = "Chart1" Me.Chart1.NSeries = 1 Me.Chart1.NValues = 20 Me.Chart1.Palette = "HighContrast.HighContrast" Me.Chart1.PointLabels = True Me.Chart1.Size = New System.Drawing.Size(656, 216) Me.Chart1.TabIndex = 12 Me.Chart1.Titles.AddRange(New _ SoftwareFX.ChartFX.TitleDockable(){TitleDockable1})

　　同时，把下面一些数据项添加到组合框控件中："MSFT"、"SUN"、"YHOO"和"GE"。你可以在Form_Load事件中进行这样的操作：

Me.cmbStocks1.Items.AddRange(New String() {"MSFT", "SUN", "YHOO", "GE"})

　激活图形

　　下一步，导入下面的名字空间（在代码窗口的顶部）：

Imports SoftwareFX.ChartFX Imports System.Threading

　　定义用于线程的全局变量t1:

Dim t1 As Thread

　　在Chart1_Load事件中，初始化Chart组件：

Private Sub Chart1_Load(ByVal sender As _ System.Object, ByVal e As System.EventArgs) Handles Chart1.Load 　'x轴上每隔5点显示时间 　Chart1.AxisX.Step = 5 　'每个点之间用5象素间隔 　Chart1.AxisX.PixPerUnit = 5 　'使图表可以滚动 　Chart1.Scrollable = True 　'打开和关闭通讯管道 　Chart1.OpenData(COD.Values, 1, COD.Unknown) 　Chart1.CloseData(COD.Values) End Sub

　　给当前的窗体添加一个叫做StockQuote的类。StockQuote类调用前面的Web服务并用返回的股票价格来更新图表。

Public Class StockQuote 　'组件中图形的数量 　Const NUM_SERIES = 1 　Private lastPoint As Integer = 0 　Dim stockPric