FontToUse = CreateFontIndirect(lf). oldhdc = SelectObject(Form1.hdc, FontToUse). SetTextColor Form1.hdc, vbBlack. SetBkMode Form1.hdc, 1.
確定! 回上一頁