问答题

在名称为Form1的窗体上画一个名称为L1的标签,标题为“请确认”;再画两个命令按钮,名称分别为C1、C2,标题分别为“是”、“否”,高均为300、宽均为800。如下图所示。
请在属性窗口中设置适当属性满足以下要求:
1)窗体标题为“确认”,窗体标题栏上不显示最大化和最小化按钮;
2)在任何情况下,按Enter键都相当于单击“是”按钮;按Esc键都相当于单击“否”按钮。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为
sjt11.vbp,窗体文件名为sjt11.frm。

【参考答案】

步骤1:启动VB,新建工程文件。
步骤2:设计窗体。根据题意,该用户界面包括四个对象,即窗体,一个标签和两个按......

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

问答题
在考生文件夹下有工程文件djks044.vbp及窗体文件djks044.frm,该程序是不完整的,请在有的地方填入正确内容,然后删除及所有注释符(’),但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下:在Form1窗体上建立一个名称为Op1的单选按钮数组,含有三个单选按钮,其标题分别为“10!”、“11!”、“12!”,Index属性分别为0、1、2;再画两个命令按钮,按钮的名称分别为Cmd1与Cmd2,标题分别为“计算”与“保存”;画一个名称为Tex1的文本框。程序的功能是在选定一个单选框并单击“计算”按钮后,可以计算出相应的阶乘值,在Text1中显示该值。单击“保存”,文本框中的数据可以保存到考生文件夹下的out044.txt文件夹中。注意窗体加载时,Cmd2按钮不可用,单击“计算”按钮后,Cmd2变为可用。 程序运行时的窗体界面如下图所示。 试题源程序 1 Private Sub Cmd1_Click( ) 2 Cmd2.Enabled=True 3 Dim i As Integer 4 Dim t As Integer 5 For i=0 To 2 6 If Opl(i)=True Then i. t=Val(Left$(Op1(i).Caption,)) ii. Text1.Text=(t) 7 End If 8 Next i 9 End Sub 10 Function Out(n As Integer) 11 Dim i As Integer 12 Dim t As Long 13 t=1 14 For i=2 To n 15 Print 16 Next i 17 Out=t 18 End Funtion 19 Private Sub Cmd2_Click( ) 20 Open App.Path & out044.txt For Output As #1 21 Print#1,Text1.Text 22 Close #1 23 End Sub 24 Private Sub Form Load( ) 25 Cmd2.Enabled= 26 End Sub