1樓:匿名使用者
以label1控制元件為例:
字型放大
label1.fontsize = label1.fontsize * 2
標籤水平居中:
label1.alignment = 2
2樓:匿名使用者
fontsize=字元大小不就行了 你非要雙倍就 先定義個整形dim a as integer a=5 fontsize=a*2
vb裡怎麼讓單擊後文字框擴大,同時文字框內的文字按照規定要求擴大n倍
3樓:匿名使用者
private sub text1_click()n = inputbox("你要擴大幾倍?", , 2)text1.width = text1.
width * ntext1.height = text1.height * ntext1.
font.size = text1.font.
size * n
end sub
請參閱我部落格中專門為回答你這個問題寫的部落格:http://hi.
其中的n可以等於0.5喲!
4樓:匿名使用者
private sub command1_click()dim n as integer, font as long, h as long, w as long
n = 2
with text1
font = .font.size * nme.
font.size = font * nh = me.textheight(.
text)w = me.textwidth(.text).
font.size = font
.height = h / 2
.width = w / 2
end with
end sub
5樓:素錦初薰
話說。其實我不知道。嗯。記得給幫主人的賞分哦~你個傻子~
vb裡面怎麼運用,vb裡面怎麼運用cmd
在 裡直接用shell命令呼叫cmd private sub command1 click shell cmd c ipconfig net user arp a pause vbnormalfocus end sub 上面這個就是在按鈕裡面的例項,共執行了3個命令ipconfig net user...
請問vb裡面 包含 是怎麼表示的
查第一次出現n的 text2中顯示的是首次出現n的位置 option explicit dim i as byte dim mypos as byte private sub command1 click mypos instr 1,text1,n 1 text2 mypos end sub pri...
vb裡面的步長值應該怎麼算,VB裡的步長是什麼意思
聽不清啊 這樣的話當i 1,4,7,10,13時執行迴圈體,即滿足條件時進入迴圈,然後加一個步長值,再判斷 for i 1 to 15 step 3 迴圈內語句 next 迴圈的原理 第一部分,迴圈必備條件 1 迴圈變數 i 2 迴圈變數的取值範圍 1 to 15 3 步長 3 省略則預設為1 4 ...