หน้าเว็บ

▼
วันเสาร์ที่ 11 มิถุนายน พ.ศ. 2554

Basic IRC Bot with Perl

›
use IO::Socket; $irc='irc.example.net'; $nick='ตั้งชื่อบอท'; $owner='ชื่อคนใช้บอท'; $channel='#channel'; ###...

List of Algorithms Used in CMS.

›
วันพุธที่ 8 มิถุนายน พ.ศ. 2554

List Mouse Movement [ VB6 ]

›
Option Explicit Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hWnd As Long, B...

Form Moving [ VB6 ]

›
Private XX As Integer Private YY As Integer Dim MoveMe As Boolean Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Sing...

Minimize To Tray [ VB6 ]

›
ใ่ส่ไว้ที่ Form นะครับ … Dim nid As NOTIFYICONDATA Sub minimize_to_tray() Me.Hide nid.cbSize = Len(nid) nid.hwnd = Me.hwnd nid.uId = vbNul...

AutoCheck ListBox [ VB6 ]

›
Private Sub Form_Load() Dim itd As Integer For itd = 0 To List1.ListCount - 1 List1.Selected(itd) = True Next itd ...

Transparent From [ VB6 ]

›
ใส่ใน Form ครับ … Private Sub Form_Load() ActiveTransparency Me, True, False, 200, &H0& 'ActiveTransparency [ชื่อ Form], True,...

Effect On TitleBar [ VB6 ]

›
Private Sub Timer1_Timer() Static Text As String Static intC As Integer On Error Resume Next Text = Space(30) & "ใส่ข้อความที่จะให้...

Mouse Movement [ VB6 ]

›
สร้าง CommandButton 1 อันและ TextBox 1 อัน … แล้วใส่โค้ด … Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Sing...

Check Internet Connection [ VB6 ]

›
Private Declare Function InternetGetConnectedState Lib "wininet" (ByRef dwflags As Long, _ ByVal dwReserved As Long) As Long Pri...