option explicit
private sub mdiform_load()
form1.show '顯示窗體form1
form2.show
form3.show
end sub
private sub mnuquit_click()
endend sub
此例子的重點知識: 'mdi窗體的arrange屬性 0 重疊排列子窗體 1水平排列子窗體2 豎直排列子窗體3 排列窗體的最小化圖示
private sub mnuwinc_click()
mdiform1.arrange 0 '將mdi窗體中的3個子窗體層疊排列
end sub
private sub mnuwinh_click()
mdiform2.arrange 1'將mdi窗體中的3個子窗體水平平鋪
end sub
private sub mnuwinv_click()
mdiform3.arrange 2'將mdi窗體中的3個子窗體垂直平鋪
end sub
Vb工程 百例91 排列視窗
option explicit private sub mdiform load form1.show 顯示窗體form1 form2.show form3.show end sub private sub mnuquit click endend sub 此例子的重點知識 mdi窗體的arrang...
百練 1833排列
描述 題目描述 大家知道,給出正整數n,則1到n這n個數可以構成n!種排列,把這些排列按照從小到大的順序 字典順序 列出,如n 3時,列出1 2 3,1 3 2,2 1 3,2 3 1,3 1 2,3 2 1六個排列。任務描述 給出某個排列,求出這個排列的下k個排列,如果遇到最後乙個排列,則下1排列...
VB工程 百例64游標位置
option explicit private sub command1 click txt1.text 歡迎來到廊坊師範學院 end sub private sub command2 click txt1.text end sub private sub command3 click endend...