填空题

在面向对象方法中，______描述的是具有相似属性与操作的一组对象。

【参考答案】

类
<上一题 目录 下一题>
热门 试题

单项选择题
有如下的一个函数过程： Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While nuin k=k*(num Mod 10) num=num 10 Loop fn=k End Function 通过以下事件过程调用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为( )。 Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox( 请输入一个数值 ) n=CLng(n):r=fn(n) Print r End Sub
A．12
B．6
C．3
D．1
单项选择题
下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Private Sub Command1 Click() Dim Num(25)As Integer,Chr1 As String Chr1=UCase(InputBox( 请输入字母字符串 )) For k=1 To Len(Chr1) n=Asc(Mid(Chr1,k,1))-Asc( A ) If n＞=0 Then Num(n)=Num(n)+1 End If Next k m=Num(0) Fork=1 To 25 If m＜Num(k)Then m=Num(k) End If Next k Print m End Sub
A．3
B．2
C．1
D．0
相关试题