vb.net 的structure结构语自学笔记

    技术2022-05-11  11

    Public Structure good '定义一个名为good的结构语句块

        Public di As String   '声明此结构的成员,此成员为字符串形

        Public ei As Integer '声明此结构的成员,此成员为整数形

    End Structure

     

    ----------------------------------------------------------------------------------------------------

     

    Public Class Form1

        Public Sub objGood(ByVal FIND As good) '创建一个objGood方法(也称为函数),同时为GOOD结构创建了一个按值传递的变量FIND。

            '也就是说此函数传入的参数是结构GOOD的一个变量,名称是:FIND ,它包含了GOOD结构下的所有成员,在本列中为:di,ei.

     

            txtB1.Text = FIND.di '给第一个文本框赋值,其值为find变量内的di值。

            txtB2.Text = FIND.ei.ToString '同上。

     

        End Sub

     

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

     

            Dim LI As good '声明LI是good结构的变量。其同样包含了GOOD结构下的所有成员。

            LI.ei = 123456 '为变量li内的ei赋值。

            LI.di = "lihaigen" '原理同上。

     

            objGood(LI) '把good结构的变量LI及相对应成员的值作为参数传递给我objGood方法(自定义函数),此时变量LI=变量FIND.

            '传入后相当于  txtB1.Text = LI.di

            '              txtB2.Text = LI.ei.ToString

        End Sub

     

        Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

     

            Dim WAN As good  '在这个事件当中又定义了另一个变量WAN为good结构的变量。其赋值和传递原理同上。

            WAN.ei = 888888

            WAN.di = "wangbaojun"

            objGood(WAN)

     

        End Sub

     

        '由此可见,结构成员可以包含给它的任何一个变量并变为这些变量的成员,并可以对这些变量当中的成员赋值,虽然这些变量都同属于一个结构,但互不影响。

    End Class


    最新回复(0)