填空题
下列程序弹出对话框中按钮的个数为______。
MsgBox“确认!”,vbAbortRetryignore+vbMsgBoxHelpButton+vbInformation,“提示;”
【参考答案】
D
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
如果存在如下过程: Private Function Fun(a()As Integer) Dim First As Integer,Last As Integer,i As Integer First=LBound(a) Last=LBound(a) Max=a(First) For i=First To Last If a(i)>Max Then Max=a(i) Next Fun=Max End Function 在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() ReDim in(1 To 4)As Integer m(1=20:m(2)=30:m(3)+50:m(4)=100 c=Fun(m) Print c End Sub 单击命令按钮,其输出结果为______。
点击查看答案&解析
填空题
下列程序用来计算1+2+…n,当和大于100时停止计算,请填空。 Private Sub Form_Click() Dim n as integer,S as integer,I as integer,k as integer s=0 k=0 n=inputbox(”请输入n的值) For i=1 to 100 k=k+1 s=s+1 ______ Next 1 Print s End Sub
点击查看答案&解析
相关试题
下面程序的功能是统计字符串中“i”的个数...
在KeyPress事件过程中,KeyAscii是所按键的...
下面程序运行后,单击命令按钮,输出的结果...
有如下SUB过程: Sub s(x As Single,...