学习了VB之后，小明编写了一个三角形面积计算器的程序，其窗体界面如图1所示，代码部分如图2所示：图1图2(1)在图1中当前选定的对象属于_____________刷题宝

题干

学习了VB之后，小明编写了一个三角形面积计算器的程序，其窗体界面如图1所示，代码部分如图2所示：

图1

图2
(1)在图1中当前选定的对象属于_____________________________________类。
(2)根据图2中的代码，可以确定图1中唯一一个按钮的对象名是________。
(3)图2中①所在位置的代码应该是：_________________________。
(4)程序正常运行时，如果输入三角形的三条边长分别为11、25、12，则点击“计算”后，Label5的Caption值将是： ____________________________。

上一题下一题 0.99难度填空题更新时间:2017-03-02 11:25:02

答案(点此获取答案解析）

同类题1

在ＶＢ中，有如下程序段，该程序段执行后，变量x的值是
x=0
for i=1 to 5
x=x+i-1
next i

同类题2

小杨同学编写了一个VB程序用于学校里7选3选课情况统计。该程序主要功能有：1．点击“生成选课组合”按钮 Commandl，生成35种选课组合；2．点击“统计选课情况”按钮 Command2，统计出各种组合的选课人数；运行界面如下图。实现上述功能的VB程序如下，请回答下列问题：

（1）分析程序代码，如图里“选课组合”序号为30的组合名称为：___________________。
（2）请在划线处填入合适的代码。请回答下列问题：
Dim zh(1 To 16) As String, zrs As Integer
Dim xk(1 To1000) As String'存放同学的选课科目组合，已知学生人数少于1000人
Dim zh2(1 To 35) As String'存放35种选课科目组合
Dim rstj(1 To 35) As Integer'存放各种选课组合选课人数
Private Sub Form_ Load()
‘本过程从数据库中读取学生的选课情况数据，存放在数组xk中，学生的总人数存放在变量zrs。’代码略
End Sub
Private Sub Command l_ Click( )
Dim i As Integer,j As Integer, m As Integer, n As Integer, k As Integer
Dim km(1 To 7)As String
Listl.Clear
List1. AddIton“序号”+“” +“组合名称”
km(1)= “物”:km(2)= “化”:km(3)= “生”km(4)= “政”
km(5)= “史”km(6)= “地”:km(7)= “技”
m= 1
For i= 1 To 5
For k= i+1 To 6

zh(m)=km(i)+ km(k)

m= m+ 1

Next k
Next i
j= 3:n= 1:y= j
For i= 1 To m

For k= y To 7

zh2(n)=___________________________________
If n< = 9 Then
Listl. AddItem n &""&" "& zh2(n)
Else
Listl. AddItem n &" "& zh2(n)
End If
n= n+ 1

Next k

y= y+ 1

If y=8 Then

j= ___________________________ :y= j

End If
Next i
End sub
Private Sub Command2_ Click( )
Dim i As Integer

List2. Clear

List2. Additon"组合名称"+""+"选课人数”

rstj(i)=_____________________________

List2 AddItem zh2(i)+" "+ Str (rstj (i))
Next i
End Sub
Function tj (zhmc As String) As Integer'统计某种选课组合的选课人数
Dim i As Integer, rs As Integer
rs= 0
For i= I To zrs

If zhmc = xk(i) Then

End If

Next i
tj= rs
End Function

同类题3

以下关于循环结构的描述中，正确的是（）。

A．与分支结构不同，循环结构一定会对循环条件进行多次判断。

B．循环结构中，重复执行的内容有时候一次都不被执行。

C．在循环结构的流程图中，除了有向下的流程线外还应有向上返回的流程线。

D．根据实际需要，在流程图中可出现多个循环结构。

同类题4

下列流程图符号中，属于处理框的是（）。

同类题5

有如下 VB 程序段：
Private Sub Commandl_Click()
Dim s As String, res As String, ch As String
Dim i As Integer
s=Textl.Text:res="":ch=""
For i=1 To Len(s)
ch=Mid(s,i,l)
If Not(ch>="0"And ch<="9"＝Then
res=ch＋res
End If
Next i
Labell.Caption=res
End Sub
在文本框 Textl 中输入“Qns 2020_GK”后单击按钮 Command1，在标签Labell 中显示（）

相关知识点