Chủ đề: Code Mở phím Shift bị lỗi
-
06-24-2010, 04:59 AM #21
Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Code Mở phím Shift bị lỗi
Gửi bởi glasseggs
Cao thủ vào xác nhận giùm.
-
06-24-2010, 05:07 AM #22
Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Code Mở phím Shift bị lỗi
Xác nhận pass 2007 khó chơi hơn 2003 ,2 phần mềm dò lâu quá không chờ được.
Cái Open chưa thử,không phải cao thủ nên đi ra.
-
06-25-2010, 04:26 AM #23
Silver member
- Ngày tham gia
- Jan 2016
- Bài viết
- 137
Ðề: Code Mở phím Shift bị lỗi
pass cap 1:Karaoke±Å²Æ³Ç´µ¢¶£·
pass cap 2ass±Å²Æ³Ç´µ¢¶£·
-
05-05-2011, 05:10 PM #24
Silver member
- Ngày tham gia
- Apr 2016
- Bài viết
- 75
Ðề: Code Mở phím Shift bị lỗi
a ơi cho em hỏi e đang làm cái disable va enable phím shift
nó báo lỗi dòng màu xanh là ntn ak.:
Private Sub Command0_Click()
On Error GoTo ErrHandler
Dim db As Database
Dim ThuocTinh As Property
Set db = CurrentDb
db.Properties("AllowBypassKey") = False
Set db = Nothing
Egress:
On Error Resume Next
Set db = Nothing
Set ThuocTinh = Nothing
Exit Sub
ErrHandler:
MsgBox Err.Number
If Err.Number = 3270 Then ' Property not found.
Set ThuocTinh = db.CreateProperty("AllowBypassKey", dbBoolean, False)
db.Properties.Append ThuocTinh
Resume Next
Else
MsgBox Err.Description
Resume Egress
End If
End Sub
Private Sub Command1_Click()
On Error GoTo ErrHandler
Dim db As Database
Dim ThuocTinh As Property
Set db = CurrentDb
db.Properties("AllowBypassKey") = True
Set db = Nothing
Egress:
On Error Resume Next
Set db = Nothing
Set ThuocTinh = Nothing
Exit Sub
ErrHandler:
MsgBox Err.Number
If Err.Number = 3270 Then ' Property not found.
Set ThuocTinh = db.CreateProperty("AllowBypassKey", dbBoolean, True)
db.Properties.Append ThuocTinh
Resume Next
Else
MsgBox Err.Description
Resume Egress
End If
End Sub
em xin cám ơn
-
06-04-2011, 04:10 AM #25
Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Code Mở phím Shift bị lỗi
Gửi bởi sinhvienpy89
Giới thiệu Vòng đeo dương vật không chỉ là một món đồ chơi dục tình dành cho nam giới, mà còn là trợ thủ đắc lực giúp kéo dài cuộc yêu, tăng khoái cảm và cải thiện chất lượng đời sống tình dục. Tuy...
Sử dụng vòng đeo dương vật đúng thời điểm, chuyện ấy lên một tầm cao mới!