在窗体上画一个名称为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() d = 0:c = 10:x = Array(10, 12, 21, 32, 24) For i = 1 To 5 If x(i) > c Then d = d + x(i):c = x(i) Else d = d-c End If Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为( ) A)89B)99C)23D)77?xml:namespace>
以下能正确定义数据类型TelBook的代码是( ) A)Type TelBookB)Type TelBook Name As String*10 Name As String*10 TelNum As Integer TelNum As Integer End Type End TelBook C)Type TelBookD)Typedef TelBook Name String*10 Name String*10 TelNum Integer TelNum Integer End Type TelBook End Type