(1)在名称为:Form1的窗体上画一个图片框控件PictureBox,名称为Picl;再画两个命令按钮,名称分别为Commandl和Command2、标题分别为“删除”和“添加”。请编写适当的事件过程,使得在运行时,如果单击“删除”按钮,则图片框消失,而

admin2010-07-13  34

问题 (1)在名称为:Form1的窗体上画一个图片框控件PictureBox,名称为Picl;再画两个命令按钮,名称分别为Commandl和Command2、标题分别为“删除”和“添加”。请编写适当的事件过程,使得在运行时,如果单击“删除”按钮,则图片框消失,而如果单击“添加”按钮,则图片框显示出来,如图20一1和图20一2所示。程序中不得使用任何变量。

    注意:存盘时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sil.frm。
    (2)在窗体上画一个文本框,名称为Text1,一个标签,名称为Labell。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,如果在Textl中每输入一个字符,则显示一个“*”,同时在Labell中显示输入的内容,如图20—3所示。程序中不得使用任何变量。
    注意:存盘时必须存放在考生文件夹下,工程文件名为sj2.vbp,窗体文件名为sj2.frm。

选项

答案(1)命令按钮的标题由Caption属性设置,单击命令按钮触发其Click事件;图片框的可见性由Visible属性设置。当Visible属性为True时,控件在运行时可见;当Visible属性为False时,控件在运行时不可见。 根据题意,新建“标准EXE”工程,将一个PictureBox控件和两个命令按钮添加到窗体中,图片控件的名称为Picl,命令按钮的名称分别为Commandl和Command2,Caption分别为“删除”和“添加”。双击Commandl进入代码窗口,编写如下代码: Private Sub Commandl_Click() Piel.Visible=False’将Picl隐藏 End Sub Private Sub Command2_Click() Picl.Visible=True’将Picl显示出来 End Sub 单击[*]按钮运行程序,并按要求保存。 (2)文本框的内容由其Text属性设置。文本框的PasswordChar属性可用于r1令输入,在默认状态下,该属性被没置为空字符串(不是空格)。题目要求在Textl中输入字符的同时在Labell中显示Textl中输入的内容,这要用到文本框的Change事件。当用户向文本框中输入新信息,或当程序把Text属性设置为新值从而改变文本框的Text属性时,将触发其Change事件。 根据题意,新建“标准EXE”工程,将一个标签和一个文本框控件添加到窗体中,将标签的名称设为Labell、Caption属性为空,文本框的名称为Textl、Caption属性为空。双击Textl进入代码编写窗口,编写如下代码: Private Sub Textl_Change() Labell.Caption=Textl.Text End Sub 单击[*]按钮运行程序,并按要求保存。

解析
转载请注明原文地址:https://kaotiyun.com/show/3Lmp777K
0

最新回复(0)