Beginning Access 1002002 Vba [Electronic resources] نسخه متنی

اینجــــا یک کتابخانه دیجیتالی است

با بیش از 100000 منبع الکترونیکی رایگان به زبان فارسی ، عربی و انگلیسی

Beginning Access 1002002 Vba [Electronic resources] - نسخه متنی

Robert Smith; Dave Sussman Et al

| نمايش فراداده ، افزودن یک نقد و بررسی
افزودن به کتابخانه شخصی
ارسال به دوستان
جستجو در متن کتاب
بیشتر
تنظیمات قلم

فونت

اندازه قلم

+ - پیش فرض

حالت نمایش

روز نیمروز شب
جستجو در لغت نامه
بیشتر
توضیحات
افزودن یادداشت جدید













Method Calls




AccessObjectProperties



 AccessObjectProperties.Add(PropertyName As String, Value As Variant) 


AccessObjectProperties.Remove(Item As Variant)






Application



Variant = Application.AccessError(ErrorNumber As Variant) 


Application.AddAutoCorrect(ChangeFrom As String, ChangeTo As String)


Application.AddToFavorites


Variant = Application.AppLoadString(id As Integer)
Application.BeginUndoable(Hwnd As Integer)


String = Application.BuildCriteria(Field As String, FieldType As SmallInt, _
Expression As String)


Variant = Application.BuilderString


Application.CloseCurrentDatabase


Application.CodeDb


Application.CreateAccessProject(filepath As String, [Connect As Variant])


Control = Application.CreateControl(FormName As String, ControlType As AcControlType, _
Section As AcSection, [Parent As Variant], [ColumnName As Variant], _


[Left As Variant], [Top As Variant], [Width As Variant], [Height As Variant])


Control = Application.CreateControlEx(FormName As String, ControlType As AcControlType, _
Section As AcSection, Parent As String, ControlSource As String, Left As Integer, _


Top As Integer, Width As Integer, Height As Integer)
DataAccessPage = Application.CreateDataAccessPage(FileName As Variant, _
CreateNewFile As Boolean)


Form = Application.CreateForm([Database As Variant], [FormTemplate As Variant])


Integer = Application.CreateGroupLevel(ReportName As String, Expression As String, _
Header As SmallInt, Footer As SmallInt)


Report = Application.CreateReport([Database As Variant], [ReportTemplate As Variant])


Control = Application.CreateReportControl(ReportName As String, _
ControlType As AcControlType, Section As AcSection, [Parent As Variant], _


[ColumnName As Variant], [Left As Variant], [Top As Variant], [Width As Variant], _


[Height As Variant])
Application.CurrentDb


String = Application.CurrentUser


Variant = Application.DAvg(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DCount(Expr As String, Domain As String, [Criteria As Variant])


Application.DDEExecute(ChanNum As Variant, Command As String)
Variant = Application.DDEInitiate(Application As String, Topic As String)


Application.DDEPoke(ChanNum As Variant, Item As String, Data As String)


String = Application.DDERequest(ChanNum As Variant, Item As String)


Application.DDETerminate(ChanNum As Variant)
Application.DDETerminateAll


Application.DefaultWorkspaceClone


Application.DelAutoCorrect(ChangeFrom As String)


Application.DeleteControl(FormName As String, ControlName As String)


Application.DeleteReportControl(ReportName As String, ControlName As String)


Variant = Application.DFirst(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DLast(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DLookup(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DMax(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DMin(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DStDev(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DStDevP(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DSum(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DVar(Expr As String, Domain As String, [Criteria As Variant])


Variant = Application.DVarP(Expr As String, Domain As String, [Criteria As Variant])


Application.Echo(EchoOn As SmallInt, bstrStatusBarText As String)
Variant = Application.Eval(StringExpr As String)


Application.FollowHyperlink(Address As String, SubAddress As String, _
NewWindow As Boolean, AddHistory As Boolean, ExtraInfo As Variant, _


Method As _LabelEvents, HeaderInfo As String)
Boolean = Application.GetHiddenAttribute(ObjectType As AcObjectType, _
ObjectName As String)


Variant = Application.GetOption(OptionName As String)


Variant = Application.GUIDFromString(String As Variant)


String = Application.HyperlinkPart(Hyperlink As Variant, Part As AcHyperlinkPart)


Application.InsertText(Text As String, ModuleName As String)
Application.LoadFromText(ObjectType As AcObjectType, ObjectName As String, _
FileName As String)


Set Object = Application.LoadPicture(FileName As String)


Application.NewAccessProject(filepath As String, [Connect As Variant])


Application.NewCurrentDatabase(filepath As String)
Variant = Application.Nz(Value As Variant, [ValueIfNull As Variant])


Application.OpenAccessProject(filepath As String, Exclusive As Boolean)


Application.OpenCurrentDatabase(filepath As String, Exclusive As Boolean)


Application.Quit(Option As AcQuitOption)
Application.RefreshDatabaseWindow


Application.RefreshTitleBar


Application.ReloadAddIns


Application.ReplaceModule(objtyp As Integer, ModuleName As String, FileName As _


String,token As Integer)
Variant = Application.Run(Procedure As String, [Arg1 As Variant], [Arg2 As Variant], _


[Arg3 As Variant], [Arg4 As Variant], [Arg5 As Variant], [Arg6 As Variant], _


[Arg7 As Variant], [Arg8 As Variant], [Arg9 As Variant], [Arg10 As Variant], _


[Arg11 As Variant], [Arg12 As Variant], [Arg13 As Variant], [Arg14 As Variant], _


[Arg15 As Variant], [Arg16 As Variant], [Arg17 As Variant], [Arg18 As Variant], _


[Arg19 As Variant], [Arg20 As Variant], [Arg21 As Variant], [Arg22 As Variant], _


[Arg23 As Variant], [Arg24 As Variant], [Arg25 As Variant], [Arg26 As Variant], _


[Arg27 As Variant], [Arg28 As Variant], [Arg29 As Variant], [Arg30 As Variant])


Application.RunCommand(Command As AcCommand)
Application.SaveAsText(ObjectType As AcObjectType, ObjectName As String, _
FileName As String)


Application.SetHiddenAttribute(ObjectType As AcObjectType, ObjectName As String, _


fHidden As Boolean)
Application.SetOption(OptionName As String, Setting As Variant)


Application.SetUndoRecording(yesno As SmallInt)
Variant = Application.StringFromGUID(Guid As Variant)


Variant = Application.SysCmd(Action As AcSysCmdAction, [Argument2 As Variant], _
[Argument3 As Variant])






BoundObjectFrame



BoundObjectFrame.Requery 


BoundObjectFrame.SetFocus


BoundObjectFrame.SizeToFit






Checkbox



 Checkbox.Requery 


Checkbox.SetFocus


Checkbox.SizeToFit


Checkbox.Undo






Combobox



 Combobox.Dropdown 


Combobox.Requery


Combobox.SetFocus


Combobox.SizeToFit


Combobox.Undo






CommandButton



 CommandButton.Requery 


CommandButton.SetFocus


CommandButton.SizeToFit






Control



 Control.Dropdown 


Control.Requery


Control.SetFocus


Control.SizeToFit


Control.Undo






CurrentProject



 CurrentProject.CloseConnection 


CurrentProject.OpenConnection([ BaseConnectionString As Variant], [UserID As Variant], _


[Password As Variant])






DataAccessPage


 DataAccessPage.ApplyTheme(ThemeName As String)  




DoCmd



 DoCmd.AddMenu(MenuName As Variant, MenuMacroName As Variant, StatusBarText As Variant) 


DoCmd.ApplyFilter([FilterName As Variant], [WhereCondition As Variant])
DoCmd.Beep


DoCmd.CancelEvent


DoCmd.Close(ObjectType As AcObjectType, ObjectName As Variant, Save As AcCloseSave)


DoCmd.CopyObject(DestinationDatabase As Variant, NewName As Variant, _
SourceObjectType As AcObjectType, [SourceObjectName As Variant])


DoCmd.DeleteObject(ObjectType As AcObjectType, [ObjectName As Variant])


DoCmd.DoMenuItem(MenuBar As Variant, MenuName As Variant, _
Command As Variant, [Subcommand As Variant], [Version As Variant])
DoCmd.Echo(EchoOn As Variant, [StatusBarText As Variant])


DoCmd.FindNext


DoCmd.FindRecord(FindWhat As Variant, Match As AcFindMatch, MatchCase As Variant, _
Search As AcSearchDirection, SearchAsFormatted As Variant, _


OnlyCurrentField As AcFindField, [FindFirst As Variant])


DoCmd.GoToControl(ControlName As Variant)
DoCmd.GoToPage(PageNumber As Variant, [Right As Variant], [Down As Variant])


DoCmd.GoToRecord(ObjectType As AcDataObjectType, ObjectName As Variant, _
Record As AcRecord, [Offset As Variant])


DoCmd.Hourglass(HourglassOn As Variant)


DoCmd.Maximize


DoCmd.Minimize


DoCmd.MoveSize([Right As Variant], [Down As Variant], [Width As Variant], _
[Height As Variant])


DoCmd.OpenDataAccessPage(DataAccessPageName As Variant, View As AcDataAccessPageView)


DoCmd.OpenDiagram(DiagramName As Variant)
DoCmd.OpenForm(FormName As Variant, View As AcFormView, FilterName As Variant, _
WhereCondition As Variant, DataMode As AcFormOpenDataMode, _


WindowMode As AcWindowMode, [OpenArgs As Variant])
DoCmd.OpenModule([ModuleName As Variant], [ProcedureName As Variant])


DoCmd.OpenQuery(QueryName As Variant, View As AcView, DataMode As AcOpenDataMode)


DoCmd.OpenReport(ReportName As Variant, View As AcView, [FilterName As Variant], _
[WhereCondition As Variant])


DoCmd.OpenStoredProcedure(ProcedureName As Variant, View As AcView, _
DataMode As AcOpenDataMode)


DoCmd.OpenTable(TableName As Variant, View As AcView, DataMode As AcOpenDataMode)


DoCmd.OpenView(ViewName As Variant, View As AcView, DataMode As AcOpenDataMode)


DoCmd.OutputTo(ObjectType As AcOutputObjectType, [ObjectName As Variant], _
[OutputFormat As Variant], [OutputFile As Variant], [AutoStart As Variant], _


[TemplateFile As Variant])
DoCmd.PrintOut(PrintRange As AcPrintRange, PageFrom As Variant, PageTo As Variant, _
PrintQuality As AcPrintQuality, [Copies As Variant], [CollateCopies As Variant])


DoCmd.Quit(Options As AcQuitOption)
DoCmd.Rename(NewName As Variant, ObjectType As AcObjectType, [OldName As Variant])


DoCmd.RepaintObject(ObjectType As AcObjectType, [ObjectName As Variant])
DoCmd.Requery([ControlName As Variant])


DoCmd.Restore


DoCmd.RunCommand(Command As AcCommand)


DoCmd.RunMacro(MacroName As Variant, [RepeatCount As Variant], _
[RepeatExpression As Variant])


DoCmd.RunSQL(SQLStatement As Variant, [UseTransaction As Variant])


DoCmd.Save(ObjectType As AcObjectType, [ObjectName As Variant])


DoCmd.SelectObject(ObjectType As AcObjectType, [ObjectName As Variant], _
[InDatabaseWindow As Variant])


DoCmd.SendObject(ObjectType As AcSendObjectType, [ObjectName As Variant], _
[OutputFormat As Variant], [To As Variant], [Cc As Variant], [Bcc As Variant], _


[Subject As Variant], [MessageText As Variant], [EditMessage As Variant], _
[TemplateFile As Variant])


DoCmd.SetMenuItem(MenuIndex As Variant, [CommandIndex As Variant], _
[SubcommandIndex As Variant], [Flag As Variant])


DoCmd.SetWarnings(WarningsOn As Variant)
DoCmd.ShowAllRecords


DoCmd.ShowToolbar(ToolbarName As Variant, Show As AcShowToolbar)


DoCmd.TransferDatabase(TransferType As AcDataTransferType, DatabaseType As Variant, _


DatabaseName As Variant, ObjectType As AcObjectType, [Source As Variant], _


[Destination As Variant], [StructureOnly As Variant], [StoreLogin As Variant])


DoCmd.TransferSpreadsheet(TransferType As AcDataTransferType, _
SpreadsheetType As AcSpreadSheetType, [TableName As Variant], _


[FileName As Variant], [HasFieldNames As Variant], [Range As Variant], _


[UseOA As Variant])
DoCmd.TransferText(TransferType As AcTextTransferType, [SpecificationName As Variant], _
[TableName As Variant], [FileName As Variant], [HasFieldNames As Variant], _


[HTMLTableName As Variant], [CodePage As Variant])






Form



 Form.GoToPage(PageNumber As Integer, Right As Integer, Down As Integer) 


Form.Recalc


Form.Refresh


Form.Repaint


Form.Requery
Form.SetFocus


Form.Undo






FormatCondition



 FormatCondition.Delete 


FormatCondition.Modify(Type As AcFormatConditionType, _
Operator As AcFormatConditionOperator, [Expression1 As Variant], _


[Expression2 As Variant])






FormatConditions



 FormatCondition = FormatConditions.Add(Type As AcFormatConditionType, _  
Operator As AcFormatConditionOperator, [Expression1 As Variant], _


[Expression2 As Variant])
FormatConditions.Delete






Hyperlink



 Hyperlink.AddToFavorites 


Hyperlink.CreateNewDocument(FileName As String, EditNow As Boolean, Overwrite As Boolean)


Hyperlink.Follow(NewWindow As Boolean, AddHistory As Boolean, ExtraInfo As Variant, _
Method As _LabelEvents, HeaderInfo As String)






Image


 Image.Requery 


Image.SetFocus


Image.SizeToFit





Label


 Label.SizeToFit  




Line


 Line.SizeToFit  




ListBox



 ListBox.Requery 


ListBox.SetFocus


ListBox.SizeToFit


ListBox.Undo






Module



 Module.AddFromFile(FileName As String) 


Module.AddFromString(String As String)


Integer = Module.CreateEventProc(EventName As String, ObjectName As String)


Module.DeleteLines(StartLine As Integer, Count As Integer)
Boolean = Module.Find(Target As String, StartLine As Integer, StartColumn As Integer, _
EndLine As Integer, EndColumn As Integer, WholeWord As Boolean, _


MatchCase As Boolean, PatternSearch As Boolean)
Module.InsertLines(Line As Integer, String As String)


Module.InsertText(Text As String)
Module.ReplaceLine(Line As Integer, String As String)






ObjectFrame



 ObjectFrame.Requery 


ObjectFrame.SetFocus


ObjectFrame.SizeToFit






OptionButton



 OptionButton.Requery 


OptionButton.SetFocus


OptionButton.SizeToFit






OptionGroup



 OptionGroup.Requery 


OptionGroup.SetFocus


OptionGroup.SizeToFit


OptionGroup.Undo






Page


 Page.Requery 


Page.SetFocus


Page.SizeToFit





PageBreak


 PageBreak.SizeToFit  




Pages



 Page = Pages.Add([Before As Variant]) 


Pages.Remove([Item As Variant])






Rectangle


 Rectangle.SizeToFit  




References



 Reference = References.AddFromFile(FileName As String) 


Reference = References.AddFromGuid(Guid As String, Major As Integer, Minor As Integer)


Reference = References.Item(var As Variant)
References.Remove(Reference As Reference)






Report



 Report.Circle(flags As SmallInt, X As Single, Y As Single, radius As Single, _ 


color As Integer, start As Single, end As Single, aspect As Single)


Report.Line(flags As SmallInt, x1 As Single, y1 As Single, x2 As Single, y2 As Single, _


color As Integer)
Report.Print(Expr As String)


Report.PSet(flags As SmallInt, X As Single, Y As Single, color As Integer)


Report.Scale(flags As SmallInt, x1 As Single, y1 As Single, x2 As Single, y2 As Single)


Single = Report.TextHeight(Expr As String)
Single = Report.TextWidth(Expr As String)






SubForm


 SubForm.Requery 


SubForm.SetFocus
SubForm.SizeToFit





TabControl


 TabControl.SizeToFit  




Textbox



 Textbox.Requery 


Textbox.SetFocus


Textbox.SizeToFit


Textbox.Undo






ToggleButton



 ToggleButton.Requery 


ToggleButton.SetFocus


ToggleButton.SizeToFit


ToggleButton.Undo






WebOptions


 WebOptions.UseDefaultFolderSuffix  








/ 256