vb 数组删除元素-白红宇

vb 数组删除元素

阅读量：5159 次

发布时间：2019-06-13

本文共 421 字，大约阅读时间需要 1 分钟。

引用：

Private Sub Command1_Click()Dim n(1 To 100) As Integernum = InputBox("请输入数组元素个数", "输入框")Print "原始数组为："For i = 1 To numn(i) = i * 5 + 1Print n(i);NextPrintlp:m = InputBox("请选择要删除元素的位置", "输入框")num = num - 1For i = m To numn(i) = n(i + 1)NextPrint "删除元素后数组变为："For i = 1 To numPrint n(i);NextPrintIf MsgBox("是否继续删除？点击“确定”继续。", 1) = vbOK Then GoTo lpEnd Sub

转载于:https://www.cnblogs.com/sode/archive/2011/12/12/2284850.html

你可能感兴趣的文章

线程休眠代码(C++)

查看>>

linux环境下pytesseract的安装和央行征信中心的登录验证码识别

查看>>

System.ArgumentException: 不支持关键字: “provider”

查看>>

.NET Framework 小概念

查看>>

任务49：Identity MVC：Model前端验证

查看>>