该程序用于由用户编辑系统日期和时间。输入集是(Alt-F4,时间,日期,选项卡)。请解释Tab案例的工作原理? 代码如下:
Input = GetInput()
While (Input != Alt-F4) do
Case (Input = Time)
If ValidHour(Time.Hour) and ValidMin(Time.Minute) and
ValidSec(Time.Second) and ValidAP(Time.AmPm)
Then
UpdateSystemTime(Time)
Else
DisplayError(“Invalid Time.”)
Endif
Case (Input = Date)
If ValidDay(Date.Day) and ValidMnth(Date.Month) and
ValidYear(Date.Year)
Then
UpdateSystemDate(Date)
Else
DisplayError(“Invalid Date.”)
Endif
Case (Input = Tab)
If TabLocation = 1
Then
MoveCursor(2)
TabLocation = 2
Else
MoveCursor(1)
TabLocation = 1
Endif
Endcase
Input = GetInput()
Enddo
答案 0 :(得分:0)
小程序显示一个包含当前系统时间和日期的窗口,可以通过在编辑字段中键入新值来更改该窗口,如下所示。该程序由 Alt + F4 键盘组合终止, Tab 键在字段之间移动。
当您按 Tab 键时,它会将光标移动到另一个编辑字段。由于此图片中只有两个编辑字段,新时间:和新日期:,按 Tab 会将光标从其中的任何一个字段移开位于另一个领域。
来源: Andrew J. Ko