<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> //簡體中文
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> //UTF-8
Response.ContentType = "text/html"
Response.Charset = "GB2312" '解決亂碼問題
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> //簡體中文
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> //UTF-8
Response.ContentType = "text/html"
Response.Charset = "GB2312" '解決亂碼問題
Private Sub Form_Resize() If Me.WindowState = 1 Then MsgBox "窗體最小化" End If If Me.WindowState = 2 Th