VBA学习笔记

语句:Open pathname For mode [Access] [lock] As [#]filenumber[Len=reclength]
filenumber :必要。一个有效的文件号,范围在1 到 511 之间。

[Dim的来由]
在Basic语言中,通过定义数组的大小,用DIM,英文全称Dimension,中文意思是尺寸的意思。在VB中则延伸DIM用来定义变量;Dim法语中Dimanche的简写,含义为星期日。
[Dim的用法]
Dim就是定义变量,与关键字Private(私有的)相当,定义变量方法为:Dim 变量 As 变量类型。定义时指定数据类型是为了节省空间、合理利用资源。
定义变量可以使用显式或隐式两种方式定义:
1、显式定义:Dim 变量名 As 类型
2、隐式定义:使用类型说明符
变量的定义例:
Private gAppErrNumber As Long  定义类型为long的私有变量gAppErrNumber
Private gAppErrString As String  定义类型为String的私有变量gAppErrString
Dim endStatus As String  定义类型为String的变量endStatus
VB Dim数组的定义与声明详解:
函数原型:
Dim 数组名([下标下界] To [下标上界]) [As 数据类型]
例如(假设在当前模块中数组的缺省下界为0):
1、Dim A(10) As Integer
表示数组名为A,此数组下标下界为缺省值0,下标上界为10,有11个Integer类型的元素,从A(0)、A(1)到A(10)。
2、Dim B(1 To 20) As Integer
表示数组名为B,此数组下标下界为1,下标上界为20,有20个Integer类型的元素,从B(1)到B(20)。
3、Dim DayArray(50)
表示DayArray是一个有51个索引(从0到50)元素的Variant数组。
4、Dim Matrix(3, 4) As Integer
表示Matrix是一个二维Integer数组。
5、Dim MyMatrix(1 To 5, 4 To 9, 3 To 5) As Double
表示MyMatrix是一个显式指定了上下界的三维double数组。
6、Dim BirthDay(1 To 10) As Date
表示BirthDay是一个索引从1到10的Date型数组。

  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
非常好的问题!让我来回答你的问题。 首先,关于VBA学习笔记(一):自动添加代码,你可以使用VBA的宏来自动添加代码。具体步骤如下: 1. 打开你要添加代码的Excel文件,并按下Alt + F11进入VBA编辑器界面。 2. 在左侧的“项目资源管理器”窗格中,展开你的Workbook,并双击“这台电脑”(或“Microsoft Excel 对象”),打开相应的代码窗口。 3. 在代码窗口的顶部,选择“工具” > “宏” > “录制新宏”。 4. 在弹出的“新建宏”对话框中,为新宏命名,并选择一个快捷键,以便日后调用。 5. 点击“确定”后,VBA会自动开始录制你的操作。 6. 在代码窗口中,添加你需要自动执行的代码。 7. 完成代码添加后,点击“停止录制”按钮,保存你的新宏。 接下来,关于VBA修改注册表,你可以使用VBA的“WshShell”对象来实现。具体步骤如下: 1. 在VBA编辑器中,打开你要修改注册表的代码窗口。 2. 在代码窗口的顶部,添加以下代码: ``` Dim WshShell As Object Set WshShell = CreateObject("WScript.Shell") ``` 这将创建一个名为“WshShell”的对象,用于执行后续的注册表修改操作。 3. 接下来,你可以使用该对象的“RegWrite”方法来修改注册表。例如,以下代码将修改Windows启动时自动运行的程序列表: ``` WshShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MyApp", "C:\MyApp.exe", "REG_SZ" ``` 该代码将在“HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run”键下添加一个名为“MyApp”的值,其值为“C:\MyApp.exe”,类型为“REG_SZ”。 4. 完成代码添加后,保存并执行你的代码。 希望这些步骤对你有所帮助!
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

浮华蒲公英

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值