单项选择题
设有下列程序 Private Sub Form Click() X=50 For i=1 T0 4 y=InputBox("请输入一个整数") y=Val(v) If y Mod 5=0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为( )。
A.100
B.50
C.120
D.70
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
设有下列通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer tStr= strL=Len(xStr) i=strL/2 DO While i<=StrL tStr=tStr&Mid(xStr,i+1,1) i=i+1 Loop Fun=tStr&tStr End Function 在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮。然后编写下列的事件过程: Private Sub Commandl Click() Dim S1 As String S1= ABCDEF Text1.Text=LCase(Fun(S1)) End Sub 程序运行后,单击命令按钮,文本框中显示的是( )。
A.ABCDEF
B.abedef
C.defdef
D.defabc
点击查看答案&解析
单项选择题
下列关于过程及过程参数的描述中,错误的是( )。
A.过程的参数可以是控件名称
B.调用过程时使用的实参的个数应与过程形参的个数相同
C.只有函数过程能够将过程中处理的信息返回到调用程序中
D.窗体可以作为过程的参数
点击查看答案&解析
相关试题
在窗体上画一个名称为Command1的命令按钮...
设有如下程序: Option Base 1 Privat...
目录列表框Path属性所表示的含义是( )。
以下关于函数过程的叙述中错误的是( )。
设在工程文件中有一个标准模块,其中定义了...