怎么输出集合中的元素值?

bary1980 2003-01-07 10:28:21
Private Sub Command1_Click()
Dim a As New Collection
a.Add "nihao", "123"
a.Add "nihao1", "1233"
a.Add "nihao2", "12333"
a.Add "nihao3", "12343"
a.Add "nihao4", "12323"
Dim b
For Each b In a
Text1.Text = a.Item("nihao1")//wrong!!!!!!!!!!!!!
Next b
End Sub
...全文
96 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
zyl910 2003-01-07
  • 打赏
  • 举报
回复

For Each b In a
Text1.Text = b
Next b

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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