1樓:網友
使用api函式 ,前面是api函式的宣告(1-3行),後面是api 呼叫(5行)
學習api 可以參考api_bible,很不錯。
api 函式參考。
alphablend
函式功能:該函式用來顯示具有指定透明度的影象。
函式原型:alphablend(hdc hdcdest,int nxorigindest,int nyorigindest,int nwidthdest,int hheightdest,hdc hdcsrc,int nxoriginsrc,int nyoriginsrc,int nwidthsrc,int nheightsrc,blendfunction blendfunction);
引數: hdcdest:指向目標裝置環境的控制代碼。
nxorigindest:指定目標矩形區域左上角的x軸座標,按邏輯單位。
nyorigindest:指定目標矩形區域左上角的y軸座標,按邏輯單位。
nwidthdest:指定目標矩形區域的寬度,按邏輯單位。
hheghtdest:指向目標矩形區域高度的控制代碼,按邏輯單位。
hdcsrc:指向源裝置環境的控制代碼。
nxoriginsrc:指定源矩形區域左上角的x軸座標,按邏輯單位。
nyoriginsrc:指定源矩形區域左上角的y軸座標,按邏輯單位。
nwidthsrc:指定源矩形區域的寬度,按邏輯單位。
nheightsrc:指定源矩形區域的高度,按邏輯單位。
blendfunction:指定用於源點陣圖和目標點陣圖使用的alpha混合功能,用於整個源點陣圖的全域性alpha值和格式資訊。詳見。
2樓:網友
這段**沒什麼不明白的地方嘛。
宣告乙個動態陣列變數。
dim p()
取**框的寬度與高度。
w =h =
定義乙個二維陣列,vb的陣列從0開始,而不是1,所以減1。
這樣就產生的陣列個數與**框的**的點的個數相同。
redim p(w - 1, h - 1)下面這段通過二重迴圈,將**中每個點的值存到二維陣列裡。剛好能存完。
for i = 0 to w - 1
for j = 0 to h - 1
p(i, j) =, j)
next j
next i
下面首先將**框的寬變成與原來的高相等,**框的高變得與原來的寬相等。
看起來好像旋轉了90度似的。4 * 這個沒有特別作用,只是在原來的基礎稍稍增加點寬和高而已。
h + 4 *
w + 4 *
這段雙重迴圈,將剛才取出的點重新寫入到**框裡。不過是旋轉90後再寫入。
for i = 0 to h - 1
for j = 0 to w - 1
i, w - j - 1), p(j, i)next j
next i
end sub
3樓:網友
運用api函式使**翻轉。
vb執行下面程式段後s等於
4樓:網友
答案是9
i= s=6
i= s=7
i= s=8
i= s=9
再加的話,大於了,因此迴圈到此為止,s=9
這個vb過程怎麼解釋?
5樓:聽不清啊
這是乙個「打擂臺」求最小值的程式段。
a陣列的下標範圍為0~5
for迴圈是從1~5檢查,若a(y)>a(i),則令y=i初始時y=1,a(y)=4
當i=3時,a(i)=2,4>2,所以,y=3其後,任意乙個a(i)都不滿足 a(y)>a(i)所以到最後,ay)=a(3)=2
選答案b
vb程式閱讀題1執行下面程式段的輸出結果是
第1題的輸出結果是 tab n 可選的 n 引數是在顯示或列印列表中的下一個表示式之前移動的列數。例如print tab 10 將在第10列出現 關於vb程式題 private sub mand1 click dim a as integer for i 10 to 1 step 2 s s i 你...
幫忙用vb編寫一段語句
a的值是怎麼樣的?是像你寫的 8點30分 還是時間格式?private sub command1 click dim a as date dim h as long,m as longdim isworktime as longa now h hour a m minute a if h 8 and...
求VB程式的寫法,求一個VB程式的寫法
清屏,什麼意思啊,用cls是不能清控制元件的哦,只能清程式執行時輸出到窗體上的資料。可以這樣寫 再加一個退出時顯示的窗體form2,上面就一行字,或者可以裝飾得好看一點,背景放一張 什麼的,謝謝使用!就放在label標籤裡,再加一個按扭,單擊事件裡就一個 end命令。private sub cmde...