Dator
 |  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man gör en knapp i Access Ange ett datum på ett bord

    Att veta hur man använder en knapp i ett formulär för att utföra kommandon kan göra en ansökan mer dynamisk . Microsoft Office Access är en relationsdatabas management system som vanligen används för mindre databaser . Visual Basic for Applications ( VBA ) är en dator programmeringsspråk som används för att automatisera rutinuppgifter annars sker manuellt . VBA kan användas i Access för att skapa grafiska gränssnitt ( GUI ) för att åstadkomma ett enklare sätt att skriva in data i databasen . Instruktioner
    1

    Starta Microsoft Office Access 2007 , välj " Tom databas , " klicka sedan på " Skapa ".
    2

    Välj " Skapa " -fliken och välj " Form Design " för att skapa en ny form . Klicka på " Button " på " Controls " vänster klicka sedan i formuläret och dra för att skapa en ny knapp .
    3

    Högerklicka " Command0 " och välj " Egenskaper . " Klicka på "Event " -fliken och välj " [Event Procedure ] " bredvid " Vid klickning . " Klicka på ellips ( ... ) för att öppna " Microsoft Visual Basic " Window . Tryck på " Ctrl " och " A " och sedan "Ta bort " för att ta bort befintlig kod .
    4

    Kopiera och klistra in följande kod i modulen . Denna kod kommer att skapa en ny tabell med en " Date " fältdatatyp och lägg dagens datum till den .

    Option Compare Database

    Private Sub Command0_Click ( ) katalog

    Dim todayDate As String

    todayDate = nu

    sqlstr = " CREATE TABLE dateTable ( TodaysDate datum ) , "

    DoCmd.RunSQL ( sqlstr ) katalog

    sqlstr = " INSERT INTO dateTable ( [ TodaysDate ] ) "

    sqlstr = sqlstr &" VALUES ( ' " & ( todayDate ) &" '); "

    DoCmd.SetWarnings False

    DoCmd.RunSQL ( sqlstr ) katalog

    End Sub
    5

    Stäng " Microsoft Visual Basic " fönstret och högerklicka på " Form1 . " Välj " Form View . " Klicka " Command0 " att köra din kod .

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man startar ett Windows Service Använda VB.NET
    ·Vad är Mswinsck.ocx
    ·VBA-programmering Struktur
    ·Hur göra diagram i Visual Basic
    ·Felsökning av en VBA med någon tom sida
    ·Hur man använder en Select Case med Microsoft Visual B…
    ·Visual Basic Application självstudie
    ·Hur man använder VB för att skriva en dator namn till…
    ·Hur man skapar spel i Visual Basic
    ·Hur hittar Antalet kolumner i GridView kontroll
    Utvalda artiklarna
    ·Hur man skapar en textfil med C + +
    ·Hur man använder PBF i Python
    ·Hur konvertera binära data till en decimal i Perl
    ·. Hur man skapar en underwebbplats Använda Visual Stud…
    ·Hur man skapar auto_ptr Syntax
    ·Hur Echo variabler med hjälp av PHP
    ·Hur man skickar Vars Från VBScript till en kommandofil…
    ·Styra data som ska visas i AIX
    ·Hur vill kolla en webbplats för en JavaScript bugg
    ·Hur man slår samman två datumkolumner
    Copyright © Dator Kunskap http://www.dator.xyz