【程序说明】 打开银行客户关系表，输入一个控制口令控制程序的执行，若口令为1，则把“银行代码”为001的所有记录加上删除标记；若口令为2，把“银行代码”为002的所有记录加上删除标记；若口令为3，把“银行代码”为003的所有记录加上删除标记。【程序】CLEARUSE 银行客户关系表 EXCLUSIVEBROWSE LASTWATT “请输入你的选择：(1—3)”TO yhdmDO CASECASE (1)DELETE ALL FOR 银行代码＝“001”BROWSE ALL FOR 银行代码=“001”RECALLCASE (2)DELETE ALL FOR 银行代码＝“002”BROWSE ALL FOR 银行代码=“002”RECALLCASE (3)DELETE ALL FOR 银行代码＝“003”BROWSE ALL FOR 银行代码＝“003”RECALLENDCASEBROWSEUSE(1)A．yhdm＝"1"B．yhdm＝"2"C．yhdm="3"D．OTHERWISE
【程序说明】 打开银行客户关系表，输入一个控制口令控制程序的执行，若口令为1，则把“银行代码”为001的所有记录加上删除标记；若口令为2，把“银行代码”为002的所有记录加上删除标记；若口令为3，把“银行代码”为003的所有记录加上删除标记。
【程序】
CLEAR
USE 银行客户关系表 EXCLUSIVE
BROWSE LAST
WATT “请输入你的选择：(1—3)”TO yhdm
DO CASE
CASE (1)
DELETE ALL FOR 银行代码＝“001”
BROWSE ALL FOR 银行代码=“001”
RECALL
CASE (2)
DELETE ALL FOR 银行代码＝“002”
BROWSE ALL FOR 银行代码=“002”
RECALL
CASE (3)
DELETE ALL FOR 银行代码＝“003”
BROWSE ALL FOR 银行代码＝“003”
RECALL
ENDCASE
BROWSE
USE
(1)
A．yhdm＝"1"
B．yhdm＝"2"
C．yhdm="3"
D．OTHERWISE
相关考题：
(1l)假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击“登录”按钮时，若用户名输入错误，则提示。“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的Click事件中的代码如下：USE 口令表GO TOPFlag=0DO WHILE.not.EOFIF Alltrim(用户名)= =Alltrim(Thisfrom.Text1.Value)IF Alltrim(口令)= =Alltrim(Thisfrom.Text2.Value)WAIT"欢迎使用" WINDOW TIMEOUT2ELSEWAIT"口令错误" WINDOW TIMEOUT2ENDIFFlag=1EXITENDIFSKIPENDDOIF ________WAIT"用户名错误"WINDOW TIMEOUT2ENDIF则在横线处应填写的代码是A）flag=-1 B）flag=0 C) flag=1 D）flag=2
假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击录”按钮时，若用户名输入错误，则提示“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的click事件中的代码如 USE 口令表 GO TOP flag=0 DO WHILE.not.EOF0 IF Ailtrim(用户名)=Alltrim(This form.Text1.Value) IF Alltrim(口令)=Alltrim(Thisform.Text2.Value) WA1T"欢迎使用"WIN DOW TIMEOUT2 ELSE WAIT"口令错误" WINDOW TIMEOUT2 ENDIF flag=1 EXIT ENDIF SKIP ENDDO IF______ WAIT"用户名错误"WINDOW TIMEOUT2 ENDIF 则在横线处应填写的代码是A．flag=-1B．flag=0C．flag=1D．flag=2
窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序Private Sub Command1_click()Dim 11If Textl．Text”123456”Thenn=n+1print“口夸输入错误”＆n＆次”End IfEnd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是A．在Dim n语句的下面添加一句：n=OB．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”+n+“次”C．把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”＆Str(n)＆“次”D．把Dim n改为Static n
假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击“登录”按钮时，若用户名输入错误，则提示“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的Click事件中的代码如下： USE 口令表 GO TOP flag=0 DO WHILE.not.EOF() IF Alltrim(用户名)=Alltrim(Thisform.Text1.Value) IF Alltrim(口令)=Alltrim(Thisform.Text2.Value) WAIT“欢迎使用”WINDOW TIMEOUT2 ELSE WAIT“口令错误”WINDOW TIMEOUT2 ENDIF flag=1 EXIT ENDIF SKIP ENDDO IF ______ WAIT“用户名错误”WINDOW TIMEOUT2 ENDIF 则在横线处应填写的代码是A．flag=-1B．flag=0C．flag=1D．flag=2
（ 24 ）窗体上有一个 Text1 文本框，一个 Command1 命令按钮，并有以下程序Private Sub Commandl_Click （）Dim nIf Text1.Text " 23456 " Thenn=n ＋ 1Print " 口令输入错误 " n " 次 "End IfEnd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击 “ 确认口令 ” 命令按钮 ， 若输入的口令不是 “ 123456 ” ，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是A ）在 Dim n 语句的下面添加一句： n=OB ）把 Print " 口令输入错误 " n " 次 " 改为 Print " 口令输入错误 " +n+ " 次 "C ）把 Print " 口令输入错误 " n " 次 " 改为 Print " 口令输入错误 " Str ( n ) " 次 "D ）把 Dim n 改为 Static n
【程序说明】假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击“登录”按钮时，若用户名输入错误，则提示“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。命令按钮“登录”的Click事件中的代码如下。【程序】USE 口令表GO TOPflag＝0DO WHILE (3)IF Alltrim (用户名)= ＝Alltrim(Thisform. Text1. Value)IF Alltrim (口令)＝＝Alltrim(Thisform. Text2，Value)WAIT“欢迎使用”WINDOW TTMEOUT2ELSEWATT“口令错误” WINDOW TIMEOUT2ENDIFflag＝1EXITENDIFSKIFENDDOIF (4)WAIT“用户名错误”WINDOW TIMEOUT2ENPIF(3)A．BOF()B．.NOT.BOF()C．EOF()D．.NOT.EOF()
窗体上有一-个Text1文本框，一个Command1命令按钮，并有以下程序：Private Sub Command1 Click（ ） Dim n If Text1．Text"123456"Then n=n+1 Print"口令输入错误”＆n＆”次" End If End Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确定口令’’命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是（ ）。A.在Dim n语句的下面添加一句：n=0B.把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”+n+“次”C.把Print“口令输入错误”＆n＆“次”改为Print“口令输入错误”＆Str(n)＆“次”D.把Dim n改为Static n
假定用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击“登录”按钮时，若用户名输入错误，则提 示“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的Click事件中的代码 如下： USE口令表 GO TOP flag=0 DO WHILE．not．EOF() IF Alltrim(用户名)==Alltrim(Thisform．Text1．Value) IF Alltrim(口令)==Alltrim(Thisform．Text2．Value) WAIT"欢迎使用”WINDOW TIMEOUT2 ELSE WAIT“口令错误”WINDOW TIMEOUT2 ENDIF flag=1 EXIT ENDIF SKIP ENDDO IF________ WAIT“用户名错误”WINDOW TIMEOUT 2 ENDIF 则在横线处应填写的代码是A．flag=-1B．flag=0C．flag=1D．flag=2
假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口令并单击“登录”按钮时，若用户名输入错误，则提示“用户名错误”；若用户名输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的Click事件中的代码如下： USE 口令表 GO TOP flag =0 DO WHILE .not.EOF（） IF Alltrim（用户名）==Alltrim（Thisform.Text1.value） If Alltrim（口令）＝＝Alltrim（Thisform.Text2.value） WAIT\欢迎使用\WINDOW TIMEOUT2 ELSE WAIT\口令错误\WINDOW TIMEOUT2 ENDIF flag=1 EXIT ENDIF SKIP ENDDO IF —————— WAIT\用户名错误\WINDOW TIMEOUT2 ENDIF 则在横线处应填写的代码是A．flag=-1B．flag=0C．flag=1D．flag=2