怎么样才能保存数组?

xboard 2004-08-06 05:56:07
Public Class opusCustomer
Public photo_lens As String '
Public photo_film As String '
end class

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim objopusCustomer As LSopus.opusCustomer = New LSopus.opusCustomer
Dim i As Integer
For i = 1 To FileCount
objopusCustomer.photo_lens = Request.Form("photo_lens" & i)
objopusCustomer.photo_film = Request.Form("photo_film" & i)
Next
Dim j As Integer
For j = 0 To CustomList.Length - 1
Dim _objopusCustomers As LSopus.opusCustomer
' _objopusCustomers = CType(CustomList(j), LSopus.opusCustomer)

Response.Write(_objopusCustomers.photo_film& "<br>")
Next
end sub
二次循环,不同的数据保存到数组中,但发现数组中二组数据都是同样的,不知道为什么?
...全文
89 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
AntingZ 2004-08-06
  • 打赏
  • 举报
回复
你什么地方定义的数组,怎么没看见
Overriding 2004-08-06
  • 打赏
  • 举报
回复
Dim objopusCustomer As LSopus.opusCustomer = New LSopus.opusCustomer
你一直用的这个对象啊!

把objopusCustomer= New LSopus.opusCustomer
放到循环内部试试!
xboard 2004-08-06
  • 打赏
  • 举报
回复
up

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧