o這是因?yàn)橛凶止?jié)對齊的問題。每一個(gè)變量的首地址必須是它所占字節(jié)長度的倍數(shù)。
網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)!專注于網(wǎng)頁設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序定制開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了長沙縣免費(fèi)建站歡迎大家使用!
比如int32長度是4,那么它的首地址只能取0,4,8,12……
下面的圖形象的表示了MSG在內(nèi)存中的儲(chǔ)存情況:
OOXXOOOO
第一個(gè)和第二個(gè)O表示兩個(gè)BYTE類型的數(shù)據(jù),兩個(gè)X表示空地址,里面什么也沒放。后面四個(gè)OOOO便是一個(gè)int32類型數(shù)據(jù)也就是Code。加起來總共占了8個(gè)字節(jié)的內(nèi)存
for i=3 to 100
if i mod 3=0 then print i '除以3余數(shù)為0的話,就是3的倍數(shù)
next
望采納
double是雙精度 有效數(shù)值位52位 表示成指數(shù)的形式 即指數(shù)11位 即表示成
所以180.89305用2進(jìn)制表示是10110100.1110010010011110111011001011111110110001010110110101
即
180.89305在double中存在的實(shí)際數(shù)值是
1.01101001110010010011110111011001011111110110001010110110101 *2^7
取小數(shù)點(diǎn)后 52位有效值后 等于10進(jìn)制的180.893049999999998
所及加最后變成了 1808930.99999999998
第一次當(dāng)然輸出近似值1808931
第二次int函數(shù)去掉了小數(shù)點(diǎn)后的數(shù)int就是只取整數(shù)的部位的不是四舍五入 所以少了1
if x mod 3 = 0 and x 0 then
msgbox ”x 是3的倍數(shù)”
end if
if x mod 7 = 0 and x 0 then
msgbox ”x 是7的倍數(shù)”
end if
如果是固定格式的,
str=34X+45Y=67Z
x=split(str,"X")(0) ‘以X分割,取第0段,即:34
y=split(split(str,'+')(1),'Y')(0) '以+分割,取第1段即:45Y=67Z,再以Y分割,取0段得45
z=split(split(str,'=')(1),'Y')(0) '同上
把字符串分割,查找,截取這些常用字符串處理函數(shù)掌握了,
就差不多能隨心所欲的處理了...
以上是vb6.0代碼,
。net 不用api就行
縮放操作
Function 縮放(ByVal bitmap As Bitmap, ByVal 倍數(shù) As Single) As Bitmap
Dim w As Integer = bitmap.Width * 倍數(shù)
Dim h As Integer = bitmap.Height * 倍數(shù)
Dim tem As New Bitmap(w, h)
Dim g As Graphics = Graphics.FromImage(tem)
g.DrawImage(bitmap, New Rectangle(0, 0, w, h), New Rectangle(0, 0, bitmap.Width, bitmap.Height), GraphicsUnit.Pixel)
g.Dispose()
Return tem
End Function
鼠標(biāo)滾輪事件 MouseWheel
MouseEventArgs.Delta 值可以判斷滾動(dòng)方向