| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan får du adgang en VBA Delete Query
    Vide, hvordan man sletter data fra en tabel i Microsoft Office Access ved hjælp af en sletteforespørgsel kan spare dig tid, hvis du har brug for at slette data fra flere tabeller . Access er en relationel database management system inkluderet i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) er en computer programmeringssprog, der anvendes til at automatisere rutineopgaver , såsom sletning af poster fra borde . I et par trin , du kan skrive VBA-kode til at oprette en tabel , tilføje to poster og slette en af ​​disse poster . Instruktioner
    1

    Start Microsoft Office Access 2007, og klik på " Tom database " og derefter vælge "Opret ". Klik på " Database Tools" og vælg " Visual Basic ". Vælg "Indsæt " menuen og klik på " Modul ".
    2

    Kopier og indsæt følgende kode til at oprette en ny tabel , skal du tilføje to poster og slette posten hvor " Street " er lig med " Main ".

    Private Sub deleteQuery ()

    Dim sqlStr As String

    sqlStr = " CREATE TABLE addressTbl ( husnummer TEXT ( 25) , Street TEXT (25 )), " < br >

    DoCmd.RunSQL ( sqlStr )

    sqlStr = " INSERT INTO addressTbl ( [ husnummer ], [ Street ] ) "

    sqlStr = sqlStr & " VALUES ( '2541 ',' Lancaster '); "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( sqlStr )

    sqlStr =" INSERT INTO addressTbl ( [ husnummer ], [ Street ] ) " < br >

    sqlStr = sqlStr & " VALUES ( '2458 ',' Main '); "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( sqlStr )

    sqlStr = "Slet addressTbl.HouseNumber , addressTbl.Street "

    sqlStr = sqlStr & " FROM addressTbl "

    sqlStr = sqlStr & " WHERE ((( addressTbl.Street ) = ' Main ' ) ) . "

    DoCmd.RunSQL ( sqlStr )

    End Sub
    3

    Tryk på" F5 "for at udføre din subrutine
    < br >

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan kører en exe-fil i VB Kode 
    ·Sådan bruges en listevisning kontrol 
    ·Hvordan Lær VBA til Access 
    ·Fordele ved Active X Controls i Visual Basic 6,0 
    ·Sådan oprettes en lommeregner med Visual Basic & ArcGI…
    ·Sådan oprettes RTF filer med VB.Net 
    ·Hvordan laver Animerede Widgets 
    ·Sådan oprettes forbindelse til en database ved DSN i A…
    ·Tutorial om Visual Basic XY Positiv 
    ·Hvordan man arbejder med en Visual Basic Combo Box 
      Anbefalede Artikler
    ·Sådan Slet alle Overgange på VideoStudio 
    ·Sådan bruges Access 2007 VBA til at gå gennem & Kontr…
    ·Hvordan man åbner en Broderbund SIG Extension 
    ·Hvordan implementerer jeg en Bag of Marbles i Java 
    ·Hvordan du navngiver en session i PHP 
    ·Sådan bruges getline i C til Skip Cin.Ignore 
    ·Hvordan finder jeg den primtal i Java 
    ·Tilslutning String til SQL Authentication 
    ·Hvordan man laver en Basic Timer i Java 
    ·Sådan aktiveres PHP 5 i GoDaddy 
    Copyright © Computer Viden http://www.computerdk.com