窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click Dim a(10)As Integer,b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体,单击命令按钮,文本框Text1中显示的内容是()。
相似题目
-
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Private Sub Command1_Click()Dim b,kFor k=1 to 6b=23+kNext kMsgBox b+kEnd Sub打开窗体后,单击命令按钮,消息框的输出结果是_____。
-
在窗体中有一个标签 Label0 ,标题为 “ 测试进行中 ” ;有一个命令按钮 Command1 ,事件代码如下:
-
(32)假定建立一个名为Command1的命令按钮数组,则下列说法中错误的是
-
在窗体上画一个名为Command1的命令按钮,编写如下程序: Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=6 Print M(2+M(x)) End Sub 程序运行后,单击命令按钮,输出的结果是______。
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:
-
窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1_Click()
-
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(
-
在窗体中有一个标签Label0,标题为“显示标签”;并存在一个标题为bOK的命令按钮Command1,其事件代码如下所示:
-
在窗体上添加一个命令按钮,名为Command1,其单击事件中有如下程序段,则事件过程执行后,文本框中输出()。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)
-
在名为Form1的窗体上建立一个名为Cmd1、标题为“显示”的命令按钮。编写适当的事件过程,使程序运行后,若单击“显示”命令按钮,则在窗体上显示“计算机等级考试Visual Bask课程”。程序运行情况如下图所示。
-
在考生文件夹中有工程文件execise99.vbp和窗体文件execise99.frm。在名为Fom1的窗体上有一个名为Text1的文本框,有两个命令按钮(名称分别是Cmd1和Cmd2,标题分别是Read和Save)。要求程序运行后,单击Read按钮,将文本文件in99.txt中的所有数字读到数组arr中,并在文本框内显示出来。随后Read按钮变为无效;然后单击Save按钮,
-
有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,
-
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码:
-
在窗体中有一个标签Lb1和一个命令按钮Command1,事件代码如下:Option Compare DatabaseDim a AS S
-
窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:运行程序后单击命令按钮Command1,窗体上显示的是()
-
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:运行程序后单击命令按钮,在窗体上显示的是()
-
在窗体中有一个名为Command1的命令按钮,Click事件代码如下:单击命令按钮后,标签显示结果是()
-
设计一个名为form_book的表单,表单的控件名为form1,文件名为form_book,表单的标题为“图书情况统计”。表单中有一个组合框(名称为Combo、一个文本框(名称为Text、两个命令按钮“统计”和“退出”(名称为Command1和Command。 运行表单时,组合框中有3个条目“清华”、“北航”、“科学”(只有3个出版社名称,不能输入新的)可供选择,在组合框中选择出版社名称后,如果单
-
在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_ Click()Dim arrarr = Array(358, 32, 46, 73, 23, 59, 26, 91, 583, 12)For i = ______ For j = ______ If arr(i) >= arr(j) Then a = arr(j
-
创建名称为Form1的窗体,标题为“欢迎窗口”,并在窗体上画一个命令按钮,名称为“我要进入”。请编写一个事件过程,实现运行程序时,单击命令按钮后按钮消失,窗体上显示“欢迎您的光临!”。运行后窗体如图2所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文件夹下,工程文件名为ylc2.vbp,窗体文件名为ylc2.frm。
-
窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器,并有下面事件过程: Private Sub Command1_Click() Timer1.Enabled=True End Sub Private Sub Form_Load() Timer1.Interval=5 Timer1.Enabled=False End Sub Private Sub Timer1_Timer(
-
在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_ Click() Dim arr arr = Array(358, 32, 46, 73, 23, 59, 26, 91, 583, 12) For i = ______ For j = ______ If arr(i) >= arr(j) Thena = arr
-
窗体中有两个命令按钮:“显示”(控件名为CmdDisplay)和“测试”(控件名为CmdTest)。单击“测试”按钮时,执行如下事件过程。此事件过程的功能是:当在窗体中出现消息框并选中其中的“确定”按钮时,隐藏“显示”按钮。否则退出。根据题意,请完善下列程序。 Private Sub CmdTest_Click() Answer= 【6】 ("隐藏按钮") IF Answer=vbOK thenC
-
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Commandl的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分),如下图所示。请填空。 Pfivale Sub Commaildl_C1iCk() Dimk As hteger Dim