当前位置:IT认证>BASIC题库

问题:[问答题]

[问答题] 请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。1.在窗体(名称为Form1)上画两个命令按钮,其名称分别为C1和C2,标题分别为“命令按钮1”和“命令按钮2”,编写适当的事件过程。程序运行后,“命令按钮2”隐藏,此时如果单击“命令按钮1”,则“命令按钮2”出现,“命令按钮1”隐藏;而如果单击“命令按钮2”,则“命令按钮1”出现,“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意;存盘时,工程文件名为sjt1.vbp.窗体文件名为sjt1.frm。2.在Form

  

参考答案:

  参考解析

①启动VisualBasic,在窗体上画两个命令按钮。②按F4键,激活属性窗口,在属性窗口中设置两个命令按钮的属性,见表1。表1控件属性设置值命令按钮1名称CaptionC1命令按钮1命令按钮2名称CaptionC2命令按钮2  ③编写两个命令按钮的Click事件过程:  PrivateSubC1_Click()    C1.Visible=False    C2.Visible=True  EndSub  PrivateSubC2_Click()    C1.Visible=True    C2.Visible=False  EndSub2.①对象主要属性设置如表2所示。表 2对象对象名属性名属性值窗体Form1CaptionForm1文本框Text1命令按钮C1Caption显示②分析:按试题要求在窗体上画出一个文本框和一个命令按钮,并分别将它们的属性按表2的内容进行设置。当窗体加载时激活Form_Load,通过文本框Text的Visible属性设置为False,即将Text文本框隐藏掉。当双击窗体时,产生Form_DblClick事件,Text的Visible属性设置为True,即可见。将字符串“等级考试”赋值给文本框Text1的Text属性时,则在文本框中显示“等级考试”。③编程代码:PrivateSubC1_Click()Text1.Text="等级考试"EndSubPrivateSubForm_DblClick()Text1.Visible=TrueEndSubPrivateSubForm_Load()Text1.Visible=FalseEndSub

微信端