你好!我是VB初學者,想向你求助啊

時間 2022-07-27 12:40:04

1樓:瑞雪屋

很早以前寫的vb**了,功能是實時讓**隨窗體大小等比例放大或縮小。

至於你的第二個問題,你看下面的**自己就能解決了,就是設定一下寬度和高度。

如果真心想學程式設計,還是過渡到vb.net吧。比vb6強大百倍。

option explicitsub bit()

on error resume next

dim v比例 as single

dim vwidth as long, vheight as long

me.cls

picture1.picture = loadpicture("e:\我的文件\my pictures\007.jpg")

with picture1

v比例 = scalex(.picture.width, 8, 3) / scaley(.picture.height, 8, 3)

if me.scalewidth / me.scaleheight > v比例 then

vheight = me.scaleheight

vwidth = me.scaleheight * v比例

else

vwidth = me.scalewidth

vheight = me.scalewidth / v比例

end if

me.paintpicture .picture, me.

scalewidth * 0.5 - vwidth * 0.5, me.

scaleheight * 0.5 - vheight * 0.5, vwidth, vheight

end with

end sub

private sub form_resize() picture1.visible = false

me.autoredraw = true

bitend sub

2樓:匿名使用者

這只是調大**框大小。無法改變內部的**大小。

**縮放要用到gdi。

求幫忙我是初學者

執行的sql語句中 username和password沒取到值 另外不知道你資料庫中密碼列是不是assword,你檢查一下,不知道是你寫錯了還是本來那樣 另外from你寫成了form sql語句那裡不需要 隔開,通常 是拿來拼接sql語句的,你那裡不存在需要拼接的欄位 sql這樣寫試試 我當作密碼列...

紋繡初學者需要哪些工具呢,我是個紋繡初學者,不知道買什麼工具,紋繡最基本需要買什麼工具?

成都大華紋繡美容學校 一 操作工具 操作工具有紋眉機 針片,其中紋眉機費用較高,如果你是在網上買個兩三百的紋眉機,我想它肯定不適合做真人,現在時興半拋機 全拋機,其中全拋機相對比較安全,紋眉機選擇不要貪圖便宜,好的紋眉機可以事半功倍,省去很多時間和後續問題。針片分類更多,單針 三元 五元 排針等等,...

初學吉他買什麼好?在西安哪買,我是初學者,想買把木吉他,在西安,希望有人推薦一下在哪可以買到又好又經濟的?

長延堡 這裡有很多賣吉他的,不貴質量也好。小寨百匯那裡的琴行都是在這裡拿的吉他。初學者大概就是150左右就可以買到一個差不多的吉他了,這裡什麼都有吉他教材 琴絃 箔片 什麼都有。對了你是學生嗎。我同學在西安培華學院開了一個吉他培訓班,每一學期都收人的,我同學是一個專業樂隊的吉他手,學費是三個月180...