首页 > 高职专科

网友您好，请在下方输入框内输入要搜索的题目：

请输入或粘贴题目内容搜题

搜题

拍照、语音搜题，请扫码下载APP

题目内容（请给出正确答案）

[主观题]

在窗体中添加一个名称为Lablel1的标签、两个名称为Text1和Text2的文本框以及名称为Command1的按钮

。程序运行后，在两个文本框中输入数据，当单个按钮时，标签Label1中显示运算的结果。程序的功能是计算，n!+(n+1)!+(n+2)!+…+(n+m)!。请在【】处填入适当的内容，将程序补充完整。 Private Sub Command1_Click() Dim a，b，c，d As Double Dim i，n，m As Integer n=Val(Text1.Text):m=Val(【】) a=0： b=1： c=0： d=1 For i=1 TO m b=b*i a=a+b Next i For i=1 To n d=d*i C=c+d Next i Label1.Caption=a-c End Sub

答案

查看答案

发布时间：2021-06-28

更多“在窗体中添加一个名称为Lablel1的标签、两个名称为Text1和Text2的文本框以及名称为Command1的按钮”相关的问题

第1题

在窗体中添加一个命令按钮（名称为Command1)，然后编写如下代码：Private Sub Command1_Click（) a=0

在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b＋c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为______。

A．11

B．a=11

C．0

D．False

点击查看答案

第2题

在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1和．Text2，然后编写如下程序

： Private Sub Command1_Click() Dim x As String，y As String， C As String，d As String x = Text1．Text ： y = TextText c = LCase(x)：d = UCase(y) Print c； d End Sub 程序运行后，在文本框Texn、Text2中分别输入AbC和efG，结果是

A．abcEFG

B．abcefg

C．ABCefg

D．ABCEFG

点击查看答案

第3题

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。（1) 在名称为Form1的窗体上画一个名称为H1

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。

(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在“属性”窗口中设置它的属性值，使之满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图19-1所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm

(2) 在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个子菜单项，名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程，使得程序运行时，单击“复制”菜单项，则把 Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

注意：下面出现的“考生文件夹”均为c：wexam25160001。（1) 在名称为Form1的

点击查看答案

第4题

在考生文件夹下有一个工程文件sjt3．vbp，请在名称为Forml的窗体上画一个名称为Text1 的文本框

和一个名称为C1、标题为“转换”的命令按钮，如图8所示。在程序运行时，单击“转换”按钮，可以把Text中的大写字母转换为小写，把小写字母转换为大写。窗体文件中已经给出了“转换”按钮的Click事件过程，但不完整，请去掉程序中的注释符，把程序中的？改为正确的内容。注意：不能修改程序中的其他部分，最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件sjt4．vbp，其功能是： ①单击“读数据”命令按钮，把考生文件夹下in4．dat文件中已按升序方式排列的60个数读入数组A，并显示在Text1中； ②单击“输入”按钮，弹出一个输入对话框，接收用户输入的任意一个整数；单击“插入”按钮，将输入的数插入A数组中合适的位置，使其仍保持A数组的升序排列，最后将A数组的内容重新显示在Textl中。右窗体文件中已经给出了全部控件(如图9所示)和程序，但程序不完整，要求去掉程序中的注释符，把程序中的？改为正确的内容。本程序只考虑插入一个整数的情况。注意：不得修改已绍存在的内容和控件属性，最后将修改后的文件按原文件名存盘。在考生文件夹下有一个工程文件sjt3．vbp，请在名称为Forml的窗体上画一个名称为Text1 的

点击查看答案

第5题

在窗体上有一个文本框控件,名称为TxtTime:一个计时器控件,名称为Timerl,要求每一秒钟在文本框中显示一次当前的时间。程序为:在下划线后应填入的内容是__（）

A.nabled&nbsp

B.Visible&nbsp

C.Interval&nbsp

D.Timer

点击查看答案

第6题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。

A．1

B．5

C．27

D．45

点击查看答案

第7题

在考生文件夹下有一个工程文件sjt5．vbp，其窗体上画有两个名称分别为Text1、Text2的文本框，其中Tex

t1可多行显示。请画两个名称为Command1、Command2，标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下： ①单击“产生数组”按钮，则用随机函数生成10个0～100之间(不含0和100)互不相同的数值，并将它们保存到一准数组a中，同时也将这10个数值显示在Text1文本框内； ②单击“查找”按钮将弹出输入对话框，接收用户输入的任意一个数，并在一维数组a中查找该数，若查找失败，则在Text2文本框内显示该数“不存在于数组中”；否则显示该数在数组中的位置。要求：请去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。

在考生文件夹下有一个工程文件sjt5．vbp，其窗体上画有两个名称分别为Text1、Text2的文本