请教高手,这个类能改成VB.NET语言吗
1个回答
展开全部
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Const alt = 4
Const key_F2 = &H71
shiftdown%=(shitf And shitf)>0
altdown% = (Shift And alt) > 0
f2down% = (KeyCode = key_F2)
If altdown% And f2down% Then Text1.Text = "AAAAAAA"
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询