在vb程序设计中,单击图片框时在图片框中显视"单击图片框"如何编写代码实现这一过程

如题所述

1、打开VB6.0开发软件,新建一个标准exe工程;
2、在设计界面上添加一个Picturebox控件;

3、双击添加的Picturebox控件,进入代码编辑界面,输入如下代码:

Private Sub Picture1_Click()
Picture1.Print "显示图片框"
End Sub

4、运行工程,单击图片框,可以看到图片框内出现了“显示图片框”的显示。

温馨提示:内容为网友见解,仅供参考
第1个回答  2006-05-15
可以使用这句
Picture1.Print "单击图片框"
位置你自己调整(可以使用画点的方法调整位置)
第2个回答  推荐于2017-12-15
或者你可以在图片框里增加一个label控件
在图片框的click事件中加入:label1.caption="单击图片框"本回答被提问者采纳

在vb程序设计中,单击图片框时在图片框中显视"单击图片框"如何编写代 ...
1、打开VB6.0开发软件,新建一个标准exe工程;2、在设计界面上添加一个Picturebox控件;3、双击添加的Picturebox控件,进入代码编辑界面,输入如下代码:Private Sub Picture1_Click()Picture1.Print "显示图片框"End Sub4、运行工程,单击图片框,可以看到图片框内出现了“显示图片框”的显示。

VB编写程序:设计一个程序,当单击窗体时,在窗体上显示任意一幅图片。
假设你的图片路径为d:\\fafa.gif,代码如下:Private Sub Form_Click()Picture1.Picture = IIf(Picture1.Picture = LoadPicture(""), LoadPicture("d:\\fafa.gif"), LoadPicture(""))End Sub 这样就可以单击切换图片了,对了,你要加一个图片框控件,再写入代码 ...

vb中怎样使图像框的图片单击一下图像显示再单击一下图像隐藏
if pic.visible=true then pic.visible=falseelse pic.visibled=trueend if

VB问题:编写程序,程序运行以后,单击图形框(Picture1),在图形框中显示如...
Private Sub Picture1_Click()For n = 1 To 6 For i = 1 To n x = x & i Picture1.Print x & Space(1);Next i x = ""Picture1.Print Next n End Sub

...个程序:窗体上有一幅用图片框装的图片,每单击图片一次,图片框就以其...
这个可能直接的话是有困难的,因为在VB中没有设置图片角度的属性。但可以这样做:用其他图片软件(如PS)把你的那张图片依次旋转30、60、90、。。。330,加上原来的那张(0度),共12张,存在同一文件夹里,如取名为Ax.JPG,其中的x=0,1,2,...11。这样就可以用下面的程序了。程序运行已经验证...

vb.net中,如何点击按钮调出选择文件窗口选中图片并在picturebox中显示出 ...
button , OpenFileDialog , PictureBox , textbox 控件,我把图片显示在 picturebox 中,而路 径存放在 textbox 中,不知道这样行不行。Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim filename As String OpenFileDialog1....

请问怎么用VB设计个程序,当我点一个命令按钮时图框里的图片就能改变成我...
也可以在程序中改变,代码如下:按钮名称.Style = VbButtonStandard\/VbButtonGraphical 或者:按钮名称.Style = 0\/1 只有当按钮的 Style 设置为 Graphical 类型时,按钮的 Picture 属性才起作用。本属性能在指定的按钮上添加图片。按钮名称.Picture = "图形文件所在的路径与文件名",例如:CmdPicture....

vb中如何在picturebox中写点的代码?然后把像素值赋给各点,显示出整个图...
Private Sub Command1_Click()'绘制f(x)=8*sin(x)正弦波 Picture1.DrawWidth = 2 '设置绘图线宽(点大小)Dim y As Double For x = -12 To 12 Step 0.01 y = 8 * Sin(x)Picture1.PSet (x, y), vbRed '按点绘图,颜色为红色 Next End Sub Private Sub Form_Load()Command...

vb调用图片代码,详细
比如要让指定的图片显示在picture1图片框中:Picture1.Picture = LoadPicture("e:\\tmp\\1.jpg")VB调用图片步骤如下:1、建立一个图像框,名字改为p1,建立一个命令按钮。2、双击命令按钮,进入代码编辑器,p1.Picture = LoadPicture("D:\\My Documents\\新建文件夹 (2)\\1.jpg")3、点击运行 4、点击...

VB 中, 怎么实现图片框和图像框中的图形互换
哎 给你个思路呀,你弄个两个图片框,图像框,然后隐藏一个图片框,点击命令按钮的时候一个挨一个的换就ok

相似回答