- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- + 面向对象程序设计 VB开发工具
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
下列关系或逻辑表达式的结果为“True”的是
A.2*2< 2+2 | B."123"+45<178 |
C.Not(6<>11) | D.(5 > 0) And (4 < 3) |
在VB中,语句Dim s As Integer的功能是
A.定义一个字符串型变量s | B.定义一个日期型变量s |
C.定义一个整型变量s | D.定义一个单精度型变量s |
VB程序中Label1.caption="Welcome to Guilin",其作用是( )
A.将文本框Label1的名称设置为 "Welcome to Guilin " |
B.将文本框Label1显示的文本设置为 "Welcome to Guilin" |
C.将标签Label1的名称设置为 "Welcome to Guilin" |
D.将标签Label1显示的文本设置为 "Welcome to Guilin" |
在VB中,若x=5,y=6,则下列程序段执行后,结果为x=6,y=5的是( )
A.x=y:y=x | B.y=x:x=y |
C.x=y:t=x:y=t | D.t=x:x=y:y=t |
在 Visual Basic 中,关系表达式 x/y=x\y 为真,则说明
A.x不能被y整除 | B.x与y一定不相等 | C.x与y一定相等 | D.x 能被y整除 |
将数学表达式a≤b≤c写成Visual Basic表达式,正确的是( )
A.a<=b<=c |
B.a<=b Or b<=c |
C.a<=b And b<=c |
D.a<=b Not b<=c |
删除字符串中的非字母字符,并查找出ASCII码值最大的字母。程序功能如下: 在文本框Text1中输入一个字符串,单击命令按钮Command1,在文本框Text2中显示删除非字母字符后的字符串,在文本框Text3中显示ASCII码值最大的字母,运行界面如图所示。

(1)程序中的Command1_Click()属于____________。(单选,填代码:
(2)实现上述功能的VB程序如下,请在划线处填入合适代码。
Private Sub Command1_Click()
Dim result As String, s As String, c As String, cmax as string
Dim i As Integer, j As Integer
s = Text1.Text
Text2.Text = ""
For i = 1 To Len(s)
①_________
If c >= "A" And c <= "Z" Or c >= "a" And c <= "z" Then
result =②______
End If
Next i
Text2.Text = result
j = 2
cmax = Mid(result, 1, 1)
Do While j <= Len(result)
If Mid(result, j, 1) > cmax Then cmax = Mid(result, j, 1)
③________
Loop
Text3.Text = cmax
End Sub

(1)程序中的Command1_Click()属于____________。(单选,填代码:
A.对象名/ | B.事件名/ | C.属性名/ | D.事件处理过程名) |
Private Sub Command1_Click()
Dim result As String, s As String, c As String, cmax as string
Dim i As Integer, j As Integer
s = Text1.Text
Text2.Text = ""
For i = 1 To Len(s)
①_________
If c >= "A" And c <= "Z" Or c >= "a" And c <= "z" Then
result =②______
End If
Next i
Text2.Text = result
j = 2
cmax = Mid(result, 1, 1)
Do While j <= Len(result)
If Mid(result, j, 1) > cmax Then cmax = Mid(result, j, 1)
③________
Loop
Text3.Text = cmax
End Sub
在Visual Basic程序设计中,For语句"For计数变量=初值To终值[Step步长]”中步长为0时,会造成死循环。( )
A.正确 | B.错误 |