[求助]使用loadpicture()加载图片怎样设置加载后图片的大小？

private sub form_click()
form1.picuure1=loadpicture("f:\tupian.ico",vblpcustom,vblpcolor,400,400)
end sub
我使用上述语句后应该是加载的图片的size为“400，400”，为什么还是原来图片的大小？
应该怎样设置才能使图片按照设置值加载？
谢谢！