其中用作文本的特征项的是( )
根据算法将下列程序补充完整。
Private Sub Command1_Click()
Dim S As String,ch As String
Dim ch2 AS String,sum As Double
Dim n As Integer,i As Integer
s=Text1.Text
①
i=1:sum=0
Do While i<=n
ch=Mid(s,i,1)
If ch>=“0”And ch<=“9”Then
j=i
ch2=Mid(s,j,1)
Do While ch2>=“0”And ch2<=“9”
j=j+1
ch2=Mid(s,j,1)
Loop
sum=sum+ ②
i=j
EndIf
i=i+1
Loop
Label3.Caption=Str(sum)
End Sub
a = i \ 100
b = i \ 10 Mod 10
c = i Mod 10
If i = a * a * a + b * b * b + c * c * c Then
Label1.Caption = Str(i)
End If
Next i
|
功能类别 |
功能举例 |
|
数据收集和收入 |
①管理员输人所有货物信息,包括价格、重量、所处货架号等 ② |
|
数据存储 |
①数据库存储所有货物信息,以及超市货品优惠信息 ② |
|
数据传输 |
将收集到的所有货物和用户信息传输到相关的各个部门或者子系统 |
|
数据加工处理 |
①对用户购买的物品进行计算,并显示优惠信息 ② |
|
数据输出 |
① ② |
|
数据查询 |
根据输人的物品,查询该物品的位置与价格等详细信息 |
i = 1: j = 20
m = (i + j + 1) \2
Do While i < j And Key <> a(m)
If a(m) > Key Then i = m+ 1 Else j = m -1
m = (i + j + 1) \2'①
Loop
数组元素a(1)到a(20)各不相同且按降序排列,若查找键key与a(4)相等,执行该程序段,①处语句的执行次数有( )
下列说法中不正确的是()