网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为Command1，标题为“确定”。再画5个单选按钮，名称分别为option1、Option2、 Option3、Option4和Option5，标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”，如图26所示。
编写适当事件过程。选中一个单选按钮，并单击“确定”按钮，按照表3-1在文本框中显示相应的内容。
提供Command1对象的Click事件源代码如下，请补充完整。
Private Sub Command1_Click()
If ? Then
Text1.Text="需要1小时"
End If
If ? Then
Text1. Text="需要10小时"
End If
If ? Then
Text1. Text="需要20小时"
End If
If ? Then
Text1. Text="需要100小时"
End If
If ? Then
Text1.Text ="需要500小时"
End If
End Sub
注意：不得修改已经给出的程序。在结束程序运行之前，必须选择进行上面的一种操作．退出程序时必须通过单击窗体右上角的关闭按钮．存盘时必须存放在考生丈件夹下，工程文件名为ylc6.vbp，窗体文件名为ylc6.frm．
参考答案
更多 “ 有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为Command1，标题为“确定”。再画5个单选按钮，名称分别为option1、Option2、 Option3、Option4和Option5，标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”，如图26所示。编写适当事件过程。选中一个单选按钮，并单击“确定”按钮，按照表3-1在文本框中显示相应的内容。提供Command1对象的Click事件源代码如下，请补充完整。Private Sub Command1_Click()If ? ThenText1.Text="需要1小时"End IfIf ? ThenText1. Text="需要10小时"End IfIf ? ThenText1. Text="需要20小时"End IfIf ? ThenText1. Text="需要100小时"End IfIf ? ThenText1.Text ="需要500小时"End IfEnd Sub注意：不得修改已经给出的程序。在结束程序运行之前，必须选择进行上面的一种操作．退出程序时必须通过单击窗体右上角的关闭按钮．存盘时必须存放在考生丈件夹下，工程文件名为ylc6.vbp，窗体文件名为ylc6.frm． ” 相关考题
考题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Colnmand1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮command1变为可用。请将程序补充完整。Private Sub Form_Load()Command 1.Enabled=FalseEnd SubPrivate SubText1【 】()Command1.Enabled=TrueEnd Sub
考题
在考生文件夹下有一个工程文件sjt5.vbp，在该过程中为考生提供了一个通用过程，考生可以直接调用。请在窗体上画一个名称为Text1的文本框；画一个名称为C1，标题为“计算”的命令按钮；再画两个单选按钮，名称分别为Op1、Op2，标题分别为“求500到600之间能被 7整除的数之和”、“求500到600之间能被3整除的数之和”(如图3—1所示)。请编写适当的事件过程，使得在运行时，选中一个单选按钮，再单击“计算”按钮，就可以按照单选按钮后的文字要求计算，并把计算结果放入文本框中，最后把已经修改的工程文件和窗体文件以原来的文件名存盘。
考题
请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。1．在窗体(名称为Form1)上画两个命令按钮，其名称分别为C1和C2，标题分别为“命令按钮1”和“命令按钮2”，编写适当的事件过程。程序运行后，“命令按钮2”隐藏，此时如果单击“命令按钮1”，则“命令按钮2”出现，“命令按钮1”隐藏；而如果单击“命令按钮2”，则“命令按钮1”出现，“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意；存盘时，工程文件名为sjt1.vbp．窗体文件名为sjt1.frm。2．在Form1的窗体上画一个命令按钮，其名称为C1，标题为“显示”；再画一个文本框，其名称为Text1，编写适当的事件过程。程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；此时如果单击命令按钮，则在文本框中显示“等级考试”。程序运行情况如图1—2所示。
考题
在窗体上画一个名称为Text1的文本框，然后画3个单选按钮，并用这3个单选按钮建立一个名为Option1的控件数组，程序运行后，如果单击某个单选按钮，则文本框中的字体根据所选择的单选按钮切换，如图1所示。请选择适合空白处的语句（ ）。A. Option TextB. Index TextC. Index FontD. Option Font
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。 Private Sub Option1_Click(Index AS Integer) Select Case______ Case 0 a="宋体" Case 1 a="黑体"A．Option TextB．Index TextC．Index FontD．Option Font
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
考题
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
考题
在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。Private Sub Option1_Click（Index As Integer）Select Case ______Case 0a = "宋体"Case 1a = "黑体"Case 2a = "楷体＿GB2312"End Selecttext1. ______ =aEnd Sub
热门标签
最新试卷
