- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
用户注册某APP时,密码有如下要求:至少为8个字符,并且必须含有数字和字母。小林编写了一个VB程序,对用户设定的密码进行合法性验证,如图所示。在文本框Text1中输入密码字符串s,单击“验证”按钮,在标签Label1中显示验证结果“符合要求”或“不符合要求”。

(1)实现上述功能的VB程序如下,请在划线处填入合适代码。
Private Sub Cmdjudge_Click()
Dim a1 As Integer, a2 As Integer, flag As Boolean
Dim s As String, c As String, i As Integer, n As Integer
a1=0:a2=0:flag=False
s = Text1.Text
i=1
___________
Do While i<= n And Not flag
If flag=True And n>=8 Then
Label1. Caption=“符合要求”
Else
Label1. Caption=“不符合要求”
End Sub
(2)代码“Private Sub Cmdjudge_Click()”中的“Cmdjudge”是__________.(单选,填字母:
(3)运行该程序,在文本框Text1中输入“Wd6b$ksss”单击“统计”按钮后,语句c=Mid(s, i, 1)共执行了__________次。

(1)实现上述功能的VB程序如下,请在划线处填入合适代码。
Private Sub Cmdjudge_Click()
Dim a1 As Integer, a2 As Integer, flag As Boolean
Dim s As String, c As String, i As Integer, n As Integer
a1=0:a2=0:flag=False
s = Text1.Text
i=1
___________
Do While i<= n And Not flag
c = Mid(s, i, l)
If c >= "A" And c <= "Z" Or c >= "a" And c <= "z" Then
a1=1ElseIf c >= "0" And c <= "9" Then
a2 = 1End If
If _________ Then flag = True
i = i+1
LoopIf flag=True And n>=8 Then
Label1. Caption=“符合要求”
Else
Label1. Caption=“不符合要求”
End Sub
(2)代码“Private Sub Cmdjudge_Click()”中的“Cmdjudge”是__________.(单选,填字母:
A.过程名 / | B.属性名/ | C.事件名/ | D.对象名) |
右边流程图违反了算法的哪项特征( )


A.该算法没有数据输入 | B.该算法没有输出步骤 |
C.不符合算法的有穷性特征 | D.不符合算法的确定性特征 |
关于常量和变量,以下叙述正确的是( )
A.遵循“先定义,后使用”的原则,使用变量只需定义变量名 |
B.字符串常量不能是空字符串 |
C.变量X的值是1023读取X的值以后,X的值不变 |
D.逻辑型常量只有两个,分别是Yes和No |
以下适合用解析算法解决的问题是( )
A.将10个评委的打分按由大到小的顺序进行排序 | B.计算出租车费 |
C.找出一管乒乓球中质量不符合标准的球 | D.求三位正整数中的“水仙花数” |
在VB中,下列程序段执行后,变量a、b的值分别是( )
a=5
b=3
If a>b Then
a=5
b=3
If a>b Then
a=b
End IfA.3、3 | B.3、5 | C.5、3 | D.5、5 |
在第59题中,要把命令按扭的标题修改为“计算”,应修改的属性是( )
A.Height | B.BackColor | C.Caption | D.Font |