主题：KeyPressEdit 疑问

JPK612任务单_KeyPressEdit

Select Case e.Col.name

    Case  "装配piao号"

        If Char.IsLower(e.KeyChar) Then 

           e.Cancel = True

           e.SelectedText = e.KeyChar.ToUpper

        End If

End Select

我的疑问是，如上代码，如果在"装配piao号"里面逐个字符输入内容，小写字母就会变成大写字母。但是，如果是将复制的一个字符串粘贴到"装配piao号"这个单元，小写字母就不会变成大写字母。为什么？怎么改代码？谢谢。