Sub 单引号注释() '定义整型变量i Dim i As Integer i = 3 i = 30 '修改变量i的值 End Sub 单引号注释在任何地方都可以直接使用,不需要“:”。 三、Print方法语句 Print方法用来在“立即窗口”打印结果: Sub Print语句() Dim a As Integer a = 3 Debug.Print a Debug.Print "a="; a Debug.Print...
SubMyCode()Dim i As Integer For i=2To10IfCells(i,"B").Value>=60ThenCells(i,"C")="及格"End If Next i End Sub 我们可以看到,我们使用 B 列中的学生成绩与 60 分比较,如果≥60分,就在 C 列填写及格。 条件表达式是Cells(i, "B").Value >= 60,选择性执行的代码部分是Cells(i, "C") ...
Dim intX&, intY%, intZ as Integer Public 语句 使用Public语句声明公共模块级变量。 VB PublicstrNameAsString 可以在项目中的任何过程中使用公共变量。 如果在标准模块或类模块中声明公共变量,则还可以在引用声明该公共变量项目的任何项目中使用该变量。
常用的为 Integer(整型)、 Long(整数)、Single(单精度浮点数)、Double(双精度浮点数)。 浮点数:数学中的小数 DimiAsLong,DimjAsSinglei=-1123123123123:j=1e-4 定义变量符号是紧挨着变量后的一个特殊字符,相当于对特定类型的一种简写形式: Dim Pi# '相当于 ↓ 方式 Dim Pi As Double ' 对于函数的返回值限...
Dim intX&, intY%, intZ as Integer Public 语句 使用Public语句声明公共模块级变量。 VB PublicstrNameAsString 可以在项目中的任何过程中使用公共变量。 如果在标准模块或类模块中声明公共变量,则还可以在引用声明该公共变量项目的任何项目中使用该变量。
在下面的代码行中,一个固定大小的数组声明为具有 11 行和 11 列的 Integer 数组:VB 复制 Dim MyArray(10, 10) As Integer 第一个参数代表行;第二个参数代表列。除非为数组指定数据类型,否则和其他任何变量声明一样,声明数组中元素的数据类型为 Variant。 数组的每个数字 Variant 元素使用 16 位元组。 每个...
Excel利用VBA生成一列不重复的随机整数如果我们要用VBA生成一列不重复的随机整数,可以用下面的VBA代码。本例可以在A1:A100中产生1-100的不重复随机整数。Sub RndNumberNoRepeat()Dim TempArr1(99) As Integer, TempArr2(0 To...
Dim i As Integer Dim shp As Shape Dim hyperlinkAddr As String On Error Resume Next Set indexSheet = Worksheets("目录") If indexSheet Is Nothing Then Set indexSheet = ThisWorkbook.Sheets.Add(Before:=ThisWorkbook.Sheets(1)) indexSheet.Name = "目录" ...
前面代码中常使用integer整型变量、string字符串变量,先声明变量,再对变量赋值。如下图示例: Dim i As Integer, j As String声明了i为整型变量,j为字符串变量,然后通过let i = 1和let j = "你好"分别为两个对象赋值,(等号右侧内容与变量的类型相同),代码中省略let。
Dim xj As String, i As Integer For i = 2 To 50 Step 1 Select Case Cells(i, "A") Case 0 To 59 xj = " D " Case 60 To 69 xj = " C " Case 70 To 89 xj = " B " Case 90 To 100 xj = " A " Case Else xj = " 输入错误!" ...