VBA数组用法-简易实例 - NAMEISFUCK

相关文章推荐

慈祥的佛珠 · 菲律宾单方面提起并推动南海仲裁案 - 中国军网· 4 月前 ·

读研的冲锋衣 · 湖北黄冈：一直在争取京九高铁阜阳至黄冈段尽早 ...· 7 月前 ·

开朗的熊猫 · 森田正馬 - Top 500件森田正馬 - ...· 1 年前 ·

谈吐大方的爆米花 · 凯迪拉克锐歌开始内卷：全系降价6万至35万区 ...· 1 年前 ·

狂野的投影仪 · 宝宝多大可以带去电影院看电影？90%家长都搞错了！· 1 年前 ·

'二维常量数组的定义 Sub arrDemo2 () Dim arr ( 1 , 1 ) As Variant 'Dim arr(0 To 1, 0 To 1) As Variant arr ( 0 , 0 ) = "apple" arr ( 0 , 1 ) = "banana" arr ( 1 , 0 ) = "pear" arr ( 1 , 1 ) = "grape" For i = 0 To 1 For j = 0 To 1 MsgBox arr ( i , j ) End Sub ''' ''' ''' '''用array函数创建常量数组 '一维数组 Sub arrayDemo3 () Dim arr As Variant '数组 arr = Array ( "vba" , 100 , 3 . 14 ) MsgBox arr ( 0 )

推荐文章

慈祥的佛珠 · 菲律宾单方面提起并推动南海仲裁案 - 中国军网

4 月前

读研的冲锋衣 · 湖北黄冈：一直在争取京九高铁阜阳至黄冈段尽早启动建设_中国政库_澎湃新闻-The Paper

7 月前

开朗的熊猫 · 森田正馬 - Top 500件森田正馬 - 2023年8月更新 - Taobao

1 年前

谈吐大方的爆米花 · 凯迪拉克锐歌开始内卷：全系降价6万至35万区间|凯迪拉克|35-50万|LYRIQ_新浪科技_新浪网

1 年前

狂野的投影仪 · 宝宝多大可以带去电影院看电影？90%家长都搞错了！

1 年前