搜索
Private Sub Command l_Click
Dim s As String， c As String， n As Integer
s=“Google Chrome”：n=0
For i=1 To Len(s)
c=Mid(s,i,l)
If c=“e” Then n=n+1
n=n-1
Next i
Text 1.Text=Str(Abs(n) )
End Sub
运行该程序， 单击命令按钮Command 1后， 文本框Text1中显示的内容是（ ）
| A．－11 | B．11 | C．－9 | D．9 |
同类型试题
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
