在窗體上鏤空文字: 我想死你了
private declare function beginpath lib "gdi32" (byval hdc as long) as long
private declare function endpath lib "gdi32" (byval hdc as long) as long
private declare function pathtoregion lib "gdi32" (byval hdc as long) as long
private declare function textout lib "gdi32" alias "textouta" (byval hdc as long, byval x as long, byval y as long, byval lpstring as string, byval ncount as long) as long
private declare function setwindowrgn lib "user32" (byval hwnd as long, byval hrgn as long, byval bredraw as boolean) as long
private declare function deleteobject lib "gdi32" (byval hobject as long) as long
private declare function stretchblt& lib "gdi32" (byval hdc&, byval x&, byval y&, byval nwidth&, byval nheight&, byval hsrcdc&, byval xsrc&, byval ysrc&, byval nsrcwidth&, byval nsrcheight&, byval dwrop&)
private const srccopy = &hcc0020
private sub form_load()
dim hrgn as long
me.windowstate = 2
me.fontname = "arial"
me.fontsize = 110
me.backcolor = vbred
beginpath me.hdc
textout me.hdc, 0, 0, "我想死你了！", 12
endpath me.hdc
hrgn = pathtoregion(me.hdc)
setwindowrgn me.hwnd, hrgn, true
deleteobject hrgn
stretchblt me.hdc, me.scalewidth, 0, -me.scalewidth, me.scaleheight / 2, me.hdc, 0, 0, me.scalewidth, me.scaleheight / 2, srccopy
end sub
是我冤枉了你
買了電腦放假回來當然是要上網的了，為了顯示我是專業人士，我用了當時最快的網速2m的adsl當然是電信的了開始了我的網路生涯 當然是家裡的了 和學校的 網咖 裡果然是天淵之別，畢竟是2m的。又過來一個學期又到假期聽說138圓的升成3m的了，我又一個哥們比我還早裝的他當時是1m，從1到2，然後到3，大家...
malloc，我誤解你了
malloc用於動態申請記憶體，這個學過c語言的都知道。忘記了在哪本書上看到，malloc申請的記憶體不一定是連續，於是一直記住了。這句話有錯嗎？沒有！但是當時只是記住了這個知識點，而沒有深入的思考。直到今天，思考一個問題 char a char malloc 10 a 1 與a 1 相等嗎？如果m...
malloc，我誤解你了
malloc用於動態申請記憶體，這個學過c語言的都知道。忘記了在哪本書上看到，malloc申請的記憶體不一定是連續，於是一直記住了。這句話有錯嗎？沒有！但是當時只是記住了這個知識點，而沒有深入的思考。直到今天，思考一個問題 char a char malloc 10 a 1 與a 1 相等嗎？如果m...
我信了你個邪！！！
1 據說有五個不同顏色的房間排成一排，每個房間分別住著一個不同國籍的人，每個人都喝一種特定品牌的飲料，抽一種特定品牌的煙，養一種寵物，沒有任意倆個人抽象同品牌的香菸，或喝相同品牌的的飲料，或養相同的寵物。問題是誰在養魚做寵物？為了尋找答案，給出以下15條線索。1.英國人住在紅房子裡 2.瑞典人養狗做...
你點燃了我的思念，你殘留了我的溫柔
你點燃了我的思念，你殘留了我的溫柔 你點燃了我的思念，你殘留了我的溫柔 歲月無情，留不住的流年。讓你我在沉醉的時光裡漸漸遺忘。滑落的青春在風裡刻下你的名字。黑暗的夜我一飲而下。後來，才明白你摧殘了我的記憶。從此之後我的記憶因你而殘缺不全。那是一段情嗎？我不知道。就這樣浸入我的生命。月夜，獨自一人醉過...