Office中国论坛/Access中国论坛

标题: ＃关于列表框＃ [打印本页]

作者: eio 时间: 2003-1-8 23:30
标题: ＃关于列表框＃
问题打开的“输入法”窗体，列表框没有选中。

希望是下面的效果，打开就选第一个，最好在没有数据时提示一下啦

作者: eio 时间: 2003-1-12 03:58
这个问题大家就是不关心，还是不会?

作者: tornado 时间: 2003-1-12 04:07
标题: 傻丫头, 是你没说明白!!!
傻丫头, 是你没说明白!!! 让人怎么回答你啊?!!!!!!!!!!!

作者: eio 时间: 2003-1-12 05:38
上面两个图片不明白吗，问题就是窗体打开时列表框没有焦点选中，希望能打开窗体就选中（按用户要求），如果没有数据，就提示……

作者: Trynew 时间: 2003-1-12 06:02
在Form_Load中加上，其中0表示第1行被选中，可改为其他数字：
Me.列表0.Selected(0) = True

作者: eio 时间: 2003-1-12 17:38
标题: 问题

以下是引用Trynew在2003-1-11 22:01:47的发言：
在Form_Load中加上，其中0表示第1行被选中，可改为其他数字：
    Me.列表0.Selected(0) = True

发现
Me.列表0.Selected(1) = True才是第一行，如果列表框没有数据，还是不能判断啊……

作者: 李寻欢 时间: 2003-1-12 17:44
标题: 判断是否有记录
If 已选代码.ListCount = 0 Then '如果"已选代码"列表框的记录等于零
MsgBox "没有可删除的材料！", vbExclamation '显示这条消息
Exit Sub '退出过程，不执行下面的代码
End If

上面的语句是从下面的例子里抽出来的，这是一个关于列表框操作的例子，希望能帮到你：
http://www.officefans.net/cdb/viewthread.php?tid=458

作者: eio 时间: 2003-1-12 18:22
正好适用

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)