vb粘贴代码怎么写 vb复制粘贴代码
复制操作应该是复制当前选区而不是整个文本框内容,粘贴应该是将剪帖板内容插入到当前光标所在位置,而不是将文本框原有内容彻底覆盖,另外,通常当Text1没选中文字时,要使复制按钮Command1不可用
Private Sub Command1_Click()
Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
If Len(Clipboard.GetText) Then
Text1.SelText = Clipboard.GetText
End If
End Sub
Private Sub Form_Load()
Command1.Enabled = False
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Command1.Enabled = Text1.SelLength > 0
End Sub
Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Butt Then
Command1.Enabled = Text1.SelLength > 0
End If
End Sub
比如Text1的内容为abc , 而当前只选中了第一个字符a
【vb粘贴代码怎么写 vb复制粘贴代码】那么Text1.text表示文本框的全部内容,即abc
而Text1.SelText表示文本框中当前选中的内容,即a--selText是select text(选中文字)的缩写
推荐阅读
- 山竹应该怎么种植,山竹的田间管理技术
- vivo手机截屏照片不在相册 vivo手机截屏怎么不在相册里
- 西瓜播种育苗技术,西瓜应该好养吗,怎么养殖
- 大马坎翡翠毛料 翡翠大马坎的料子怎么样?
- 肉末怎么做软烂 怎么做肉末软烂
- 琢怎么读音 琢生字念啥呢
- 氙字怎么读 氙字的音节
- 芋怎么读 芋的音节是啥
- 怎么做清水火锅 做清汤火锅的方法
- 囊中羞涩中涩是什么意思 怎么理解囊中羞涩中涩的意思