皮皮学，免费搜题
登录
搜题
【单选题】
有下面程序代码: Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer, x, b x = InputBox("请输入一个多位整数") For k = 1 To Len(x) b = Mid(x, k, 1) a(Val(b) + 1) = a(Val(b) + 1) + 1 Next k For k = 1 To 10 Print a(k); Next k End Sub 程序运行时,单击命令按钮Command1,输入2355270224,则输出是A.
1 0 4 1 1 2 0 1 0 0
B.
0 4 1 1 2 0 1 0 0 0
C.
2 3 5 5 2 7 0 2 2 4
D.
4 2 2 0 7 2 5 5 3 2
拍照语音搜题，微信中搜索"皮皮学"使用
参考答案：
参考解析：
知识点：
皮皮学刷刷变学霸
举一反三
【简答题】谈谈所用与所学的关系?联系自身谈谈所用与所学。
【简答题】对外贸易关系人及仲裁、司法等机构，对海运进口商品可向检验检疫机构申请办理（ ）等鉴定工作。
【简答题】回填灌浆所用的水泥标号不应低于()，帷幕灌浆所用的水泥标号不低于()，接缝灌浆所用水泥标号不应低于()。
【简答题】今者所养非所用，所用非所养。(史记.韩非列传)
相关题目：