- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
程序设计题
问题:求 s="1" x2-2x3+3x4-4x5+…-98x99+99x100 的值。
算法描述如想图所示,请将下列程序补充完整。

Private Sub Form _ Click ( )
Dim k As Integer
Dim s As Integer
s=0
For k="l" To__ ① ___
If k Mod______② ___0 Then
S=s+k*(k+l)
Else
s=____③___
End If
Next k
Print “s=”;s
End Sub
问题:求 s="1" x2-2x3+3x4-4x5+…-98x99+99x100 的值。
算法描述如想图所示,请将下列程序补充完整。

Private Sub Form _ Click ( )
Dim k As Integer
Dim s As Integer
s=0
For k="l" To__ ① ___
If k Mod______② ___0 Then
S=s+k*(k+l)
Else
s=____③___
End If
Next k
Print “s=”;s
End Sub
模拟抛硬币并统计概率,程序运行结果和设计界面如右图,该程序界面上至少有 等控件对象( )


A.一个按钮、二个文本框 |
B.一个按钮、二个文本框、三个标签 |
C.一个按钮、二个列表框、二个标签 |
D.一个按钮、一个文本框、一个列表框、二个标签 |
以下语句运行后变量c的值是( )
a=“2009”
b=“2008”
c=Val(a)+Val(b)
a=“2009”
b=“2008”
c=Val(a)+Val(b)
A.2009+2008 | B.4017 | C.“20092008” | D.20092008 |
对输入的两个整数a和b,找出其中的较大者赋给c并输出。解决该问题的算法流程图如图所示:

上述流程图中虚线框部分的内容可为( )

上述流程图中虚线框部分的内容可为( )
A.![]() | B.![]() |
C.![]() | D.![]() |
数学表达式“2n-1>0且2n-1≠1”对应的Visual Basic表达式是( )
A.2·n-1>0 And 2·n-1<>1 | B.2*n>1 And Not(2*n-1=1) |
C.2n-1>0 And 2n-1 ≠ 1 | D.2*n-1>0 And 2n-1<>1 |
如下VB程序段
x=Text1.Text
p=0
For i=1 to Len(x)
If Mid(x,i,1)=“a” Then p=p+1
Next i
Print p
若程序运行时,在文本框Text1中键入“Are you happy”,则运行结果是( )
x=Text1.Text
p=0
For i=1 to Len(x)
If Mid(x,i,1)=“a” Then p=p+1
Next i
Print p
若程序运行时,在文本框Text1中键入“Are you happy”,则运行结果是( )
A.0 | B.1 | C.2 | D.11 |
下列VB程序用来实现[1,10]之间奇数之和,单击Command1后,标签Label1中显示的内容是_____,循环变量j最终的值是___________ ,并完成程序一处空白。
Private Sub Command1_Click()
Dim s As Integer,j As Integer
s=0
For j=1 To 10
If j Mod 2 <> 0 Then
_____________
End If
Next j
Label1.Caption=Str(s)
End Sub
Private Sub Command1_Click()
Dim s As Integer,j As Integer
s=0
For j=1 To 10
If j Mod 2 <> 0 Then
_____________
End If
Next j
Label1.Caption=Str(s)
End Sub
有如下 VB 程序,它的输出结果是( )。
S=0
For i=1 To 10
If i mod 2=0 Then S=S+i
Next i
Print “S=”;S
S=0
For i=1 To 10
If i mod 2=0 Then S=S+i
Next i
Print “S=”;S
A.S=0 | B.S=25 | C.S=30 | D.S=55 |
在 VB 中,下列程序段执行后,变量 s 的值是( )。
s=1
For k=1 To 3
s=s+1
Next k
s=1
For k=1 To 3
s=s+1
Next k
A.1 | B.3 | C.4 | D.6 |