VB中,如何单击form1中的command,弹出”打开“,选择好图片文件后,在form2中的image1显示刚才选择的图片

单击form1中的command1,弹出“打开”,在”打开“中选择图片文件,进入form2后image1显示刚才选中的图片

在form1里添加CommonDialog和command,在form2里添加image
Private Sub Command1_Click()
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
Form2.Image1.Picture = LoadPicture(CommonDialog1.FileName)
End If
Form2.Show
End Sub

Private Sub Form_Load()
CommonDialog1.Filter = "图片文件|*.jpg"
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  2011-04-17
form1 添加 CommonDialog 控件到窗体,Command 的代码如下
Private Sub Command1_Click()
CommonDialog1.ShowOpen
Form2.Show
End Sub
form2的 Load 事件的代码如下
Private Sub Form_Load()
Me.Picture = LoadPicture(Form1.CommonDialog1.FileName)
End Sub
第2个回答  2011-04-17
1、利用公共变量传递文件名。form1中定义公共变量比如:
Public varImageFile as String
保存选择的图片文件名称,在form2适当的地方(比如Form2_Load())中加
Image1.Picture=LoadPicture(form1.varImageFile)
2、form1中添加Image控件imgLoad,设置visible属性为false,在按钮Click事件中,在选择图片文件的代码后面加入:
imgLoad.picture=LoadPicture(图片文件名)
在form2_Load()中加入代码:
image1.Picture=imgLoad.picture

3、如果打开form2时form1已经摧毁(Unload),则需要其他方式记录图片文件名称,比如写入一个文本文件,或者数据库。

VB怎样设置点击一个按钮后弹出另一个窗口
首先要添加两个窗体,假设第一个窗体名为Form1,第二个窗体名为Form2。在Form1窗体中添加个按钮Command1。按钮单击事件的代码为:Private Sub Command1_Click()Form2.Show\/\/用show方法加载并且显示名为Form2的窗体 End Sub show 方法后面省略了两个参数即Form2.Show 0或Form2.Show 1此参数可缺省。

VB怎样设置点击一个按钮后弹出另一个窗口
要新建一个窗口 form2在那个按钮上双击,然后输入Private Sub command1_click1()form2.Show End Sub就可以了

VB中,如何点击一个按钮后,弹出一个网页?
首先要添加两个窗体,假设第一个窗体名为form1,第二个窗体名为form2。在form1窗体中添加个按钮command1。按钮单击事件的代码为:private sub command1_click()form2.show '用show方法加载并且显示名为form2的窗体 end sub show 方法后面省略了两个参数即form2.show 0或form2.show 1此参数可缺省。

怎样在VB中实验点一个按钮跳到窗体2?
首先新建窗体form1,form2 如果是用命令按钮进行调用,那你要画一个command1(按钮)然后在form1代码中输入 private sub command1_click()'如果在2号窗体出现后,隐去当前窗体,你还要加上 form1.hide '直接隐去当前窗体1 form2.show '直接调用窗体2 end sub 这样就行了,ok ...

在VB中如果在窗体form1上有个按钮直接转到窗体form2
在窗体form1上双击你设置的那个按钮(假设是command1),然后在弹出的代码窗口中编写如下代码:form1.hide form2.show 就行了,下面是完整的:privat sub command1_click()form1.hide form2.show end sub 嘿嘿,祝你编的成功,这个用法通常出现在比如编辑多窗口应用程序中,如图片浏览器~~~就看你是...

vb中想做一个按钮点击一下打开窗口,再点一下关闭窗口!于此循环!如何编辑...
新建两个窗体form1和form2 在两个窗体中各加一个命令按钮commnad1;在form1下的command1中编辑命令 form2.show 在form2下的command1中编辑命令 unload me 或unload form2 运行后:点击form1下的command1,弹出form2窗体;点击form2下的command1,关闭form2窗体;...

...的第2个窗口。。就是想要运行form2结果运行form1
在form1中添加一个按钮,代码就是:form2.showform1.hide这时form2中也添加一个按钮,代码是:form1.showform2.hide然后就可以回到最前面了..程序运行后,在form1按钮,打开form2..在form2的text1中输入一串字.比如"这是窗口2写的"然后点击form2的按钮回到form1.. 如果form1中有个按钮的代码是:print form2....

VB中怎样单击按钮出现一个图片
用vb编写一个点击按钮随机出现一张图片的软件,例如:窗体上一个picture1和command1的控件。1、有四张图片,他们的后缀名不相同,用户可以问这样写:Dim a$(3)Private Sub Form_Load()Randomize a(0) = "D:\\xuexi.gif"a(1) = "D:\\002.jpg"a(2) = "D:\\房子.png"a(3) = "D:\\4....

vb里一个窗体中的命令按钮 按下去 会执行另外一个窗体中的命令按钮的...
1)在当前窗口按钮的Click事件中对执行窗体的按钮的Value 属性赋值True事项。Value 属性,CommandButton 控件-返回或设置指示该按钮是否可选的值;在设计时不可用。Private Sub Command1_Click() Form2.Command1.Value = TrueEnd Sub2)VB中只需在另一窗体添加一个Timer控件,在当前窗体呼唤该窗体的...

vb中怎么编写 单击命令按钮,则窗体显示文本框内的内容?
1、首先,双击窗体空白处进入代码窗口。2、然后我们在事件中找到Click事件。3、这个时候开始编写代码测试【Print "我是Click单击属性!"】。4、然我们开始运行测试。5、启动后,我们在窗体空白处单击。6、这个时候我们将可以看到测试的效果。

相似回答