logo - 刷刷题
下载APP
【简答题】

在名称为Form1的窗体上画3个标签,名称分别为Label1、Label2和Label3,标题分别为“人数”、“年龄”和“收入”;3个文本框,名称分别为Text1、Text2和Text3,Text属性均为空;一个命令按钮,名称为Command1,标题为“输入”。然后编写命令按钮的Click事件过程,要求程序运行后,如果单击命令按钮,则先后显示3个输入对话框,在3个输入对话框中分别输入人数、年龄和收入。并分别在3个文本框中显示出来。程序运行界面如下图所示。要求程序中不得使用任何变量。

在名称为Form1的窗体上画3个标签,名称分别为Label1、Label2和Label3,标题分别为“人数”、“年龄”和“收入”;3个文本框,名称分别为Text1、Text2和Text3,Text属性均为空;一个命令按钮,名称为Command1,标题为“输入”。然后编写命令按钮的Click事件过程,要求程序运行后,如果单击命令按钮,则先后显示3个输入对话框,在3个输入对话框中分别输入人数、年龄和收入。并分别在3个文本框中显示出来。程序运行界面如下图所示。要求程序中不得使用任何变量。

举报
题目标签:事件属性对话框
参考答案:
参考解析:
.
刷刷题刷刷变学霸
举一反三

【单选题】下列有关项目属性的表述,正确的是​

A.
项目式教学强调以学生为中心,强调学生的主动性,因此项目中的一切都应该是学生自己决定的
B.
大项目永远好于小项目,教师应该尽可能带着学生做大项目
C.
在项目式教学中,学生的自主权越大越好,最大化的学生自主要好于有限的学生自主
D.
当学生和教师刚刚接触项目式教学时,可以从一些相对结构化的、有明确路径的项目开始

【单选题】有如下事件过程:Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是,通过调用Converse过程,将数组Arr中的元素逆序存放并输出...

A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub

【多选题】在相同的条件下重复一个行为或试验,不确定性事件所出现的结果的特点是( )。

A.
所出现的结果有多种
B.
出现的结果只有一种
C.
具体是哪种结果事前不可预知
D.
出现的结果能事前预知
E.
出现的结果是确定的