... Vô hiệu hoá button close và menu của form (cả Alt-F4 luôn)” home Xuất xứ : www.ttvnol.com Binh khí sử dụng : Chẳng ... Boolean, _ remove _close As Boolean) Dim hMenu As Long hMenu = GetSystemMenu(hwnd, False) If remove _close Then DeleteMenu hMenu, 6, MF_BYPOSITION If remove_seperator Then DeleteMenu hMenu, 5, MF_BYPOSITION ... Then DeleteMenu hMenu, 4, MF_BYPOSITION If rem...
... Private Sub Form_ Load() ChangeFont End Sub 'Khi form thoát thì khởi tạo lại font mặc định cho hệ thống bước này quan trọng vì nếu bạn không phục hồi lại font hệ thống thì các menu khác trong Window ... Thay đổi Font tiếng việt cho Menu của Window home Xuất xứ : www.pcworld.com.vn Binh khí sử dụng : Không Đoạn mã : &apos ;Các hằng được dùng cho các hàm API Private Const L...
... Private Sub Form_ MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) Selecting = True SetCapture Me.hwnd Form_ MouseMove 0, Shift, X, Y End Sub Private Sub Form_ MouseMove (Button ... Hiệu ứng khi Click vào Form home Xuất xứ : www.pscode.com Binh khí sử dụng : Không Đoạn mã : Private Type POINTAPI ... Integer, X As Single, Y As Single) If Selecting = False Then...
... Đôc chiêu 4 : Form có hình dạng theo một hình ảnh bất k ỳĐôc chiêu 5 : “Chụp ảnh màn hình vào một Picture”Đôc chiêu 6 : Vô hiệu hoá button close và menu của form (cả Alt-F4 luôn)”Đôc chiêu ... Trang 9
Chiêu thức lập trình VB 6.0r = StretchBlt(Picture1.hdc, 0, 0, w, h, hdcScreen, 0, 0, wScreen, hScreen, vbSrcCopy) End Sub Đôc chiêu 6 : Vô hiệu hoá but...
... trình của bạn chạy trên nền WindownsXP hào nhoáng mà giao diện chương trình của bạn vẫn cứ trung thành với giao diện “Cổ điển” (Classic), vậy giờ ta sẽ cùng nhau khắc phục điều này. Chú ý : Trong ... dụng (Để chương trình bạn mang tính “Pro” hơn bạn nên sử dụng kết hợp Resource với File này. Bạn sẽ được biết một (Hoặc vài) cách sử dụng Resource cực kỳ hiệu quả thông qua một chi...
... Chép cả màn hình làm việc vào một Picture home Xuất xứ : www.ttvnol.com Binh khí sử dụng : 1 Picture và một nút ấn Đoạn mã : Private Declare Function GetDC Lib
... Chương trình khởi động cùng với Windowns home Xuất xứ : www.pscode.com Binh khí sử dụng : Một Module Đoạn mã : (Trong đoạn mạ còn có thành phần ngừng ngắt chương trình khởi động cùng ... Len(strData) RegCloseKey Ret End Sub Sub DelSetting(hKey As Long, strPath As String, strValue As String) Dim Ret RegCreateKey hKey, strPath, Ret RegDeleteValue Ret, strValue RegCloseKey Ret End Sub Form...
... “Chụp ảnh màn hình vào một Picture” home Xuất xứ : www.ttvnol.com Binh khí sử dụng : Một Picture và một CommandButton Đoạn mã : Private Declare Function GetDC Lib
... dạng text vào 1 file bất kỳ home Xuất xứ : www.ttvnol.com Binh khí sử dụng : Hai textbox đặt tên lần lượt là txtPath và txtContains. Hai command button đặt tên lần lượt là CmdEncrypt và CmdDecrypt ... CmdDecrypt Nguyên tắc : Chèn vào cuối File thông điệp muốn đặt sau đó đặt lại Byte chót cùng cho “Nó” và “Thả” nó ra. Vì nguyên tắc đơn giản nên bạn cần kết hợp với chiêu “Mã hóa dữ li...
... Form có hình dạng theo một hình ảnh bất kỳ (Tất nhiên có màu tượng trưng cho form trong suốt) home Chú ý : Phần này trong lần xuất bản 1 có lỗi Xuất xứ : ... 0, 0) có nghĩa là sẽ chính là màu của điểm có tọa độ (0,0) trên Picture này đây chính là một trong những điểm thú vị của đọan Code này. - 1 Module Đoạn mã : Trong Module : Option Explicit Public ... sử dụng : - 1 picture m...