问答题

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1，标题为“框架”的窗体上画一个名称为Frame1，且没有标题的框架。框架内含有2个单选按钮，名称分别为Opt1和Opt2、标题分别为“字体”、“大小”，如图1所示。

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

【参考答案】

[操作步骤]
第1步：建立一个新工程，并将窗体的Caption属性改为“框架”。
第2步：添加一个框......

(↓↓↓ 点击下方‘点击查看答案’看完整答案、解析 ↓↓↓)

<上一题目录下一题>

热门试题

问答题

在考生文件夹下有一个工程文件sjt5.vbp，窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签，名称分别为Label1和Label2，标题分别为“出现次数最多的字母是”和“它出现的次数为”；再画两个名称分别为Text1和Text2、初始值为空的文本框，如图5所示。程序功能如下： ①单击“读数据”按钮，则将考生文件夹下in5.dat文件的内容读到变量s中(此过程已给出)。 ②单击“统计”按钮，则自动统计in5.dat文件中所含各字母(不区分大小写)出现的次数，并将出现次数最多的字母显示在Text1文本框内，它所出现的次数显示在Text2文本框内。 “读数据”按钮的Click事件过程已经给出，请为“统计”按钮编写适当的事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行统计，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后程序按原文件名存盘。 [题目提供的源程序] Option Base 1 Dim s As String Private Sub Command1_Click() Open App.Path & in5.dat For Input As #1 s=Input(LOF(1),#1) Close #1 End Sub Private Sub Command2_Click() ’考生应编写的程序 End Sub Private Sub Form_Unload(Cancer As Integer) Open App.Path & out5.dat For Output As #1 Print #1, Text1.Text, Text2.Text Close #1 End Sub

问答题

在考生文件夹下有一个工程文件sjt3.vbp，在Form1的窗体中有1个文本框、2个命令按钮和1个计时器。程序的功能是在运行时，单击“开始计数”按钮，就开始计数，每隔1s，文本框中的数加1；单击“停止计数”按钮，则停止计数(如图3所示)。要求：修改适当的控件的属性，在程序中的横线处填写正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件以原来的文件名存盘。 [题目提供的源程序] Private Sub C1_Click(Index As Integer) Select Case (1) Case 1 Timer1.Enabled=False Case (2) Timer1.Enabled=True End Select End Sub Private Sub Timer1_Timer() Text1.Text=Text1.Text (3) End Sub

相关试题