彩票走势图

　　在进行某些算法的C语言编程的时候，需要使几种不同类型的变量存放到同一段内存单元中。也就是使用覆盖技术，几个变量互相覆盖。这种几个不同的变量共同占用一段内存的结构，在C语言中，被称作“共用体”类型结构，简称共用体，也叫联合体。

　　在C++中有一种类型叫做联合体（也叫共用体），它的关键字为union，在使用上与结构struct非常相似，可以包含任何的结构类型数据，但它又有一个非常独特的特性，那就是所有的数据都指向一个地址。

　　这个意思你可以理解为：联合体中的所有数据都是引用一个内存块中相同地址的数据，当我们改变这个联合体内任何一种数据的值时，其他的数据的值都会随之改变。

　　这对于未知类型的数据非常有效，你可以使用联合体装载一个数据，然后分析其数据是否有效，或者可以对某些特殊的类型进行位运算，获取其特殊位置的数值。

　　 但在VB.NET或C#中，根本没有union关键字让我们声名联合体，但该怎么做才能声名联合体呢？

　　 这需要用到结构属性！

　　让我们看看如何将下面的C++联合体代码转换为一个VB.NET的联合结构吧！

    union myunion

    {

    char b; //单字节整数，在c语言中用char类型来表示单字节整数

    short s; //双字节整数

    int i; //四字节整数

    }

    这个联合体大小为4个字节，其各个数据分别表示为单字节、双字节、四字节的整数，在运行期间其任何数据的改变都会影响其他数据。

    Improts System.Runtime.InteropServices '引入运行时非托管数据管理服务

    引入结构属性，精确控制结构中元素的位置

    <StructLayout（LayoutKind.Explicit）> _

    Structure MyUnion

    ' 设置字段的偏移值，设为0即可

 &nbsp;  <FieldOffset（0）> Dim b As Byte '单字节整数

    <FieldOffset（0）> Dim s As Short '双字节整数

  &nbsp; <FieldOffset（0）> Dim i As Integer '四字节整数

    End Structure

　　这就是在.NET中设置联合结构的方法，C#中于VB.NET中的设置方法雷同，这里就不做赘述了。

　　下面来介绍联合体的特性应用，就以上面我们刚才声名的联合体结构为例，下面的代码将为我们演示联合体的特性：

    Dim MU As New MyUnion

    MsgBox（String.Format（"{0} {1} {2}", MU.b, MU.s, MU.i））

    '0 0 0

    MU.s = Int16.MaxValue

    MsgBox（String.Format（"{0} {1} {2}", MU.b, MU.s, MU.i））

    '255 32767 32767

    MU.b = 12

    MsgBox（String.Format（"{0} {1} {2}", MU.b, MU.s, MU.i））

    '12 32524 32524

    MU.i = 0

&nbsp;   MsgBox（String.Format（"{0} {1} {2}", MU.b, MU.s, MU.i））

    '0 0 0

　　上面的代码可以更直观地显示数据在内存中的变化，每当改变联合数据时，其他的数据也会随着内存的变化而变化。

　　当然，使用联合体也有限制，那就是.NET的联合体只适用于值类型，无法应用在引用类型和指针中，你无法设置字符串（String）或是数组进入联合类型，这一点需要非常的注意！

　　当然，.NET中的联合结构体并不只有上面的用法，你可以发挥自己的想象力，比如可以：

    <StructLayout（LayoutKind.Explicit）> _

     Structure MyUnion2 www.jokedu.com

&nbsp;  ; <FieldOffset（0）> Dim b1 As Byte

&nbsp;   <FieldOffset（1）> Dim b2 As Byte

    <FieldOffset（2）> Dim b3 As Byte

    <FieldOffset（3）> Dim b4 As Byte

    <FieldOffset（0）>; Dim i As Integer

  &nbsp; <FieldOffset（0）> Dim ui As UInteger

    End Structure  这个结构可以获取一个有或无符号的四个字节整数每一个字节的数据，而不需要自己写算法来分析了。

    测试代码：

    Code：

    Dim MU As MyUnion2

    MsgBox（MU.i & " : " & MU.ui） '0 : 0

    MsgBox（String.Format（"{0} {1} {2} {3}&quot;, Hex（MU.b1），

    Hex（MU.b2）， Hex（MU.b3）， Hex（MU.b4）））

    '0 0 0 0

    MU.b1 = 255 : MU.b2 = 255 : MU.b3 = 255 : MU.b4 = 255

  &nbsp; MsgBox（String.Format（&quot;{0} {1} {2} {3}", Hex（MU.b1），

   ; Hex（MU.b2）， Hex（MU.b3）， Hex（MU.b4）））

    'FF FF FF FF