杭州交通信息网大话西游2手机壁纸下载:关于vb实时错误 70 拒绝的权限
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/29 13:33:01
调试下面这段程序出现
实时错误 70 拒绝的权限
错误代码指向
SendKeys "{Home}+{End}"
这应该是光标选中密码框中文本
请问这个问题应该如何解决
Private Sub cmdOK_Click()
'检查正确的密码
If txtpassword = "1986" Then
loginsucceeded = True
MsgBox "恭喜", , "登陆成功"
un = txtUserName.Text
pw = txtpassword.Text
Dialog.Show
Me.Hide
Else
MsgBox "无效的密码，请重试!", , "登录"
txtpassword.SetFocus
SendKeys "{Home}+{End}"
End If
End Sub
实时错误 70 拒绝的权限
错误代码指向
SendKeys "{Home}+{End}"
这应该是光标选中密码框中文本
请问这个问题应该如何解决
Private Sub cmdOK_Click()
'检查正确的密码
If txtpassword = "1986" Then
loginsucceeded = True
MsgBox "恭喜", , "登陆成功"
un = txtUserName.Text
pw = txtpassword.Text
Dialog.Show
Me.Hide
Else
MsgBox "无效的密码，请重试!", , "登录"
txtpassword.SetFocus
SendKeys "{Home}+{End}"
End If
End Sub
如果没有问题的话，换一种方法试一下，将以下语句
SendKeys "{Home}+{End}"
改为：
txtpassword.SelStart = 0
txtpassword.SelLength = Len(txtpassword.Text)
我机器上运行顺利
可是不明白SendKeys "{Home}+{End}" 是做什么的
又是home又是end ...
你把那控件删掉重新加一下吧，我试了可以，估计你修改了什么属性。。。