Day2 Sheila

  • Published on
    15-Jul-2016

  • View
    220

  • Download
    4

Embed Size (px)

DESCRIPTION

programming

Transcript

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    1

    JAMKE02|MSACCESSVBAKODEPROGRAMKodeprogramadalahserangkaiantulisanperintahyangakandilaksanakanjikasuatuobjekdijalankan.Kodeprograminiakanmengontroldanmenentukanjalannyasuatuobjek.EVENTAdalahperistiwaataukejadianyangditerimaoleh suatuobjek,misalnyadiklik, seret, tunjukdanlainnya.Contohnya:PrivatSubCommand_Click()METHODAdalahsuatusetperintahsepertihalnyafungsidanprosedur,tetapisudahtersediadidalamsuatuobjek.Contoh:

    PrivateSubForm_Activate() Form1.PrintHallo...EndSubPrivateSubForm_Click() Form1.Circle(1000,1500),500EndSub

    MODULEModuledapatdisejajarkandenganform,tetapitidakmengandungobjekdanbentukstandar.Moduledapatberisibeberapakodeprogramatauproseduryangdapatdigunakandalamprogramaplikasi.

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    2

    TIPEDATA,VARIABELdanOPERATOR TipeData

    Tipe data didefinisikan untuk memberitahukan komputer tentang hasil (output) berupa apa,misalnya:angka,tulisan,tanggal,danlainnya.Tipedatajugaberpengaruhpadakinerjaprogramkarenasetiaptipedataakanmengalokasikanbesarmemoridikomputer.Denganmenggunakantipedatayangtepatmakaprogramakanberjalandengancepatdanefektif.TipetipeDatadiMs.Access:1.TextTextdigunakanuntukfieldalfanumeric(misalnyanama,alamat,kodepos,dll),jaditipedatatextdisinimemilikibanyakkarakterdankaraktertersebutialah255karakterpadasetiapfieldnya.2.MemoTipedatamemosamahalnyadengantext,tetapitipedatamemodapatmenampungkuranglebih64.000karakteruntuktiapfieldnya,tapitidakbisadiurutkan/diindekskan.3.NumberTipedataNumberdapatdigunakanuntukmenyimpandatanumericyangakandigunakanuntukprosesperhitunganmatematis(misalnyamengurangi,menambahkan,mengkalidanmembagisuatubilangan)4.Date/TimeTipedataData/timedigunakanuntukdatayangberjenistanggal,waktuataupenggabungandaritanggaldanwaktu5.CurrencyTipedataCurrencyyaitudatadenganjenisnumber,hanyasajapadaawalangkaselaludisertakansymbolcurrencydefaultsesuaidenganregionalsettingyangdigunakan,misalnyaRP.$,dll.Currencydapatmenggunakanangkadengan15dgiitdibelakangdesimaldan4digitsesudahdesimal6.AutoNumberTipedataAutoNumberadalahdatayangtidakdapatkitaisisecaramanualmelainkaniaterisisecaraotomatisolehAccess,baiksecaramenjumlahataupunrandom(acak),AutoNumberbiasanyadigunakanuntukpenomoran.7.YES/NOTipedataYes/Nomerupakantipedatadengan2pilihansajayaituYes(1atauTure)danNo(0atauFalse).danformatyangtersediaadalahYes/No,True/False,danOn/OFF8.OLEObjectTipedataOLEObjectdigunakanuntukeksternalobjek,sepertibitmapataufilesuara9.HyperlinkTipedataHyperlinkdigunakanuntukmenyimpanalamatinternetataufileyangditunjukanmelaluialamatURL10.LookupWizardJikamenggunakantipedatainiuntuksebuahfield,makabisamemilihsebuahnilaidaritabellainataudarisebuahdaftarnilaiyangditampilkandalamcombobox11.AttachmentAttatchmentitumerupakantipedatayangdigunakanuntukmelampirkansebuahdataapapunbentukfilenya/ekstensinya.

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    3

    VariabelAdalah suatu tempat dalam memori komputer yang diberi nama (sebagai pengenal) dandialokasikanuntukmenampungdata.CaraPertamamenggungkanDIMuntukmendeklarasikannama variabelbeserta tipedatanyapadaawalprocedureseperticontohberikut:DimNamaAsStringDimGajiAsLongPernyataantersebutdiatasdisebutdeklarasiekplisit.CaraKeduadisebutdeklarasiimplisitseperticontohberikut:Nama$=BudiAlamat$=Jl.Diponegoro21BatamVariabelinilangsungmengisivariabelnya.Carayangdisarankanadalahcarapertamakarenalebihterencanadanterkontrol.SyaratPenulisanVariabel Harusdimulaidengankarakteralfabet(huruf) Uniktidakbolehadayangsamapadaruanglingkupprogram Maksimum255karaktertetapihanya40karakterpertamayangdianggapsebagai

    varaibelnya. Beberapakaraktertidakdiperbolehkandipakaimisalnyakarakteryangdipakaiuntuk

    operator(+,,*,/,,danlainnya),titikdua,koma,dst.

    OperatorOperatorPenugasan(assignment)Disimbolkandengantandasamadengan=danberfungsiuntukmemasukkansuatudatakedalamvariabel.Contoh:Awal=NowBilangan=0OperatorAritmatikaDigunakan untukmelakukan operasi aritmatika, operator inimempunyai hirarki paling tinggidibandingoperatorlain.Jikadidalamsuatubariskodeterdapatoperatoraritmatika,pembandingdanlogikamakayangdidahulukanoperasinyaadalahoperatoraritmatika.OperatorAritmatikadarihirarkitertinggikerendah:^ |Pemangkatan |TandaNegatif*,/ |PerkaliandanPembagian\ |PembagianIntegerMod |Modulus(sisapembagian)+, |PenambahandanPengurangan+,& |PenggabunganStringNote: operator penggabungan string sebenarnya tidak termasuk kategori aritmatika tetapihirarkinyatepatdibawahoperatoraritmatikadandiatasoperatorpembanding.

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    4

    OperatorPembandingDignakan untuk membandingkan suatu data (ekspresi) dengan data (ekspresi) lain danmenghasilkannilailogika(boolean)benaratausalah.= |Samadengan |Tidaksamadengan |Lebihbesar= |LebihbesaratausamadenganLike |MempunyaiciriyangsesuaiIs |SamareferensiobjekOperatorLogikaDigunakanuntukmengekpresikansatuataulebihdata(ekspresi)logika(boolean)menghasilkandatalogikabaru.Not |TidakAnd |DanOr |AtauXor |ExclusiveOrEqv |EkivalenImp |Implikasi

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    5

    Lanjut...TUTORIAL|PROJECTQCRDRIVINGPROGRESS(MCCONNELLDOWELL)MENU

    Sebelummembahasini,kitacobabahascarapembuatanmenustandardims.Access.SwitchboardManagerMerupakan salah satu fasilitasdariMsAccessyangdapatdigunakanuntukmembuat menuyangberadadidalamsebuahForm.CaraMembuatmenudenganSwitchboardManagerUntukmembuatmenudenganfasilitasSwitchboardManagersangatlahmudah,dimanaAndaharusmempersiapkan terlebihdahuludatayangdigunakan seperti form, reportdan lainlainyangakandigunakanpadamenutersebut.1. JalankanMsAccess2007danbukadatabaseyangdigunakan2. LangsungsajadimulaipadatampilanMsAccess2007kliktabDatabaseTooldanpadasebelah

    kananataskliktombolSwitchboardManagersepertigambardibawahini:

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    6

    3. Setelahituuntukmembuatmenupadalevelpertama(menuutamanya)makakliktombol.Edit

    danakantampilsepertigambardibawahini:

    4. Sekarangmulaimembuatmenuutama.KliktombolNewuntukmembuatmenusepertipadacontohiniyaitumembuatmenuyangpertamayaituFormDatakasir.SetelahdikliktombolNewmakaakantampilform"EditSwitchboardItem"yangandaisidenganteksdarimenuyangakanditampilkansepertigambardibawah:

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    7

    5. KliktombolOkjikasudahselesai.Keterangan: Textyaituketiknamamenuyangdiinginkan Commandyaituperintahyangdigunakansesuaidenganmenusepertipadatutorialini

    yaitumemanggilform Formyaitunamaformyangakandipanggilatauditampilkan

    6. Lakukanperintahsesuaidenganlangkah6untukmembuatmenuLaporan,danhasilnya

    sepertigambardibawahini:

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    8

    7. UntukmembuatmenuSelesaisamasepertipadalangkah6,7.danhasilnyasepertgambar

    dibawahini:

    8. Jikasudahselesai,kliktombolOks.dtombolclosedanuntukmelihathasilnyayaitudenganmembukaobjectgrupFromdanklikformSwitchboard.Hasilnyalihatgambardibawahini:

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    9

    Kembalikeproject,...Halamanpertamayangmunculsaatprogramdijalankanadalahform

    [MainSwitchboard]

    TerdiridariHeader&Detail,Headerakanmunculdisetiapcontentmenu(Detail).

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    10

    Login [Command51]|TombolloginterhubungdenganEventProcedureKLIK

    BerikutKodenya: PrivateSubCommand51_Click()mendefinisikanVariabelDimdbAsDatabaseDimLUpdateAsStringDimLUpdateLogTimeAsStringDimdateTimeAsStringDimjamAsStringDimaaAsStringDimgabungAsStringDimmsgAsStringOnErrorResumeNext'getcurrentdatedateTime=DateValue(CStr(Now()))'getcurrenttimejam=TimeValue(CStr(Now()))'combinedate&timegabung=dateTime+""+jambagian inimenggantiobjekyangditampilkanpadaform, jikakondisiLabelatauCaptionditombolCommand51 berisi Logout maka dirubah menjadi Login dengan menyembunyikan beberapaobject.Me=ArtinyapadaFormAktif.PadatampilanawalsebelumLoginsaatformaktif.IfMe.Command51.Caption="Logout"ThenMe.Command51.Caption="Login"Me.Command28.Enabled=FalseMe.Command29.Enabled=FalseMe.Command30.Enabled=FalseMe.Command31.Enabled=FalseMe.Command38.Enabled=FalseMe.Command39.Enabled=FalseMe.Command19.Enabled=FalseMe.Command21.Enabled=FalseMe.Command23.Enabled=FalseMe.Command44.Enabled=FalseMe.Command57.Enabled=FalseMe.Command52.Enabled=FalseMe.Command89.Enabled=FalseMe.Text107.Visible=FalseEndIf

    Login

  • COMPUTERCOURSE|+62778351609085264200180085767244066

    WWW.NICESOFTMEDIA.COM

    11

    perintah di bawah berfungsi untuk mensetting / mengisi variabel database dan waktu sertamenyembunyikanataumenampilkanbeberapaobjek.(False=sembunyi;True=Aktif)IfMe.Command51.Caption="Login"ThenSetdb=CurrentDb()LUpdate="UPDATEuser_tble"LUpdate=LUpdate&"SETstatus_user='Logout',logout_date='"&gabung&"'"LUpdate=LUpdate&"WHEREfull_name='"&Me.Text68.Value&"'"db.ExecuteLUpdate,dbFailOnErrorLUpdateLogTime="UPDATEdate_time_user_log_tble"LUpdateLogTime=LUpdateLogTime&"SETend_time='"&gabung&"'"LUpdateLogTime=LUpdateLogTime&"WHEREfull_name='"&Me.Text68.Value&"'"db.ExecuteLUpdateLogTime,dbFailOnErrorMe.Label59.Visible=TrueMe.Label60.Visible=FalseMe.Frame66.Visible=FalseMe.Command61.Visible=FalseMe.Command64.Visible=FalseMe.Command65.Visible=FalseMe.Frame9.Visible=FalseMe.Frame34.Visible=FalseMe.Frame16.Visible=FalseMe.Frame40.Visible=FalseMe.Frame53.Visible=FalseMe.Frame87.Visible=FalseMe.Frame95.Visible=FalseMe.Command28.Visible=FalseMe.Command29.Visible=FalseMe.Command30.Visible=FalseMe.Command3