题目内容

在窗体上画一个命令按钮，然后编写如下程序： Function fun1(ByVal Bum As Long)As Long Dim k As Long k=0 Bum=AbsfBum) Do While Bum k=k+(Bum Mod 10) Bum=Bum\10 Loop fun1=k End Function Private Sub Command1_Click( ) Dim n As Long n=InputBox("请输入一个数") Print fun1(n) End Sub 程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为______。

A. 3
B. 4
C. 9
D. 10

查看答案

搜索结果不匹配？点我反馈

更多问题

产生下列问题的主要原因是产生下列问题的主要原因是：崩解剂选择不当或硬脂酸镁用量过多（）。

A. 粘冲
B. 裂片
C. 均匀度不合格
D. 崩解度不合格
E. 片重差异超限

M: Mrs. Button, remember to take three pills every day before sleep, and don’t forget to finish the whole bottle.W: Don’t worry, doctor. I just want to get well as soon as possible. What will the woman do().

A. Follow the doctor’s advice.
B. Forget it as soon as possible.
C. Worry about her health.
D. Keep the bottle as it is.

W: Cambridge Theater Box Office.M: Have you got any tickets for Gone with the Wind for this Saturday eveningW: Which performance 5 o’clock or 8: 30M: 8: 30, please.W: Sorry, that performance is sold out.M: Well, have you got any tickets for the 5 o’clock performanceW: Yes, we have.M: I’d like to reserve two seats, please.W: Right. That’s two tickets on Saturday 5 o’clock performance. What’s your name, pleaseM: Bishop. Henry Bishop. What’s the man’s name().

A. Henry Porter.
B. Porter.
C. Bishop.
D. Henry Bishop.

Good afternoon, ladies and gentlemen, and welcome aboard our tourist bus to Saint Louis, Memphis and New Orleans.The coach is scheduled to arrive in Saint Louis at 8 o’clock. You will have a 15-minite rest stop at Bloomington at 3 o’clock and a half-hour dinner stop at Springfield at 5:30.The coach is scheduled to arrive in Memphis at 7 o’clock tomorrow morning and in New Orleans at 5 o’clock in the afternoon. Please don’t forget your coach number when getting on again. The number is 8666.Let me remind you that cigarette smoking is not allowed except in the last three rows at the back of the coach. If you want to smoke, please move to the last three rows.Relax and enjoy your trip, and thanks for traveling with us. They are going to visit () places.