帐号没分了，搞个马夹来问问题 ，保证结贴，关于ListBox

Question

ListBox1.Attributes.Add("ondblclick", "alert(this.value)")

Answer 1

如果控件名称为ListBox1,添加后台代码：Me.ListBox1.Attributes.Add("ondblclick", "alert('Value:' + this.value + ' Index:' + this.selectedIndex)")

Answer 2

<select size=10 ondblclick="alert('内容：'+this.options[this.selectedIndex].text+'\n位置：'+(this.selectedIndex+1));">
<option>11111
<option>22222
<option>33333
</select>

Answer 3

<select id="sel" name="sel" multiple rows=4 onDblClick="seldbclick(this)">
<option>aaaaa</option>
<option>bbbbb</option>
<option>ccccc</option>
<option>ddddd</option>
</select>
<input type="text" id="out" name="out" readonly="readonly" size=20>
<script language="JavaScript">
<!--
function seldbclick(src){
var index=src.selectedIndex+1;
var value=src.options[index-1].text;
document.all("out").value="第 "+index+" 项: "+value;
}
//-->
</script>