【V入2期】数组入门练习二

qiuzhiniang · 发表于 2016-3-2 12:59

谢谢

laoau123 · 发表于 2016-8-15 18:59

DDFDD

xjl565135022 · 发表于 2016-8-18 17:24

小白看看答案

laoau138 · 发表于 2017-1-20 17:33

FGFFFDFDF

v070205 · 发表于 2017-2-13 16:18

Sub 转换1()
Dim arrName, arrNum
arrName = Array("周一", "钱二", "张三", "李四", "王五", "赵六", "陈七", "何八", "冯九", "郑零")
arrNum = Array(99, 85, 92.5, 70, 78.5, 65, 84, 100)
Range("a1:j1").Value = arrName
Range("a2:a11").Value = Application.Transpose(arrNum)
End Sub

xiaotongzi · 发表于 2017-2-23 15:44

学习！！

tmtmtm2004 · 发表于 2017-12-30 11:44

hjkgbhg

		自动登录	找回密码
密码			注册

[习题] 【V入2期】数组入门练习二