1,使用IF只判断这一个
Private Sub text4_dblclick(Index As Integer)
if index<>3 then exit sub
'不等3时退出处理
......
end sub
或者 多分支选择进行判断,如果每个按钮都要响应到,推荐这个
Private Sub text4_dblclick(Index As Integer)
select case
index
case 0,1,2,4,5,6,7,8,9
'双击 其他编号时怎么处理,每个不同时,可以像下面那样拆来开写。
case 3
'双击3号时怎么处理
case else
'没有指定编号时如何处理
end select
end sub