TAILIEUCHUNG - access 2007 vba bible phần 8

Thủ tục "Fields Bảng Danh sách", "Danh sách truy vấn Fields", "Chọn Tùy chọn", "Sao lưu cơ sở dữ liệu hiện tại", và "Sao lại kết thúc cơ sở dữ liệu" nút tương tự như những người trong Extras add-in , ngoại trừ việc họ | Creating Access Add-ins 14 On Error Resume Next acCmdSizeToFitForm On Error GoTo ErrorHandler intChoice Nz Me BackupChoice 2 Select Case intChoice Case 1 Me cmdCustomBackupPath .Enabled False Case 2 Me cmdCustomBackupPath .Enabled False Case 3 Me cmdCustomBackupPath .Enabled True End Select ErrorHandlerExit Exit Sub ErrorHandler MsgBox Error No _ Description Resume ErrorHandlerExit End Sub Private Sub fraBackupOptions_AfterUpdate On Error GoTo ErrorHandler intChoice Nz Me fraBackupOptions .Value 2 strBackupChoice CStr intChoice strBackupPath Nz Me BackupPath Select Case intChoice Case 1 Me cmdCustomBackupPath .Enabled False Case 2 Me cmdCustomBackupPath .Enabled False Case 3 Me cmdCustomBackupPath .Enabled True End Select 485 Part III Adding More Functionality to Office Save the user s choice to a database property in the calling database. Set dbsCalling CurrentDb strPropName Backupchoice Call SetProperty strName strPropName _ lngType dbText varValue strBackupChoice ErrorHandlerExit Exit Sub ErrorHandler MsgBox Error No _ Description Resume ErrorHandlerExit End Sub basExtras Module The basExtras standard module contains functions that are called from the USysRegInfo table Public Function ExtrasOptions Called from USysRegInfo menu add-in On Error GoTo ErrorHandler Dim strBackEndSyntaxChoice As String Dim strBackEndSyntax As String Dim strBackEndPathChoice As String Dim strBackEndPath As String Dim strDefault As String Get info from database properties in the calling database and write them to zstblBackupChoices in the code database for use as form s record source Set dbsCalling CurrentDb strPropName BackupChoice strDefault 2 strBackupChoice GetProperty strPropName strDefault Backup choice strBackupChoice strPropName BackupPath strDefault strBackupPath GetProperty strPropName strDefault Backup path strBackupPath strTable zstblBackupChoice Set dbsCode CodeDb Set rst .

• Tin học văn phòng
• lập trình máy tính
• tin học văn phòng
• ứng dụng máy tính
• kỹ thuật máy tính
• thủ thuật windows
• mẹo vặt máy tính
• tìm hiểu máy tính
• ứng dụng văn phòng
• Đề thực hành lập trình máy tính TH50
• Ngôn ngữ lập trình
• Đề thi lập trình máy tính
• Đề thi thực hành lập trình máy tính
• Bài tập lập trình máy tính
• Đề thực hành lập trình máy tính TH1
• Đề thực hành lập trình máy tính TH2
• Đề thực hành lập trình máy tính TH3
• Đề thực hành lập trình máy tính TH4
• Đề thực hành lập trình máy tính TH5
• Đề thực hành lập trình máy tính TH6
• Đề thực hành lập trình máy tính TH7
• Đề thực hành lập trình máy tính TH8
• Đề thực hành lập trình máy tính TH9
• Đề thực hành lập trình máy tính TH10
• Đề thực hành lập trình máy tính TH11
• Đề thực hành lập trình máy tính TH12
• Đề thực hành lập trình máy tính TH13
• Đề thực hành lập trình máy tính TH14
• Đề thực hành lập trình máy tính TH15
• Đề thực hành lập trình máy tính TH16
• Đề thực hành lập trình máy tính TH17
• Đề thực hành lập trình máy tính TH18
• Đề thực hành lập trình máy tính TH19
• Đề thực hành lập trình máy tính TH20
• Đề thực hành lập trình máy tính TH21
• Đề thực hành lập trình máy tính TH22
• Đề thực hành lập trình máy tính TH23
• Đề thực hành lập trình máy tính TH24