以下是一个比赛评分程序。在窗体上建立一个名为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
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为最后得分),如图所示。请填空。
Private Sub Command1_Click( )
Dim k As Integer
Dim sum As Single, max As Single, min As Single
sum = Text1(0)
max = Text1(0)
min = ______
For k = ______ To 6
If max < Text1(k) Then
max = Text1(k)
End If
If min > Text1(k) Then
min = Text1(k)
End If
sum = sum + Text1(k)
Next k
Text2 = (______) / 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)中显示的内容为【 】。
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,若在文本框Text1中输入一个字符串。若该字符串超过15个字符后,超出部分在文本框Text2中显示。如图12所示程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc4.vbp,窗体文件名为ylc4.frm。
在名为Form1的窗体上建立一个名为Text1的文本框;一个名为Crud1,标题为“输出”的命令按钮(如下图所示)。要求程序运行后,在文本框中任意输入一个字符串,然后单击“输出”按钮,则将文本框中的文字显示在窗体上。注意:在程序中不能使用任何变量:文件必须存放在考生文件夹中,窗体文件名为 execise61.frm,工程文件名为execise61.vbp。
在名为Form1的窗体上绘制一个名为Lab1、标题为空白、BorderStyle属性为1、Visible属性为False的标签,一个名为Text1、Text属性为空白的文本框和一个名为Cmd1、标题为“显示”的命令按钮。然后编写命令按钮的Click事件过程,使程序运行后,在文本框中输入严计算机等级考试”,然后单击命令按钮,则文本框消失,并在标签内显示文本框中的内容。运行后的窗体如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise31.vbp,窗体文件名为execise31.frm。
在名为“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)中显示的内容为【 】。
在窗体上画一个名称为Text1的文本框,然后画3个单选按钮,并用这3个单选按钮建立一个名为Option1的控件数组,程序运行后,如果单击某个单选按钮,则文本框中的字体根据所选择的单选按钮切换,如图1所示。请选择适合空白处的语句( )。A. Option TextB. Index TextC. Index FontD. Option Font
在窗体Form1上放一个名为Text1的文本框和一个名为Command1的命令按钮,然后编写一个事件过程。要求程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设 置为“VB等级考试二级”。以下能正确实现上述操作的事件过程是( )。
在名为Form1的窗体上,绘制一个名为Text1的文本框。设置文本框属性,在文本框中显示“文本框”;再建立一个名为Cmd1,标题为Clear的命令按钮,如下图所示。编写适当的事件过程,使程序运行后,若单击Clear命令按钮,则清除文本框中所显示的信息。注意:文件必须存放在考生文件夹中,窗体文件名为execise5.frm,工程文件名为exeeise5.vbp。