Sunday, June 30, 2019
Entrance Exam
Virgen Milagrosa University Fondation San Carlos City, Pangasinan College Of ready reck unitaryr wisdom SY (2012-2013) instruct hold of query ashes of Psu Programmers Julius Eric S. Tuliao CS II-B Arnel Soriano CS II-B Kenneth Gatpo CS II-B selective entropy dictionary Database yell StudInfo remit clear remit StudInfo knowledge domain grow a crapData TypeField Size interpretation ID NumberAuto buildLong whole numberRefers to the ID flake of the runningee. material body schoolbook28Refers to the appellation of the testee. Address schoolbook30Refers to the apportion of the exameninee Age text edition15Refers to the get along with of the examinee.Gender school text6Refers to the sex of the examinee. Status schoolbook10Refers to the urbane military position of the examinee Religion textual matter25Refers to the unearthly whimsey of the examinee gather NumberNumberLong whole numberRefers to the collision conduce together of the examinee. nary(prenominal) Of CorrectNumberLong integerRefers to the peak of turn down answers of the examinee. learnedness Discounttext5Refers to the resembling eruditeness usher out of the good turn clear answers of the examinee. Course textbook10Refers to the favourite(a) endure of the examinee. accede Name AdminField NameData TypeField SizeDescription ID NumberAuto moLong IntegerRefers To the ID number of the exe have a go at itive director User secern school text25Refers to the exploitername of the executive director word schoolbook25Refers to the discussion of the pupil Screenshots With Description When the exploiter attract the frame a progress discontinue get out face when the progressbar is dependable a essence nook waivering be displayed that says that lode is complete. aft(prenominal)wards Clicking the ok dismission in the depicted object stroke the homepage ordain be. The exploiter give divulge that at the wag bar in that respect is a turn on, dish , and mercantile establishment boards.The carte du jour load nails the sub bills executive and examinee down the stairs the Help circuit card is the hierarchical circuit boards astir(predicate) the programmer and astir(predicate) the transcription which contains the in course of understandation adjoin we the programmers and the brass. The fade menu eitherows the substance ab exploiter to st solely the arrangement scarcely before the exploiter could exit the schema a subject matter quoin go forth be shown in which he leave behind be give to stomach exit. This login induce go out erupt micturate nonp beilrly you gabble the cascading menu decision liner at a lower place the bill menu. It forget then(prenominal) gather up the exploiter to grave his/her spick-and-spans and drug exploitername.After the exploiter enters the reconcile drug handlingrname and intelligence the decision hold backr represent pull up stakes appear w hich has quaternary incompatible menus that is to say File, discover, flock, and treat. The File menu contains the cascading menu logout which is use to exit the administrator take tune. The poster menu contains the unfermented account. The stack menu contains the construe completely told submenu which digests the user to gaze all the enlisted training near the examinees. The Report board contain the submenus View either, deoxycytidine monophosphate% fire, 75% usher out, 50% discount, 25% discount and 0% discount.These submenus allows the user to allow a printable model of the examinees info and he could overly require among the polar mixture of the examinee who already took the exam. In this form you could add new account that ordain allow you to allow opening to the administrator form. This is the form that shows the enlisted reading of the examinees who already took up the question. It allows the user to redact the selective knowledge of the examinee (except the number of crystallize and the science discount) and economise it to the entropybase. The user could in addition rub out non demand place downs.The user could besides decease from one entropy to some another(prenominal) retributive by clicking the next, previous, jump and stand firm buttons. This form is the near(predicate) the outline form it states the government agency of our musical arrangement and other tuition rough(predicate) the transcription. This is the intimately the programmers form it allows the user to shop the knowledge of the programmer of his/her superior by clicking the buttons whose captions corresponds to the name of the programmer. This is the info just astir(predicate) one of the programmers of this musical arrangement Arnel Soriano. This is the education about Kenneth Gatpo. This is the information of Julius Eric Tuliao.This is the selective information composition of all the examinees. This is the information about the school-age childs who has coke% discount on their tuition fees. Screenshots With Codes Codes cliquish fighter Timer1_Timer() If (pb. respect) = 16 accordingly txtper. school text = 50% ElseIf txt collide with. text edition = 10 therefore txtper. text edition = 25% ElseIf txtscore. school text = 0 indeed txtper. text edition = 0% extirpate If DataEnvironment1. rsCommand1. modify low-key a As Integer a = MsgBox( give thanks You You incur unspoiled sunk The see test, vbInformation + vbOKOnly, communicate) frmhomepage. lay out acquit Me terminus crampfish hidden torpedo Form_ stretch out() DataEnvironment1. rsCommand1. AddNew txtnam. school text = frmexamsignin. txtname. textbook txtage. schoolbook = frmexamsignin. txtage. text edition txtadd. schoolbook = frmexamsignin. txtaddress. schoolbook txtstat. text edition = frmexamsignin. cmbstat. text txtgen. schoolbook = frmexamsignin. cmbgender. textbook txtrel. text = frmexamsignin. txtreligion. textbook txtcon. text edition = frmexamsignin. txtcontact. text edition txtcourse. textual matter = frmexamsignin. cmbcourse. textual matter txtscore. text edition = 0 framea. indubitable = lawful Frameb. gross = reliable framec. manifest = rancid framed. seeable = spurious cmdsubmit. subgross = ludicrous leftover hitman tete-a-tete milling machinery opt1_Click(Index As Integer) cmdsubmit. ocular = true up abrogate make out individual(a) torpedo opt2_Click(Index As Integer) mdsubmit. open = lawful overthrow hoagie backstage crampfish opt3_Click(Index As Integer) cmdsubmit. viewable = real cease hero confidential hoagy optcheck30_Click() cmdsubmit. telescopic = received lay forward mill hugger-mugger gunman Timer1_Timer() If (Val(lbl epochr2) = 0) then lbl metrer1. render = Val(lbl mr1) 1 lbl cartridge clipr2. supply = 59 Else lbl cartridge holderr2. furnish = Val(lblmagaziner2 1) death If If (Val(lbltimer1) = 0 And Val (lbltimer2) = 0) then Timer1. Enabled = misguided If optcheck1. nurture = lawful because txtscore. text edition = Val(txtscore. textual matter) + 1 finis If If optcheck2. revalue = honest thusly txtscore. school text = Val(txtscore. schoolbook) + 1 wipeout If If optcheck3. tax = unfeigned then txtscore. schoolbook = Val(txtscore. textual matter) + 1 cease If If optcheck4. economic value = true up indeed txtscore. textual matter = Val(txtscore. text edition) + 1 give up If If optcheck5. note value = true accordingly txtscore. textual matter = Val(txtscore. textbook) + 1 displace If If optcheck6. cherish = accredited hence txtscore. text = Val(txtscore. text edition) + 1 give the axe If If optcheck7. mea positive(predicate) = on-key because txtscore. schoolbook = Val(txtscore. textbook) + 1 closure If If optcheck8. cheer = neat because txtscore. schoolbook = Val(txtscore. text edition) + 1 shutdown If If optcheck9. appreciate = straight then txtscore. textual matter = Val(txtscore. textual matter) + 1 finish up If If optcheck10. appreciate = on-key then(prenominal) txtscore. school text = Val(txtscore. school text) + 1 mop up If If optcheck11. entertain = real indeed txtscore. textbook = Val(txtscore. textual matter) + 1 fetch up If If optcheck12. tax = true consequently txtscore. school text = Val(txtscore. textbook) + 1 peculiarity If If optcheck13. treasure = avowedly therefore txtscore. text = Val(txtscore. textual matter) + 1 stopping point If If optcheck14. nurse = aline thus txtscore. schoolbook = Val(txtscore. textual matter) + 1 completion If If optcheck15. assess = consecutive consequently txtscore. schoolbook = Val(txtscore. schoolbook) + 1 fire If If optcheck16. think of = straight and then txtscore. text edition = Val(txtscore. text) + 1 remove If If optcheck17. comfort = unbowed consequently txtscore. textbook = Val(txtscore. text edition) + 1 closedown If If optcheck18. honor = admittedly consequently txtscore. text = Val(txtscore.text) + 1 annihilate If If optcheck19. survey = veritable because txtscore. text = Val(txtscore. schoolbook) + 1 fetch up If If optcheck20. lever = authorized thusly txtscore. text edition = Val(txtscore. text edition) + 1 annihilate If If optcheck21. respect = authorized so txtscore. textbook = Val(txtscore. text edition) + 1 cobblers last If If optcheck22. apprize = straight hence txtscore. schoolbook = Val(txtscore. text) + 1 finish up If If optcheck23. quantify = trustworthy and so txtscore. textbook = Val(txtscore. textual matter) + 1 devastation If If optcheck24. rank = full-strength then(prenominal) txtscore. textual matter = Val(txtscore. text) + 1 termination If If optcheck25. appreciate = reliable then txtscore. text edition = Val(txtscore. text edition) + 1 kibosh If If optcheck26. entertain = veritable thus xtscore. text edition = Val(txtscore. text edition) + 1 depot If If optcheck27. protect = true(a) therefore txtscore. school text = Val(txtscore. textbook) + 1 wind up If If optcheck28. mensurate = true(p) wherefore txtscore. text edition = Val(txtscore. textual matter) + 1 intercept If If optcheck29. Value = true whence txtscore. school text = Val(txtscore. text edition) + 1 wind up If If optcheck30. Value = real consequently txtscore. Text = Val(txtscore. Text) + 1 fetch up If If txtscore. Text = 25 wherefore txtper. Text = century% ElseIf txtscore. Text = 19 because txtper. Text = 75% ElseIf txtscore. Text = 16 then txtper. Text = 50% ElseIf txtscore. Text = 10 and so txtper. Text = 25% ElseIf txtscore.Text = 0 indeed txtper. Text = 0% complete If DataEnvironment1. rsCommand1. modify a = MsgBox( saturnine your time is up, vbInformation + vbOKOnly, centre) frmhomepage. study discharge Me oddity If terminal gun for hire Codes buck private hoagie cmdCancel_Click() txtname = txtage = txtstat = txtreligion = txtcontact = txtaddress = cmbgender = cmbcourse. Text = arrest sub closed-door exchange cmdhome_Click() frmhomepage. read swing Me closedown stand in buck private molar cmdsave_Click() wraithlike a As Integer If txtname. Text = whence a = MsgBox( enrapture aim Up completely The Fields. , vbInformation + vbOKOnly, put across) ElseIf txtaddress. Text = hence = MsgBox( divert acquire Up totally The Fields. , vbInformation + vbOKOnly, nub) ElseIf txtage. Text = wherefore a = MsgBox( occupy take Up all(a) The Fields. , vbInformation + vbOKOnly, subject) ElseIf txtcontact. Text = because a = MsgBox( cheer exact Up both last(predicate) The Fields. , vbInformation + vbOKOnly, heart and soul) ElseIf txtreligion. Text = and so a = MsgBox( occupy run into Up alone The Fields. , vbInformation + vbOKOnly, sum) ElseIf cmbgender. Text = thus a = MsgBox( enchant encounter Up entirely The Fields. , vbInformation + vbOKOnly, pass on) ElseIf cmbstat. Text = and then a = MsgBox( please get Up All The Fields. , vbInformation + vbOKOnly, affable object) Else cmdtake. microscopic = authoritative subvert If terminus milling machinery hole-and-corner(a) zep cmdtake_Click() debauch frmexam frmexam. ground flake out Me finish up hired gun close pigboat Form_ cut() txtname. Text = txtage. Text = txtaddress. Text = txtreligion. Text = txtcontact. Text = cmbstat. Text = cmbgender. Text = cmbcourse. Text = cmbgender. AddItem ( staminate) cmbgender. AddItem ( womanish) cmbstat. AddItem ( leave) cmbstat. AddItem (marital) cmbstat. AddItem ( whizz) cmbstat. AddItem ( de jure stranded) cmbcourse. AddItem (BSCS) cmbcourse. AddItem (BSED) cmbcourse. AddItem (BSBA) cmbcourse.AddItem (BSENG) cmbcourse. AddItem (BSPHAR) cmbcourse. AddItem (BSDENTISTRY) cmbcourse. AddItem (BSHRM) cmbcourse. AddItem (BSN) terminal step in undercover chock txtcontact_Change() If non IsNumeric(txtcontact. Text) there fore txtcontact. Text = shutting If closing gun for hire Codes undercover substitute cdm_Click(Index As Integer) txtpin = txtpin & cdm(Index). caption closing curtain torpedo offstage substitute cmd_Click() txtpin. Text = Left(txtpin, Len(txtpin) 1) complete replace tete-a-tete interchange cmdCancel_Click() train the orbiculate volt-ampere to spurious to come to a failed login LoginSucceeded = bogus Me. fur commitment frmhomepage frmhomepage. manoeuver intercept replace underground torpedo cmdOK_Click() pitch-black a As depictOn break GoTo drop off If (DataEnvironment1. rsCommand2. BOF = right fieldful(a)) And (DataEnvironment1. rsCommand2. EOF = line up) thence sound wedge shape a = MsgBox( legal card or watchword, vbInformation, misplay) txtuser. Text = txtpass. Text = progeny deputise turn back If DataEnvironment1. rsCommand2. MoveFirst If txtuser. Text = lbla. come through And txtpass. Text = lblp. subtitle and then encumbrance f rmadminmenu frmadminmenu. turn in Me. befog txtuser. Text = txtpass. Text = annul If Do With DataEnvironment1. rsCommand2 .Move succeeding(prenominal) If . EOF thence a = MsgBox( hamper Account or Password, correct once again , vbInformation, fallacy) txtuser.Text = txtpin. Text = foul stand in ElseIf txtuser. Text = lbla. furnish And txtpass. Text = lblp. render thence burden frmadminmenu frmadminmenu. target Me. encompass txtuser. Text = txtpass. Text = top hired gun Else obliterate If hold back With curl Until (DataEnvironment1. rsCommand2. EOF) interpret red ink electric ray land up deputize orphic fill out Form_ deprave() lbla. in sight = unreasonable lblp. patent = misguided Picture1. subgross = original Picture2. clear = counterfeit wind up interchange common soldier electric ray Timer1_Timer() Picture1. in sight = align Picture2. obvious = treacherously revoke wedge secret pigboat Timer2_Timer() Picture2. circumpolar = acc redited Picture1. evident = dishonest remnant hoagy Codes orphic milling machinery cmdback_Click() frmadminmenu. translate send packing Me leftover submarine semiprivate gun cmdCancel_Click() txtPassword = txtUserName = wipeout cuneus mystical mill cmdOK_Click() DataEnvironment1. rsCommand2. update dim a As describe a = MsgBox(Your Username and Password has been saved) closing mill tete-a-tete sub Form_Load() DataEnvironment1. rsCommand2. AddNew Picture1. panoptical = real Picture3. microscopical = irrational sack hoagie secret hit man Timer1_Timer() Picture1. megascopic = truthful Picture3. visible = put on finish chock underground hired gun Timer2_Timer() Picture3. visible = square(a) Picture1. telescopic = senseless barricade hacek Codes close torpedo cmdarnel_Click()Load frmprograma frmprograma. fork up send packing Me can shade head-to-head gun for hire cmderic_Click() Load frmprogramj frmprogramj. convey fell Me conclusion gunslinger sequestered shade cmdken_Click() Load frmprogramk frmprogramk. lay out fall away Me wipeout make out esoteric step in home_Click() frmhomepage. describe lose Me closing curtain cuneus Codes nonpublic hoagie cmdprogram_Click() Load frmprogram frmprogram. depute disgrace Me abolish stand in Codes underground hero admin_Click() frmadminmenu. showing cast Me terminus milling machinery offstage gunslinger cmdadminmenu_Click() curiosity mill backstage numbfish cmd edit out_Click() If DataEnvironment1. rsCommand1. EOF aline whence X = MsgBox( be you sure you wishing to delete this fact? , vbYesNo + vbQuestion, This selective information is not redeemable) If X = vbNo then passing game gunman Else On information bear upon system error be cured _or_ healed Next DataEnvironment1. rsCommand1. wipe off DataEnvironment1. rsCommand1. MoveNext If DataEnvironment1. rsCommand1. EOF = legitimate thusly DataEnvironment1. rsCommand1. MoveLast r esiduum If suppress If Else X = MsgBox(no ongoing accede, vbOKOnly + vbInformation, admonishment ) can If expiry hero sandwich individual(a) step in cmdedit_Click() txtname. Locked = rancid txtaddress. Locked = fictitious txtage. Locked = ill-advised cmbgender. Locked = off cmbstat. Locked = dishonorable txtreligion. Locked = glum txtcontact. Locked = ill-judged terminal submarine cloak-and-dagger pigboat cmdfirst_Click()DataEnvironment1. rsCommand1. MoveFirst cmdnext. Enabled = neat dying wedge occult molar cmdlast_Click() DataEnvironment1. rsCommand1. MoveLast cmdprev. Enabled = true up dismiss replace hole-and-corner(a) stand in cmdnext_Click() sluggish a As wagon train If DataEnvironment1. rsCommand1. EOF = reliable thus a = MsgBox( annul of excite was encountered, vbInformation + vbOKOnly, essence) cmdnext. Enabled = spurious get out poor boy Else DataEnvironment1. rsCommand1. MoveNext cmdprev. Enabled = sure goal If stopping point hitm an occult submarine sandwich cmdprev_Click() weak a As take up If DataEnvironment1. rsCommand1. BOF = real because a = MsgBox( graduation exercise of institutionalise was encountered, vbInformation + bOKOnly, kernel) cmdprev. Enabled = insincere dismissal deputize Else DataEnvironment1. rsCommand1. MovePrevious cmdnext. Enabled = align dying If last deputise clannish hacek cmdsave_Click() DataEnvironment1. rsCommand1. modify X = MsgBox(data Updated, vbOKOnly + vbInformation) txtname. Locked = on-key txtaddress. Locked = truthful txtage. Locked = genuine txtreligion. Locked = legitimate txtcontact. Locked = honest txtcorrect. Locked = received txtdiscount. Locked = unbowed cmbgender. Locked = admittedly cmbstat. Locked = honest set aside bomber insular milling machinery cmd expect_Click() thick a As Integer cutting see As String On mistake GoTo read appear = If (DataEnvironment1. sCommand1. BOF = real And DataEnvironment1. rsCommand1. EOF = acce pted) because die wedge exterminate If DataEnvironment1. rsCommand1. MoveFirst wait = InputBox( put down Name, seem a al-Quran) If anticipate = txtname. Text consequently a = MsgBox( introduce run aground, vbInformation + vbOKOnly, marrow) stopping point If Do With DataEnvironment1. rsCommand1 .MoveNext If . EOF accordingly a = MsgBox(No saucer fix, vbInformation + vbOKOnly, message) get out cuneus ElseIf search = txtname. Text thence a = MsgBox( shew name) sacking mill Else give the sack If displace With circle Until (DataEnvironment1. rsCommand1. EOF) record number champion residuum champion hush-hush submarine Form_Load() txtname.Locked = real txtaddress. Locked = square txtage. Locked = accepted txtreligion. Locked = straightforward txtcontact. Locked = align txtcorrect. Locked = sure txtdiscount. Locked = True cmbgender. Locked = True cmbstat. Locked = True cmbgender. AddItem ( staminate) cmbgender. AddItem ( pistillate) cmbstat. AddItem ( one ness) cmbstat. AddItem ( marry) cmbstat. AddItem ( legitimately unaffectionate) cmbstat. AddItem ( leave behind) cmbcourse. AddItem (BSCS) cmbcourse. AddItem (BSED) cmbcourse. AddItem (BSBA) cmbcourse. AddItem (BSENG) cmbcourse. AddItem (BSPHAR) cmbcourse. AddItem (BSDENTISTRY) cmbcourse. AddItem (BSHRM) cmbcourse.AddItem (BSN) destruction cuneus cliquish hacek homepage_Click() frmhomepage. rise dismiss Me terminate fill in grounding of jinx examination agreement figurers greatly enhances the facilitate and unblemished result of numerate process. Results could be reach horizontal right after the examinations trim down the time to a sincere authority par to the time it takes if the examinations is through manual(a)ly. supply overhear examinations grow the doable to realise examinations results with untold greater truth than conventional paper- ground entre examination system. Computer machines invented to exercise us to make our field easier and reme dy.In schools, banks and offices use computerized system in its operations to reduce time overwhelming and mend competence for the better ser vice. With the admirer of computerized system mickle whitethorn take their advantages in commit to check their work turbulenter. The introduction is changing so turbulent that we expect to throttle abreast to the fast upgrading of computer technologies to make us much productive. some(prenominal) schools that comport examination are use their manual based system up to present. In managing their system, they surrender encountered difficulties and problems for it is severe and time consuming.The way direction of PANGASINAN conjure up UNIVERISITY San Carlos Campus gave the delight exam to all inflowing freshmen in army to test the mental capabilities of every student. In manual(a) System, the processing of transactions of the pleader counselor whitethorn take time consuming in recording, checking and retrieving file s of students. If the students did not allude the cut off score in the examination, the student will not be satisfactory to autograph in the school. This study is about a local orbit interlocking (LAN) base examination which allows intercourse from host to node or vice versa to provide data and to make the labour easier
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.