百度360必应搜狗淘宝本站头条
当前位置:网站首页 > 编程网 > 正文

VBA使用函数执行对象方法,一个不能错过的高级技能

yuyutoo 2024-10-20 13:05 9 浏览 0 评论

No.1

VBA提供了许多对象,以及对象的方法和属性,面向对象编程的优点就在于此。

利用这些内置对象可以实现各种各样的编程目的。

本节介绍一个如何执行对象方法的函数。

也就是说代码中,需要对某个对象的方法进行执行,我样可以利用如下函数来实现调用过程。

No.2

CallByName函数

此函数的功能有两个,一个是执行对象的方法,另一个是设置或调取对象的属性。

具体语法可查看下图:

使用方法也很简单,但是要在熟悉对象方法和属性的前提下。

如果对于对象的方法和属性没有一个完整的了解,那么就不能很熟练地使用此函数。

所以首先要熟悉要操作的对象和其拥有的一些基本属性。

本节中使用了两个对象,一个是按钮对象,一个是标签对象。

通过对这两个对象的"Caption"属性进行设置,实现CallByName函数的应用。

同时,使用Move方法对按钮对象的位置进行移动。

如下图所示:

No.3

单击按钮后,实现上述过程描述。

CallByName函数应用于,过程中需要改变对象属性的,或要实现对象方法的过程中。

通常情况下可能不会随意改变对象属性,如果对象属性是一个可变量,那么就可以考虑使用本函数进行设置。

No.4

代码

Private Sub CommandButton1_Click()
''' CallByName函数使用方法
Dim Cname1 As String, Cname2 As String
Dim X1 As String, X2 As String
Cname1 = "设置前"
Cname2 = "设置后"
If Me.CommandButton1.Caption = Cname2 Then
        CallByName Me.CommandButton1, "Caption", VbLet, Cname1
        '设置按钮文本
        X1 = "按钮文本: " & CallByName(Me.CommandButton1, "Caption", VbGet)
        '取按钮文本属性
        CallByName Me.Label1, "Caption", VbLet, X1
        '设置标签文本
        CallByName Me.CommandButton1, "move", VbMethod, 100, 150
        '调用Move方法
Else
        CallByName Me.CommandButton1, "Caption", VbLet, Cname2
        X2 = "按钮文本: " & CallByName(Me.CommandButton1, "Caption", VbGet)
        CallByName Me.Label1, "Caption", VbLet, X2
        CallByName Me.CommandButton1, "move", VbMethod, 100, 100
End If
End Sub

实际应用中,CallByName函数还是有很大的作用,对于提高程序的执行效率和过程的便捷性,都是一个必不可少的函数。

特别是对于数据变化量比较大的情况下,可实现动态改变对象属性,有利于表单的整洁和美观。

欢迎关注、收藏

---END---

相关推荐

Docker部署 chatgpt-web-midjourney-proxy:开启一站式AI与绘图

ChatGPT和Midjourney的结合无疑是创新性的突破。ChatGPT作为强大的语言模型,能够为用户提供智能的对话和文本生成服务。而Midjourney则以其出色的绘画能力,能够根据...

Cacti监控服务器配置教程(基于CentOS+Nginx+MySQL+PHP环境搭建)

具体案例:局域网内有两台主机,一台Linux、一台Windows,现在需要配置一台Cacti监控服务器对这两台主机进行监控...

那些少为人知却非常有意思好用的 Chrome 扩展

ChromeWebStoreSessionManager要睡觉了,还有网页没看完怎么办?等明天点开歷史记录重新加载?No!有这个保存当前打开的链接,下回直接打开一串网址,好顶赞有木有!!!chr...

分享一款轻量级 HTTP(S) 代理 TinyProxy

概述众所周知,我们常用的Web服务器Nginx/Apache都可以很方便的用来做为正向或反向代理服务器使用。但是它们都并不支持HTTPS的正向代理。Nginx做为正向代理不支持HT...

深入理解 WebSecurityConfigurerAdapter「源码篇」

我们继续来撸SpringSecurity源码,今天来撸一个非常重要的WebSecurityConfigurerAdapter。我们的自定义都是继承自WebSecurityConfigurer...

RPC、Web Service等几种远程监控通信方式对比

几种远程监控通信方式的介绍一.RPCRPC使用C/S方式,采用http协议,发送请求到服务器,等待服务器返回结果。这个请求包括一个参数集和一个文本集,通常形成“classname.meth...

老酒好喝,5G时代数据中心柴油发电机组以GPRS方式接入动环监控

背景:随着手机的普及,电信运营商基站越建越多,网络覆盖范围也越来越广,基本上随时随地都能通过运营商的网络上网冲浪,这给我们传统的通过有线方式实现的动环监控也提带来了新的启发:对于不具备有线传输条件的的...

为了春节红包大战,微信做了一次成功的预热!

经过上午的预告,微信在今天下午17:00正式推出了微信红包新玩法——红包照片。微信用户在朋友圈点击照片发送按钮,会看到“红包照片”选项,用户在选择发布照片之后,这张照片将被模糊处理后,再发送到朋友...

Proxy-Lite实战:3步部署+2个案例,轻松掌握轻量级网页自动化

大家好,我是何三,80后老猿,独立开发者一、Proxy-Lite模型概述...

会Python?那么你一定要试一试mitmproxy

mitmproxy是一款工具,也可以说是python的一个包,使用这个工具可以在命令行上进行抓包(现在也可以在web页面上查看上抓的数据包了),还可以对所抓到的包进行脚本处理,非常有用。和...

十大Web安全扫描工具,你知道哪些?

初入门时,喜欢将目标站点直接丢扫描器,慢慢等扫描结果,极度依赖Web扫描器;而有一些漏洞高手,善于运用运用各种工具但并不依赖工具,经常可以找到扫描工具发现不了的漏洞。一款好用的Web扫描器对于白帽子来...

鸿蒙5网页开发神器 ArkWeb:让 Web 和原生手拉手跳舞

你有没有想过,在鸿蒙应用里既能用原生代码写高性能界面,又能直接塞进一个网页?这听起来有点像把汉堡和披萨拼在一起,但ArkWeb(方舟Web)真的做到了!今天咱们就聊聊这个神奇的工具,看看它如何让...

MapReduce过程详解及其性能优化(详细)

从JVM的角度看Map和ReduceMap阶段包括:第一读数据:从HDFS读取数据1、问题:读取数据产生多少个Mapper??Mapper数据过大的话,会产生大量的小文件,由于Mapper是基于虚拟...

大数据平台建设需要掌握的14个知识

Q1、大数据分析中的实时推荐是如何实现的?@rein07某证券系统架构师:实时推荐需要使用实时处理框架结合推荐算法,从而做到对数据的实时处理和推荐。实时处理框架有Storm、Flink、Spark...

HDFS可视化管理系统设计与实现(hdfs的可靠性设计,主要依靠哪些机制来实现)

摘要:Hadoop工具核心模块包括分布式文件系统(HadoopDistributedFileSystem,HDFS)和分布式编程模型MapReduce,其中HDFS是Hadoop数据存储处理的...

取消回复欢迎 发表评论: