在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为“横坐标X”,且能根据标题内容自动调整标签的大小;再画1个名称为Text1的文本框,其中的文字显示为空白;再画1个名称为Picture1的图片框,大小适中即可。 要求:编写适当的事件过程,

admin2016-06-23  40

问题 在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为“横坐标X”,且能根据标题内容自动调整标签的大小;再画1个名称为Text1的文本框,其中的文字显示为空白;再画1个名称为Picture1的图片框,大小适中即可。
要求:编写适当的事件过程,使得程序运行时,如果鼠标在图片框中移动,则能在文本框Text1中显示鼠标在图片框中的当前位置的横坐标,运行情况如图所示。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案[操作步骤] 步骤1:新建一个窗体,在窗体上添加一个标签控件,在属性窗口中设置标签的属性,按照表4.5所示在属性窗口中设置相应属性,其运行效果如图4.5所示。 [*] 步骤2:在窗体上添加一个文本框控件,在属性窗口中设置文本框的属性,按照表4.6所示在属性窗口中设置相应属性,其运行效果如图4.6所示。 [*] 步骤3:在窗体上添加一个图片框控件,适当调整大小,其运行效果如图4.7所示。 [*] 步骤4:双击“左击”按钮,打开代码编辑窗口,在代码编辑窗口中添加Picture1_MouseMove事件,并编写以下代码。编写程序代码。参考代码(画下划线部分是需填入的内容) Private Sub Picture1_MouseMove(Button AsInteger,Shift As Integer,X As Single,Y As Single) TExt1.TeXt=X End sub 步骤5:调试并运行程序,关闭程序后按题目要求存盘。

解析
转载请注明原文地址:https://jikaoti.com/ti/59J0FFFM
0

最新回复(0)