从品牌网站建设到网络营销策划,从策略到执行的一站式服务
1)在窗体添加一个Image图像框控件。在它得属性页设置Stretch属性为True。
创新互联公司专业为企业提供青白江网站建设、青白江做网站、青白江网站设计、青白江网站制作等企业网站建设、网页设计与制作、青白江企业网站模板建站服务,10多年青白江做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
Stretch 属性,返回或设置一个值,该值用来指定一个图形是否要调整大小,以适应与 Image 控件的大小。如果 Stretch 被设置为 True,那么,控件大小的调整使得它所包含的图形的大小也要调整。
2)在代码中加入如下语句:
Private Sub Form_Resize()
Image1.Height = Me.Height
Image1.Width = Me.Width
End Sub
Resize事件,当一个对象第一次显示或当一个对象的窗口状态改变时该事件发生。(例如,一个窗体被最大化、最小化或被还原。)
3)在Image控件的Picture属性连接需要图片或在程序代码中使用LoadPicture 函数将图形载入到Image控件的 Picture 属性。
1、打开Microsoft Visual Basic,新建一个标准Exe工程。
2、选中要设置的控件,观察属性框的参数。
3、接下来找到Picture属性,并点击后面的小三点。
4、然后找到相应的路径。
5、选中图片后,点击打开按钮。
6、这时候便可以成功载入。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'建立新的系统进程
Dim process As New System.Diagnostics.Process()
If RadioButton1.Checked Then
'设置文件名,此处为图片的真实路径+文件名
process.StartInfo.FileName = "c:\a.bmp"
'设置进程运行参数
process.StartInfo.Arguments = "rundll32.exe shimgvw.dll"
Else
process.StartInfo.FileName = "mspaint.exe"
process.StartInfo.Arguments = "c:\a.bmp"
End If
'此项为是否使用Shell执行程序,因系统默认为true,此项也可不设,但若设置必须为true
'process.StartInfo.UseShellExecute = True
'此处可以更改进程所打开窗体的显示样式,可以不设
'process.StartInfo.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden
process.Start()
process.Close()
End Sub
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图