Question

VB 如何实现按Ctrl+鼠标左键多选，求详细代码

Answer 1

很简单：
dim str1 as string ‘定义一个字符串变量str1
Private Sub Command1_Click() '通过单击事件选中text1的全部内容
text1.selstar=0
text1.sellength=len(text1)
str1=text1.seltext
End Sub