录入.prg

来自「排课管理系统」· PRG 代码 · 共 14 行

 select  课程设置
   append  blan
   replace  课程 with (thisform.text1.value)
   replace  主讲 with (thisform.text2.value)
   replace  学时      with (thisform.text3.value)
   replace  学分   with  (thisform.text4.value)
   replace  班级  with  (thisform.text5.value)
   replace  人数  with  (thisform.text6.value)
      thisform.text1.refresh
      thisform.text2.refresh
      thisform.text3.refresh
      thisform.text4.refresh
      thisform.text5.refresh
      thisform.text6.refresh