请教VB背景问题

Question

VB界面的背景比较的单调，所以想用photoshop处理一些图片作为背景，
但图片的尺寸把握不了，photoshop中尺寸的怎样和VB中的尺寸换算呢？当VB界面大小改变时，背景图片能不能也按照比例缩放呢？该怎样实现呢?
请各位高手指点！谢谢！

Answer 1

可使用以下Screen对象的属性值，来做缇和像素的转换..
Screen.TwipsPerPixelX
screen.TwipsPerPixelY

Answer 2

还有，可以使用Image控件,Image控件中有strech属性,将其设置为True,则可实现图片的自动缩放..若在图片上有其它对象，可这样处理：放置一个Picturebox,在其内部画一个Image控件,Image控件上设置好图片和其strech属性，然后在窗体的Form_resize属性中写上使用大小编一的代码Private sub Form_resize
  picture.move 0,0,me.scalewidth,me.scaleheight
  image的亦然类似
end sub以上仅是思路，代码比较简单,可自行解决。

Answer 3

wwh999(印钞机的卖 V2.0...发梦ing) 正解.
另外补充一点:大致14.4缇等于1像素.比如你的窗体想定义为宽500像素,则在VB中该窗体的width为7200.

Answer 4

Private Sub Command1_Click()
    MsgBox Me.Width / Screen.TwipsPerPixelX  '算出当前窗体的宽度(单位:像素)
    MsgBox Me.Width / Screen.TwipsPerPixelY  '算出当前窗体的高度(单位:像素)
End Sub

Answer 5

另外补充一点:大致14.4缇等于1像素.比如你的窗体想定义为宽500像素,则在VB中该窗体的width为7200.
-------------------------------------------------------------------------------------
fyming() ，你好，你还存在一点点误解，比值并非是14.4，给校正一下:Screen.TwipsPerPixelX   横向的一个像素和缇的单位换算率
Screen.TwipsPerPixelY   纵向的一个像素和缇的单位换算率需要得到一个800*600的窗体，需这样动态用语句得到:
me.width=Screen.TwipsPerPixelX*800
me.width=Screen.TwipsPerPixelY*600

Answer 6

我做过的系统主要就是用PictureBox来一块一块的填充。效果还不错。