home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Programmierung / SOURCE.mdf / programm / windows / c / vb3_tb / tbox1.$$$ < prev    next >
Encoding:
INI File  |  1993-08-10  |  1.6 KB  |  81 lines
  1. [Project Heading]
  2. '**********************************************************************************
  3. '* MAINTENANCE HISTORY:                                             
  4. '*     Project Name:                Coder:
  5. '* 
  6. '*     Version                      Client:
  7. '*
  8. '*     Comments:
  9. '*
  10. '***********************************************************************************
  11. 'Prefex map
  12.  
  13. 'txt  text box          'pic  picture box               'ar   array
  14. 'chk  check box         'cmd  command button            'h    handle        
  15. 'cbo  combo box         'dir  directory list box        'p    pointer
  16. 'mnu  menu              'drv  drive list box            't    type
  17. 'lbl  label             'fil  files list box            'grd  grid
  18. 'fra  frame             'pcb  picture clip (PTK)        'gph  graph
  19. 'frm  form              'opt  option (radio) button     'tmr  timer
  20. 'lst  list box          'vsb  vertical scrollbar        'hsb  horizontal scrollbar
  21.  
  22. [Divider]
  23. '************** START NEW PROCESS *************
  24.  
  25. [Std Dim]
  26. Defint A-M
  27. DifStr N-Z
  28. Dim fileNum%, counter%, x%, y%
  29. Dim fileName$, Msg$, fline$ 
  30.  
  31. [For/Next]
  32. For i% = 0 to 10
  33.  
  34. Next i%
  35.  
  36. [For/Next 2X]
  37. For i% = 0 To 10
  38.     For j% = 0 To 10
  39.  
  40.     Next j%
  41. Next i%
  42.  
  43. [If/Then]
  44. If CONDITION then
  45.  
  46. else
  47.  
  48. End If
  49.  
  50. [Do While]
  51. Do While CONDITION
  52.  
  53. Loop
  54.  
  55. [Do Until]
  56. Do Until CONDITION
  57.  
  58.  
  59. Loop
  60.  
  61. [Select Case]
  62. Select Case VARIABLE
  63.     Case VAL1
  64.  
  65.     Case VAL2
  66.  
  67.     Case Else
  68.  
  69. End Select
  70.  
  71. [Do Events]
  72. w% = DoEvents()
  73.  
  74. [Mid$]
  75. Mid$(VAR$, START%, LENGTH%)
  76.  
  77. [Type]
  78. Type MYTYPE
  79.  
  80. End Type
  81.