问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

求助!vb.net数组问题

发布网友 发布时间:2022-04-27 11:38

我来回答

2个回答

热心网友 时间:2022-04-27 13:07

Sub Main()
Dim a(9) As Integer, e, f As Integer
e = -1
f = -1
For i = 0 To 9
a(i) = Val(InputBox("请输入第" & i + 1 & "个数"))
Console.Write(a(i) & " ")
If a(i) > 20 And e < 0 Then
e = i
End If
If a(i) < 0 And f < 0 Then
f = i
End If
Next
Console.WriteLine()
Console.WriteLine("第一个大于20的数是{0},下标为{1}", a(e), e)
Console.WriteLine("第一个小于0的数是{0},下标为{1}", a(f), f)
Console.ReadLine()
End Sub

热心网友 时间:2022-04-27 14:25

dim a(0 to 9) as long
dim n as long ,m as long
n=-1
m=-1
for i = 0 to 9
a(i)=val(inputbox("输入"))
next
for i = 0 to 9
if a(i)>20 and m=-1 then m=i
if a(i)<0 and n=-1 then n=i
next
msgbox “第一个大于20的数是” & a(m) & " 下标:" & m & vbcrlf & “第一个小于0的数是” & a(n) & " 下标:" & n
一个vb.net数组越界的问题

原因分析:你所声明的数组a(4,1)实际上是a(0 to 4, 0 to 1)。在截图下方的自动窗口栏可以看到,当程序运行完For循环后,x的值已经变为5,所以a(x,0)即为a(5,0),该变量与你声明的a(4,1)也就是a(0 to 4, 0 to 1)比较,发现下标已经超限,也就是程序报出的错误:索引超出了数组...

请问vb.net高手一个简单的问题

第二个问题,把输入的数据保存成文件,下次运行程序时再读取,这个不多说了,百度“VB.NET 文件读写”即可。

VB.net编程初学者出现“索引超出了数组界限”问题,望各位高手解答。

在VB里,"平均分"(pingjunfen), 这是数组的调用方法,当然会报错了 这样改吧:Dim xingming As String Dim yuwen As Short Dim shuxue As Short Dim yingyu As Short Dim zonghe As Short Dim pingjunfen As Short xingming = InputBox("输入姓名", "输入名字吧")yuwen = InputBox("输入语文...

Vb.net 中数组赋值的问题

数组赋值是指针传递,如果想复制数组就要用一个循环遍历所有元素并赋值.这样改变其中一个数组的值才不会影响到另外一个数组.

vb.net输出数组

1.你说的这个有点问题,是要只输出一次,也可做,2.但问题是如果你数组还有就看不到了!这个做法有点问题 1.解决方法:循环前面加入一个变量 dim Temp as Double=0 For i = 0 To 9 If score(i) &gt; avg and score(i)&lt;&gt;temp Then TextBox3.Text = TextBox3.Text &amp; score(i) &amp; " "if...

vb.net 关于2维数组求平均数的问题

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer For i = 1 To 2 cj(i, 0) = InputBox("输入第" &amp; i &amp; "位学生的学号")cj(i, 1) = InputBox("输入数学")cj(i, 2) = InputBox("输入心理学"...

VB.net编程初学者出现“索引超出了数组界限”问题,望各位高手解答。

textBox1.Text = textBox1.Text + " " + a[i, j];a[i, j]数据类型不对,不能和文本直接连

vb.net索引超出了数组界限 求大神!

超过了数组界限,索引值不能大于实际数据数量

vb.NET一个找出数组最大最小值的程序有个小问题 谁看一下

你是不是应该对最大值和最小值赋初值(比如把 r(1) 赋给最大值和最小值)呢?不然最小值默认初始值是‘0’,后面的判断就不起作用了。你可以加个断点试试,他们的初始值是多少。。。

在VB.NET编程中使用数组

1. 在Visual Basic .Net中申明一个数组,其数组元素中的索引值的起点全部都为“0”,而不是以前Visual Basic中的索引值起点一般都为“1”。这种定义方法和Visual Basic .Net的孪生姐妹Visual C#非常相似。2. 由于在Visual Basic .Net中数组都有了统一的起点,所以在Visual Basic .Net中定义一个数组,也就不再...

vb返回数组的函数 数组 vb vb增加数组 vb数组类型 vb创建数组 vb 数组定义 vb定义一个数组 vb 二维数组 vb对象数组
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
绩效工资从工资里扣合法吗 无人机电机轴的主要功能有哪些? 闽侯南通多久发展 南通哪个位置最有潜力 南通未来的机遇有哪些 江苏南通的发展前景怎么样 南通这座城市未来发展前景怎样 我女儿阳历08年01月08日出生,{农历07年腊月初一}请高人帮忙改个名字... 我女儿是2012年1月10日10:35分出生的五行缺什么,取什么名字好 这种图片效果怎么做出来的,不是纯白板,仔细看有一个个均匀分布的小圆点... 怎么解除绑定 不想用了,怎么取消? 西华大学双学位是自考吗 四川西华大学的自考毕业证在几月份发啊?好像分两种情况是吧,希望有在西华大学自考过的人告诉一下。 西华大学毕业证上面如果有:业余:两个字是什么意思 发西华大学的证书是真的吗 马上就去西华大学读书了,不知道这个学校要拿到毕业证对英语有什么要求?必须过级吗?我偏科,英语不好... 西华凤凰学院毕业后,是拿的西华大学的毕业证,还是成人自考毕业证 电视和手机同一网络不能投屏电视换一个网就能投屏了,为什么? 工地上运来1吨水泥,第一次用了350千克,第二次用了400千克,还剩多少千克?. 一吨混凝土多重 千克和吨,立方米怎么换算一千克的水泥等于多少吨 在使用二维数组时应注意什么? 王明家买来1吨水泥,已用去850千克,还剩多少千克水泥? 水泥438一吨是多少钱一斤? 北京市的公司已经拥有了软件著作权与软件产品登记和软件企业认定证书,国家有补助吗,怎么申请? ASP.net 数组的问题 中国人民的抗日战争前后坚持了十四年,经历了“局部抗战”和“全面抗战”两个阶段。两者开始的标志分别是 什么是确立十四年抗战 什么时候是抗日战争的开始 哪个事件标志着抗日战争的开始 赞美兰花的四字词语有哪些? 赞美兰花的诗词 求创新5.1声卡的驱动方法 如何给白掌浇水? 满天星和白掌怎样浇水 几天叫一次 白掌几天喜干还是喜湿几天浇水一次一次浇多少 帮我写一篇进入卫校的演讲 EPDM的重量计法 我已有epdm胶的面积,但不知道怎样计算他的重量. 请问面积乘多少才是重量 vb.net中如何遍历程序窗体中的控件?并读写控件的数据。 急求:2015年一村一农村行政管理毕业论文,要求也3000字 九月吃什么美食 仓鼠藏起来了 怎么找出来啊!! 为什么手机打电话出现无法访问移动网络的情况? 360贷款是不是西安银行股份有限公司放款? 别人打开热点怎么弄Wifi 360借条不同银行放款的结清证明都是一样的吗? 360贷款是哪个银行的 预备 在天津考期货从业,今年的考试大纲有变化吗? 关于遍历VB.net窗体里面控件的问题 vb.net怎么遍历所有控件,使Click都执行相同的过程