大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你这错误也不再你给的这段程序里,应该是在你所调用的子窗体里吧,子窗体里面不知道是不是调用了DataSet还是别的。应该是相应的索引值错了
我们提供的服务有:做网站、网站制作、微信公众号开发、网站优化、网站认证、忻州ssl等。为近1000家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的忻州网站制作公司
问题应该是在这里:
For i As Long = 0 To m_IpCount - 1
m_hostip.Address = MyHostToNet(m_StartIP + i)
m_ScanIP = m_hostip.ToString()
For j As Integer = 0 To m_PortCount - 1
m_ScanPort = m_StartPort + j
m_curscancount += 1
这里你每次获取的数据时不一样的 可能就造成你这个异常有时候发生有时候不发生,这个你要仔细看看这两个循环里面的变量到底是怎么在改变,才能确定最终错误在哪里
Dim Str(20) As String '20数据元素
Dim Text(20) As TextBox
Dim n As Integer = 0
For Each i In Text
i = New TextBox '实例化
i.Location = New Point(50, n * 20)
Me.Controls.Add(i) '添加窗体
Dim Index As Integer = i.TabIndex '没index属性
Str(n) = Index
i.Text = Str(n) 'str数组值赋值给文本框
n += 1
Next
sender就是你要的button了,不需要什么index,要计算index,则通过sender去判断
sub sub1(sender as object,e as eventargs)
sender.text="button1"’设置所点击button控件的text属性。
end sub
addhandler button.click, addressof sub1
vb的index属性指的是数组控件的标识号,也就是识别控件数组中的个别控件。
函数INDEX有两种形式:数组和引用。数组形式通常返回数值或数值数组;引用形式通常返回引用。
语法:
INDEX(array,row_num,column_num)返回数组中指定的单元格或单元格数组的数值。
INDEX(reference,row_num,column_num,area_num)返回引用中指定单元格或单元格区域的引用。
扩展资料:
函数INDEX的参数如下:
Array为单元格区域或数组常数;Row_num为数组中某行的行序号,函数从该行返回数值。如果省略row_num,则必须有column_num;Column_num是数组中某列的列序号,函数从该列返回数值。
如果省略column_num,则必须有row_num。Reference是对一个或多个单元格区域的引用,如果为引用输入一个不连续的选定区域,必须用括号括起来。
Area_num是选择引用中的一个区域,并返回该区域中row_num和column_num的交叉区域。选中或输入的第一个区域序号为1,第二个为2,以此类推。如果省略area_num,则INDEX函数使用区域1。
参考资料来源:百度百科—INDEX函数