まだまだ現役？
Windows上でサクッと処理したいときの配列操作に
Push.vbs
arr1 = Array("aa", "bb")
Push arr1, "cc"
For Each elm In arr1
MsgBox elm
Next
WScript.Quit
'--
Sub Push(p1, p2)
ReDim Preserve p1(UBound(p1) + 1)
p1(UBound(p1)) = p2
End Sub
More than 1 year has passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme