网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
设在一个窗体中已设置了三个文本框Text1、Text2和Text3,以及若干个单选按钮,且设计有下列程序,请指出程序的功能。

参考答案
参考解析
略
更多 “设在一个窗体中已设置了三个文本框Text1、Text2和Text3,以及若干个单选按钮,且设计有下列程序,请指出程序的功能。 ” 相关考题
考题
在窗体中建立了三个文本框,名称分别为text1、text2和text3,编写以下程序段:PrivateSubText2_LostFocus()DimiAsIntegerIfIsNumeric(Text2)ThenText3.Text=正确!!ElseText2.Text=Text2.SetFocusText3.Text=错误,再输入!!EndIfEndSub当在text2中输入字符串abcd后,点击text3,运行的结果为()A.text2的内容清除,text3中显示正确!!B.text3中显示正确!!C.光标聚焦在text2中D.text2的内容清除,text3中显示错误,再输入!!
考题
在名为Form1的窗体上添加三个文本框和一个命令按钮,其名称分别为Text1、Text2、Text3和Command1,然后编写如下两个事件过程: Private Sub Command1_Click() Text3=Textl+1Text2 End Sub private Sub Form1_Load() Text1="" Text2="" Text3="" End Sub 打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为( )。A.57B.12C.5D.出错
考题
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分),如图所示。请填空。Private Sub Command1_Click( )Dim k As IntegerDim sum As Single, max As Single, min As Singlesum = Text1(0)max = Text1(0)min = ______For k = ______ To 6If max Text1(k) Thenmax = Text1(k)End IfIf min Text1(k) Thenmin = Text1(k)End Ifsum = sum + Text1(k)Next kText2 = (______) / 5
考题
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Commandl Click()Text3=Text1+Text2End SubPrivate Sub Form1 Load()Text1=" "Text2=" "Text3=" "End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
考题
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式计算,在窗体上设计3个文本框,Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值,单击Command1按钮即可求出选法的个数,并显示在Text3文本框中,请填空。Private Sub Command1_Click()Dim r As Integer,n As IntegerEnd SubDim t As Long( )For k=1 To nNext kfun=tEnd Function
考题
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式 n!计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在 (n-r)!r!Text1、Text2中分别输入n和r的值,单击Commandl按钮即可求出选法的个数,并显示在Text3文本框中。请填空。Private Sub Commandl_Click()Dim r As Integer,n As htegern=Text1r=Text
考题
有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中:单击退出按钮则退出。请将下列程序填空补充完整。Private Sub Command1_Click()Me!Text1=""Me!Text2=""Me!Text3=""Me!Text4=""End SubPdvate Sub Command2_Click()If Me!Text1="" Or Me!Text2="" Or Me!Text3=""thenMsgBox"成绩输入不全"ElseMe!Text4=(【 】+Val(Me!Text2)+Val(Me!Text3))/3【 】End SubPrivate Sub Command3_Click()Docmd. 【 】End Sub
考题
窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1,设文本框Text1中内容为 12,文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick() Text3.Text = Str$(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End SubA.12B.34C.46D.1234
考题
有一个VBA计算程序,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、Text3和Text4。3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2和Text33个文本框中输入的3科成绩的平均成绩,并将结果存放在Text4文本框中,单击退出按钮则退出。请将下列程序填空补充完整。Private Sub Command1_Click()Me!Text1=""Me!Text2=""Me!Text3=""Me!Text4=""End SubPrivate Sub Command2_Click()If Me!Text1=""Or Me!Text2=""Or Me!Text3=""ThenMsgBox "成绩输入不全"ElseMe!Text4=(【 】+Val(Me!Text2)+Val(Me!Text3))/3【 】End SubPrivate Sub Command3_Click()Docmd.【 】End Sub
考题
下面程序的功能是利用随机函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、 Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如下图所示。程序运行后,在文本框Text1中输入总次数,然后卑.击“开始”按钮,按照输入的次数模拟投币,分别统计出现正面、反面的次数,并显示结果。以下是实现上述功能的程序,请填空。Private Sub Commandl_Click()
考题
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Command1 Click()Text3=Text1+Text2End SubPrivate Sub Forml Load()Text1=""Text2=""Text3=""End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
考题
有一个VBA计算程序的功能如下:该程序用户界面由3个文本框和3个按钮组成,3个文本框的名称分别为Text1、Text2和Text3,3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中;单击退出按钮则退出。请将下列程序填空补充完整。Private Sub Command1_Click(
考题
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时.将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
考题
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式面计算,在窗体上设计3个文本框,名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值,单击Commandl按钮即可求出选法的个数,并显示在Text3文本框中,请填空。Private Sub Commandl_Click()Dim r As Integer,n AS Integern=Text 1r=Text 2Text3=fun(n) /( [14] ) /f
考题
在考生文件夹下有一个工程文件execise3.vbp及窗体文件execise3.frm。在名称为Form1的窗体上已有3个文本框Text1、Text2和Text3,以及程序。请完成以下工作:(1)在属性窗口中修改Text3的适当属性,使其在运行时不显示,窗体如下图所示。(3)窗体文件中始出了所有事件过程,但不完整,请去掉程序中的注释符“'”,把程序中的问号“?”改为正确的内容,以便实现以下功能:当光标所在的文本框中无内容时,“剪切”和“复制”菜单项不可用,否则可以把该文本框中的内容剪切或复制到Text3中;若Text3中无内容,则“粘贴”菜单项不能用,否则可以把Text3中的内容粘贴在光标所在的文本框中的内容之后。注意:不能修改程序中的其他部分。各菜单项的标题名称必须正确。存盘时,工程文件名为 execise3.vbp,窗体文件名为execise3.frm。
考题
在窗体上绘制出3个文本框,名称分别为Text1、Text2和Text3。要求程序运行时,焦点位于Text1,当按Tab键时,焦点从Text1越过Text2直接跳到Text3上。本题不得使用任何变量。程序运行时的窗体界面如图2—2所示。注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
考题
在考生文件夹中有一个工程文件execise95.vbp及窗体文件execise95.frm。请在名为 Form1的窗体上绘制3个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为“计算机等级考试”、Visua1Basic和空白。然后绘制两个单选按钮,其名称分别为 Opt1和Opt2,标题分别为Change和Join。编写适当的事件程序。程序运行后,如果选中Change单选按钮并单击窗体,则Text1文本框中内容与Text2文本框中内容进行交换,并在Text3文本框中显示OK(如下图所示):如果选中Join单选按钮并单击窗体,则把Text1和Text2的内容按Text1在前,Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。修改后的文件仍按原文件名保存在原文件夹下。注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。
考题
在考生文件夹中有一个工程文件execise42.vbp和窗体文件execise42.frm。请在名为 Form1的窗体上绘制3个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为“二级考试”、“计算机”和空白:然后绘制2个单选按钮,其名称分别为opt1和 Opt2,标题分别为Change和Join,编写适当的事件程序。要求在程序运行时,先单击Change单选按钮,使Text1文本框中内容与Text2文本框中内容进行交换,并使Change单选按钮消失;然后单击Join单选按钮,则把交换后的Text1和Text2的内容以Text1在前、Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。如下图所示。注意:不得修改已经给出的程序。在结束程序运行之前,必须先单击Change单选按钮,后单击Join单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。最后原名保存修改后的文件。
考题
在窗体(NAME属性为FORM1)上画三个文本框(其NAME属性分别为TEXT1、TEXT2和TEXT3)和一个命令按钮(NAME属性为COMMAND1),然后编写如下两个事件过程: PRIVATE SUB COMMAND1_CLICK( ) TEXT3=TEXT1+TEXT2 END SUB PRIVATE SUB FORM1_LOAD( ) TEXT1="" TEXT2="" TEXT3="" END SUB 程序运行后,在第一个文本框(TEXT1)和第二个文本框(TEXT2)中分别输入5和7,然后单击命令按钮,则文本框(TEXT3)中显示的内容为( )。A.12B.57C.75D.空值
考题
在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Sub Command1_Click()Text1="VB programming"Text2=Text1Text1="ABCD"End Sub程序运行后,单击命令按钮,文本框Text2中显示的内容为【 】。
考题
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?
考题
单选题在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:程序运行后,如果在文本框Text1中输入China Beijing,则在文本框Text2中显示的内容是( )。A
China BeijingB
ChinaC
BeijingD
ChinaB
热门标签
最新试卷