| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3313 人关注过本帖
标题:有人能详解下 get ... end get set ... end set 语句的详细调用过程及使用 ...
只看楼主 加入收藏
moou
Rank: 2
等 级:论坛游民
威 望:1
帖 子:22
专家分:40
注 册:2018-8-15
结帖率:0
收藏
 问题点数:0 回复次数:3 
有人能详解下 get ... end get set ... end set 语句的详细调用过程及使用原理之类的吗?新手不是很理解这个函数,谢谢!MSDN
程序代码:
Public Class Form1

    Dim firstName, lastName As String
    Public Property fullName() As String
        Get
            If lastName = "" Then
                Return firstName
            Else
                Return firstName & " " & lastName
            End If

        End Get
        Set(ByVal Value As String)
            Dim space As Integer = Value.IndexOf(" ")
            If space < 0 Then
                firstName = Value
                lastName = ""
            Else
                firstName = Value.Substring(0, space)
                lastName = Value.Substring(space + 1)
            End If
        End Set
    End Property

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        fullName = "Firstname LastName"
        MsgBox(fullName)
    End Sub
End Class
搜索更多相关主题的帖子: get end set Value space 
2018-10-17 15:48
moou
Rank: 2
等 级:论坛游民
威 望:1
帖 子:22
专家分:40
注 册:2018-8-15
收藏
得分:0 
再加一个示例:

程序代码:
    'txtEdit 是一个TextBox
    Public Property EditText() As String
        Get
            Return txtEdit.Text
        End Get
        Set(ByVal value As String)
            txtEdit.Text = value
        End Set
    End Property

    '使TextBox内的字符变成大写 这里EditText = EditText.ToUpper 返回到get set 是怎么个调用过程?
    Public Sub UpperCaseText()
        EditText = EditText.ToUpper
        StatusText = "The text is uppercase"
    End Sub
2018-10-17 16:02
lgwd
Rank: 3Rank: 3
等 级:论坛游民
威 望:8
帖 子:89
专家分:67
注 册:2014-1-17
收藏
得分:0 
看看书,规定格式。要讲可是要费些笔墨,恐怕没有耐心!
2018-11-27 12:44
moou
Rank: 2
等 级:论坛游民
威 望:1
帖 子:22
专家分:40
注 册:2018-8-15
收藏
得分:0 
回复 3楼 lgwd
看了不少,不是特别理解,所以才来论坛咨询一下
2018-12-03 16:40
快速回复:有人能详解下 get ... end get set ... end set 语句的详细调用过程 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018427 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved