home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / codebsic / school.frm (.txt) < prev    next >
Visual Basic Form  |  1995-02-01  |  6KB  |  187 lines
  1. SchoolForm
  2. Add School
  3. Form15
  4. cmdSelectAction
  5.     SSCommand
  6. wwwwwwwwwwwwwwwwwwwwwwwwwww
  7. wwwwwwwwwwwwwwwwwwwwwwwwwww
  8. wwwwwwwwwwwwwwwwwwwwwwwwwww
  9. wwwwwwwwwwwwwwwwwwwwwwwwwww
  10. wwwwwwwwwwwwwwwwwwwwwwwwwww
  11. wwwwwwwwwy
  12. wwwwwwwwwww
  13. wwwwwwwww
  14. wwwwwwwwww
  15. wwwwwwwwy
  16. wwwwwwwwww
  17. wwwwwwww
  18. wwwwwwwww
  19. wwwwwwwy
  20. wwwwwwwwww
  21. wwwwwwww
  22. wwwwwwwwww
  23. wwwwwwwwy
  24. wwwwwwwwwww
  25. wwwwwwwww
  26. wwwwwwwwwww
  27. wwwwwwwwwy
  28. wwwwwwwwwwww
  29. wwwwwwwwww
  30. wwwwwwwwwwww
  31. wwwwwwwwwwy
  32. wwwwwwwwwwww
  33. wwwwwwwwww
  34. wwwwwwwwwww
  35. wwwwwwwwwy
  36. wwwwwwwwwww
  37. wwwwwwwwwy
  38. wwwwwwwwwww
  39. wwwwwwwww
  40. wwwwwwwwww
  41. wwwwwwwwy
  42. wwwwwwwwww
  43. wwwwwwww
  44. wwwwwwwww
  45. wwwwwwwy
  46. wwwwwwwww
  47. wwwwwwww
  48. wwwwwwwwww
  49. wwwwwwwwy
  50. wwwwwwwwww
  51. wwwwwwwww
  52. wwwww
  53. wwwwwwwwwww
  54. wwwwwwwwwwwwwwwwwwwwwwwwwww
  55. wwwwwwwwwwwwwwwwwwwwwwwwwww
  56. wwwwwwwwwwwwwwwwwwwwwwwwwww
  57. cmdSelectAction
  58.     SSCommand
  59. wwwwwwwwwwwwwwwwwwwwwwwwwww
  60. wwwwwwwwwwwwwwwwwwwwwwwwwww
  61. wwwwwwwwwwwwwwwwwwwwwwwwwww
  62. wwwwwwwwwwwwwwwwwwwwwwwwwww
  63. wwwwwwwwwwwwwwwwwwwwwwwwwww
  64. wwwwwwwwwwwwwwwwwwwwwwwwwww
  65. wwwwwwwwww
  66. wwwwwwwwwwwwwww
  67. wwwwwwwww""
  68. wwwwwwwwwwwwww
  69. wwwwwwwwr"" 
  70. wwwwwwwwwwwwww
  71. wwwwwwwwr"""
  72. wwwwwwwwwwwww
  73. wwwwwwww"""" 
  74. wwwwwwwwwwwww
  75. wwwwwwwr"""""
  76. wwwwwwwwwwww
  77. wwwwwwwr""""" 
  78. wwwwwwwwwwww
  79. wwwwwww"""""""
  80. wwwwwwwwwww
  81. wwwwwww""""""" 
  82. wwwwwwwwwww
  83. wwwwwwr""""""""
  84. wwwwwwwwww
  85. wwwwwwr"""r"""" 
  86. wwwwwwwwww
  87. wwwwwww""wwr""""
  88. wwwwwwwww
  89. wwwwwwwwwwww"""" 
  90. wwwwwwwww
  91. wwwwwwwwwwwww""""
  92. wwwwwwww
  93. wwwwwwwwwwwwwr""" 
  94. wwwwwwww
  95. wwwwwwwwwwwwwwr"""
  96. wwwwwww
  97. wwwwwwwwwwwwwwwr"" 
  98. wwwwwww
  99. wwwwwwwwwwwwwwww"""
  100. wwwwwww
  101. wwwwwwwwwwwwwwwww""wwwwwwww
  102. wwwwwwwwwwwwwwwwwwwwwwwwwww
  103. wwwwwwwwwwwwwwwwwwwwwwwwwww
  104. wwwwwwwwwwwwwwwwwwwwwwwwwww
  105. wwwwwwwwwwwwwwwwwwwwwwwwwww
  106. pnlGeneral
  107. SSPanel#
  108. txtSchoolInfo
  109. pnlGeneral
  110. SSPanel#
  111. txtSchoolInfo
  112. pnlGeneral
  113. SSPanel#
  114. txtSchoolInfo
  115. pnlGeneral
  116. SSPanel#
  117. txtSchoolInfo
  118. lblGeneral
  119. lblGeneral
  120. Principal:
  121. lblGeneral
  122. Type:
  123. lblGeneral
  124. Name:
  125. lInitSchoolRecno
  126. bExit
  127. INVALID_DATA_MSG!
  128. DUP_SCHOOL_ID_MSG
  129. CheckSchoolData
  130. iCount?
  131.     iFirstBad
  132. bFlag
  133. atrim
  134. txtSchoolInfo
  135. MB_ICONEXCLAMATION
  136. TITLE
  137. d4seek
  138.     schoolDbf
  139.     r4success
  140. SelectText
  141. ClearTBoxesz
  142. cmdSelectAction_Clickj
  143. Index
  144. CMD_OK
  145. SchoolExit1
  146. d4appendStart
  147. d4numFields
  148. f4assign
  149. d4fieldJ
  150. d4append
  151. cbErr
  152. MainForm
  153. cmbSchoolID
  154. MB_YESNO
  155. MB_ICONINFORMATION
  156.     Form_Load[
  157. SchoolInit
  158. CenterForm
  159. SchoolForm
  160. d4tagSelectr
  161. d4recno
  162. schoolIdTag
  163. txtSchoolInfo_KeyPress
  164. KeyAscii
  165. UpperAlpha
  166. All fields must have an entry.
  167. Entries for the School ID field must be unique. Please re-enter.
  168. CheckSchoolData
  169. All four fields of SCHOOL.DBF must contain dataq
  170. Check each text entry for a blankt
  171. Everthing blank, so exit form
  172. Some are blank, not acceptable
  173. No blanks, so check for unique school id
  174. ClearTBoxes
  175. cmdSelectAction_Click
  176. Check for valid data
  177. Append the recorda
  178. New school record succefully added. Add another?
  179. Form_Load
  180. SchoolExit
  181. Back to natural ordering
  182. Back to initial record numbery
  183. SchoolInit
  184. Store initial record number. We have to go back here when exiting
  185. Select tag for checking unique school id
  186. txtSchoolInfo_KeyPress
  187.