双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒，抽取你的专属好礼

— 惊喜奖品抢先看 —

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

VB中的ByVal

2020-03-11 04:55:56 908 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

qq_44900374 墨衍会员 · AI 创作全网分发关注 + 加入社区

第三章、vb6的ByVal与ByRef详解日期：2021年04月26日作者：Commas 注释：网络上没有一个比较系统的VB6或者VBA的教程，于是打算利用中午休息的时间写一写这方面的教程，不喜欢写得很文绉绉，一切都以常用为前提进行介绍。因为要覆盖更多读者，所以本系列文章有些地方可能会介绍比较地通俗易懂，当然也会包含一些比较有意思的知识点，不喜勿喷，有问题敬请指出，有疑惑欢迎留言，大家一起讨论，共同进步，谢谢大家(^ _ ^) (^ _ ^) 目录文章目录一、函数或过程参数修饰符关键字二、ByVal的探讨三、ByRef的探讨一、函数或. 阅读详情

请问大家，以下两个子过程 Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click, MenuItem2.Click 和 Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 为什么前一个要在sender前加ByVal后一个却不用，难道第一个一定要强调是传值吗？

...全文

Linux系统安装AutoDockTools、AutoGrid和AutoDock并实现分子对接（详细讲解） linux系统为centos7.0 按照下面操作安装AutoDockTools（MGLTools） 1. 下载安装包，链接（https://ccsb.scripps.edu/mgltools/downloads/），我的linux系统是64位，下载红色标记源代码，拷贝入linux目标文件夹下。 2. shell终端进行安装： 1. 终端进入安装包所在文件夹，并获取root权限；赋予代码安装权限； cd /home/... #目标文件夹，根据目标程序文件位置进行更改 su #获阅读详情

qq_44900374

VB 16,718 成员 110,520 内容

+ 关注 + 加入社区

切换为时间正序

qq_44900374 2020-03-12

打赏
举报

引用 4 楼良朋的回复:

下面的示例中，实参是 c1，它是类 Class1 的一个实例。 ByVal 防止过程中的代码更改引用实参 c1 的基础值，但是不保护 c1 的可访问字段和属性。

Module Module1



    Sub Main()



        ' Declare an instance of the class and assign a value to its field.

        Dim c1 As Class1 = New Class1()

        c1.Field = 5

        Console.WriteLine(c1.Field)

        ' Output: 5



        ' ByVal does not prevent changing the value of a field or property.

        ChangeFieldValue(c1)

        Console.WriteLine(c1.Field)

        ' Output: 500



        ' ByVal does prevent changing the value of c1 itself. 

        ChangeClassReference(c1)

        Console.WriteLine(c1.Field)

        ' Output: 500



        Console.ReadKey()

    End Sub



    Public Sub ChangeFieldValue(ByVal cls As Class1)

        cls.Field = 500

    End Sub



    Public Sub ChangeClassReference(ByVal cls As Class1)

        cls = New Class1()

        cls.Field = 1000

    End Sub



    Public Class Class1

        Public Field As Integer

    End Class



End Module

多谢多谢！我懂了！

良朋 2020-03-12

打赏
举报

下面的示例中，实参是 c1，它是类 Class1 的一个实例。 ByVal 防止过程中的代码更改引用实参 c1 的基础值，但是不保护 c1 的可访问字段和属性。

Module Module1



    Sub Main()



        ' Declare an instance of the class and assign a value to its field.

        Dim c1 As Class1 = New Class1()

        c1.Field = 5

        Console.WriteLine(c1.Field)

        ' Output: 5



        ' ByVal does not prevent changing the value of a field or property.

        ChangeFieldValue(c1)

        Console.WriteLine(c1.Field)

        ' Output: 500



        ' ByVal does prevent changing the value of c1 itself. 

        ChangeClassReference(c1)

        Console.WriteLine(c1.Field)

        ' Output: 500



        Console.ReadKey()

    End Sub



    Public Sub ChangeFieldValue(ByVal cls As Class1)

        cls.Field = 500

    End Sub



    Public Sub ChangeClassReference(ByVal cls As Class1)

        cls = New Class1()

        cls.Field = 1000

    End Sub



    Public Class Class1

        Public Field As Integer

    End Class



End Module

threenewbee 2020-03-11

打赏
举报

VB默认Byref
VB.NET默认byval

qq_44900374 2020-03-11

打赏
举报

引用 1 楼良朋的回复:

ByVal可加可不加，但加了之后被调用的过程或属性不能更改调用它的代码中参数下面的变量的值。

谢谢您的回答。但我有一点不太理解，不能更改调用它的代码中参数下面的变量的值，这个变量是指代入子过程的变量，还是指过程产生的变量 e

良朋 2020-03-11

打赏
举报

ByVal可加可不加，但加了之后被调用的过程或属性不能更改调用它的代码中参数下面的变量的值。

✦双11狂欢大促✦

VB中的ByVal

相关推荐

双11狂欢大促