| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 704 人关注过本帖
标题:赋值的问题(新的问题)
只看楼主 加入收藏
jxawgya
Rank: 1
等 级:新手上路
帖 子:64
专家分:9
注 册:2010-1-5
结帖率:91.67%
收藏
已结贴  问题点数:10 回复次数:6 
赋值的问题(新的问题)
请教各位:
rs数据为:
A    B   C
本科 20  21
中专 30  50
大专 80  60
如何使 Label1=本科,Label12=20,Label14=21
       Label3=中专,Label15=30,Label16=50
 Label1.Caption = Trim(rs.Fields(0)) & "人数"   rs.Fields(0)等于RS的第一列第一行数据;
如何使Label3.Caption等于RS的第一列第二行数据?
    Label3.Caption = Trim(rs.Fields(?)) & "人数"
昨天想了想,现又有新的问题

 If rs.EOF = True Then
    MsgBox "信息出错"
        Exit Sub
    Else
            For Index = 0 To 5
            Label1(Index) = rs(Number(Index + 1)) & "人数"
            rs.MoveNext
            Next Index
    End If
     End If
     '关闭记录集
    rs.Close
    '关闭cnn对象
    cnn.Close
    End If
结果是Label1等于A,Label1=本科,Label1=中专,如何使Label2=列

[ 本帖最后由 jxawgya 于 2011-4-26 08:17 编辑 ]
搜索更多相关主题的帖子: 本科 大专 如何 信息 中专 
2011-04-25 11:10
qq1023569223
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
来 自:湖南科技大学
等 级:贵宾
威 望:26
帖 子:2753
专家分:13404
注 册:2010-12-22
收藏
得分:3 
怎么,应该一样吧!

   唯实惟新 至诚致志
2011-04-25 13:11
jxawgya
Rank: 1
等 级:新手上路
帖 子:64
专家分:9
注 册:2010-1-5
收藏
得分:0 
不能让它沉下去。
2011-04-26 08:18
jiashie
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:237
专家分:999
注 册:2009-4-30
收藏
得分:3 
逻辑真混乱。。
2011-04-26 14:08
坚强坚持
Rank: 2
等 级:论坛游民
帖 子:34
专家分:56
注 册:2011-4-5
收藏
得分:3 
看了一下,大概的意思是想一个窗体显示多条记录的意思,却又不想使用表格
2011-04-26 20:48
Artless
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:103
帖 子:4211
专家分:28888
注 册:2009-4-8
收藏
得分:3 
图片附件: 游客没有浏览图片的权限,请 登录注册

无知
2011-04-26 21:31
jxawgya
Rank: 1
等 级:新手上路
帖 子:64
专家分:9
注 册:2010-1-5
收藏
得分:0 
没有讲清楚,
SQL = "select distinct Culture_Level,count(*)  from dbo.Employees   group by Culture_Level order by Culture_Level"
Label1是数组,Label2是数组,使
Label1数组 = Trim(rs.Fields(0)) & "人数"
    Label2数组 = Trim(rs.Fields(1)) & "人"
不知是否清楚

[ 本帖最后由 jxawgya 于 2011-4-27 09:46 编辑 ]
2011-04-27 09:38
快速回复:赋值的问题(新的问题)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017198 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved