假设用户名和口令存储在自由表“口令表”中，当用户输入用户名和口

【名词&注释】

女职工(female workers)、数据类型(data type)、表达式、对话框(dialog box)、计时器控件(timer control unit)、中移动、用户名(username)、逻辑值(logical value)、满足要求(meet demand)

[单选题]假设用户名^(username)和口令存储在自由表“口令表”中，当用户输入用户名^(username)和口令并单击“登录”按钮时，若用户名^(username)输入错误，则提示“用户名^(username)错误”；若用户名^(username)输入正确，而口令输入错误，则提示“口令错误”。若命令按钮“登录”的Click事件中的代码如下： USE 口令表 GO TOP flag =0 DO WHILE .not.EOF（） IF Alltrim（用户名^(username)）==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\"用户名^(username)错误\"WINDOW TIMEOUT2 ENDIF 则在横线处应填写的代码是

A. flag=-1
B. flag=0
C. flag=1
D. flag=2

查看答案&解析查看所有试题

学习资料：

[单选题]在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如图所示。

A. 编写如下程序：
B. Private Sub Form_Load（）
C. Timer1.Enabled=False
D. End Sub
E. Private Sub Command1_Click（）
F. Timer1.Enabled=True
G. End Sub
H. Private Sub Command2_Click（）
I. Timer1.Enabled=False
J. End Sub
K. Private Sub Timer1_Timer（）
L. If Label1.Left
M. Label1.Left = Label1.Left + 20
N. Else
O. Label1.Left=0
P. End If
Q. End Sub
R. 程序运行后单击“开始”按钮，标签在窗体中移动。
S. 对于这个程序，以下叙述中错误的是（ ）。
T. 标签的移动方向为自右向左
U. 单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动
V. 当标签全部移出窗体后，将从窗体的另一端出现并重新移动
W. 标签按指定的时间间隔移动

[单选题]数据库设计中，按照统一观点构造全局逻辑结构，这称为数据库的()。

A. 内模式
B. 概念模式
C. 外模式
D. 用户模式

[单选题]下列哪个是满足要求^{(meet demand)}的正确表达式：年龄在20到60之间(包括年龄20～60在内)或工资少于500的女职工( )。

A. 20仁年龄=60and工资500 or 性别="女"
B. 20年龄60and工资500 or 性别="女"
C. 20年龄and年龄60 or 工资500 and 性别="女"
D. (20=年龄and年龄=60 or 工资500)and性别="女"

[单选题]在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X20 Then Y=X Else Y=20+X End If func=Y End FunctiOn Phvate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub Phvate Sub Form_MouseUp(BuRon As Integer,Shin As Integer，X As Single,Y As Single) SW=Tree End Sub Pdvate Sub Commandl-Click() Dim intNum As Integer intNum=InputBox("") If SW Then Print func(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则程序的执行结果为______。

A. 输出0
B. 输出25
C. 输出45
D. 无任何输出

[单选题]下列关于数组的叙述，错误的是

A. 使用数组前，要有DIMENSION或DECLEARE命令定义数组
B. 定义数组后，Visual FoxPro系统自动给每个数组元素赋以逻辑值^{(logical value)}.F.
C. 在Visual FoxPro中只能使用一维数组、二维数组或三维数组
D. 一个数组中各个数组元素可以不是同一种数据类型

[单选题]查询十天前的记录应使用( )作为准则。

A. Between Date( )And Date( )-10
B. Date( )-10
C. ＞Date( )-10
D. Between Date( )-10 And Date( )

本文链接：https://www.51ksbd.net/show/4vlqp9.html