请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
Private Sub Command1_Click() '确定按钮
Static n As Integer
----1----mypwd As String = "123456" '预设密码为自定义常量
n = n + 1
Label2.Visible = True
If ----2---- Then
Label2.Caption = "密码正确"
Else
If n ＜ 3 Then
Label2.Caption = "密码错误!"
Text1.Text = ""
Else
----3----
End If
End If
End Sub
答案
更多“窗体是密码检验程序。程序运行时，用户在文本框输入密码，单击确定按钮对密码进行检验。密码正确”相关的问题
第2题
A.在DNC运行时，存储在存储器中的程序被调用
B.在DNC运行时，可以指定用户宏程序，也可以指定循环指令和分支指令
C.在DNC运行时，当控制由子程序或者用户宏程序返回到主程序时，不能使用指定顺序号的返回指令
D.在DNC运行时，当前正在执行的程序被显示在程序检查屏幕和程序屏幕上
第3题
PrivateSubForm_Click()
DimxAsInteger
StaticyAsInteger
x=x+2
y=y+3
Form1.Print"x=";x,"y=";y
EndSub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
第5题
阅读下列程序并写出程序运行结果。
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "4"
A(2) = "8"
A(3) = "12"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
写出程序运行时单击窗体后，窗体Form1上的结果。
第6题
阅读下列程序并写出程序运行结果。
Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 2
y = y + 3
Form1.Print "x="; x, "y="; y
End Sub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
第7题
第8题
A.保护屏幕
B.通过屏幕保护程序，可以设置密码，当用户离开计算机时可以保护用户文件
C.保护当前用户在屏幕上显示的内容不被其它人看到
D.为了不让计算机屏幕闲着，显示一些内容让其他人看
第9题
A.使用sqlplus登录system用户后，进行修改
B.其他选项都不正确
C.在%ORACLE_HOME%/network/admin/listener.ora文件中进行配置
D.在命令行下执行%ORACLE_HOME%/bin/lsnrctl程序进行修改
第10题
PublicSubchange1(ByValxAsInteger,ByValyAsInteger)
DimtAsInteger
t=x
x=y
y=t
EndSub
PublicSubchange2(xAsInteger,yAsInteger)
DimtAsInteger
t=x
x=y
y=t
EndSub
PrivateSubForm_Click()
DimaAsInteger,bAsInteger
a=22:b=33
change1a,b
Form. 1.Print"A1=";a,"B1=";b
a=22:b=33
change2a,b
Form1.Print"A2=";a,"B2=";b
EndSub
写出程序运行时，单击窗体Form1上的输出结果。
