text选中后displa出label内容

时间:2023-03-09 04:23:43
text选中后displa出label内容

text选中后displa出label内容


效果很好而且很简单

用text的click属性即可

private sub text1_click()
label1.caption="******"
label2.caption=""
label3.caption=""
label4.caption=""
……
labeln.caption=""
end sub private sub text2_click()
label1.caption=""
label2.caption="******"
label3.caption=""
label4.caption=""
……
labeln.caption=""
end sub
…………
也可加入backcolor的设置