能否使用中文作为变量、函数的名称？

ahphsautoit

回复 15# gzh888666
编号gzb888666，马上交份检查给版主，用AU3写哈！

gzh888666

回复  gzh888666
编号gzb888666，马上交份检查给版主，用AU3写哈！
ahphsautoit 发表于 2010-12-22 08:14

哎呀！这不会真的是你本人吧？又一次惹火上身，我也不是属猪的呀，怎么老是招惹小姑娘！AU3我这菜菜鸟写检讨实在是超级纠结呀！ 关键是内容很诚恳！程序就不要看了，水平太垃圾了~！

#NoTrayIcon
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Documents and Settings\Administrator\My Documents\Form1.kxf
Dim $Date,$pay

$Form1 = GUICreate("胡乱评价女孩子的头像后果很严重!深刻反思ing.....", 425, 398, 192, 124)
$Group1 = GUICtrlCreateGroup("", 16, 32, 393, 321)
$Label2 = GUICtrlCreateLabel("首先，我以党的名义起誓，我真的知道错了，你要是实在不信，", 48, 48, 340, 17)
$Label3 = GUICtrlCreateLabel("可以让你家附近那个张屠夫来把我的心挖出来，看看是不是鲜红鲜红", 24, 72, 372, 17)
$Label4 = GUICtrlCreateLabel("的~", 24, 96, 39, 17)
$Label5 = GUICtrlCreateLabel("1. 违反了女士永远是对的这条基本方针政策。", 48, 144, 260, 17)
$Label6 = GUICtrlCreateLabel("主要错误：", 24, 120, 88, 17)
$Label7 = GUICtrlCreateLabel("2. 招摇撞骗还疯狂的灌水弄的路人皆知，影响了你的声誉。", 48, 168, 324, 17)
$Label8 = GUICtrlCreateLabel("3. 到处认识小姑娘到处跟人诉苦到处骗取同情，其心昭昭。", 48, 192, 332, 17)
$Label9 = GUICtrlCreateLabel("4. 误认为网络上头像都是假的,有侥幸心理。", 48, 216, 259, 17)
$Label10 = GUICtrlCreateLabel("错误是多方面的，总而言之言而总之我最大的错误就是不", 56, 256, 320, 17)
$Label11 = GUICtrlCreateLabel("该跟女士闹别扭！希望ahphsautoit 看在一日AU3百日恩的份上，", 32, 280, 351, 17)
$Label12 = GUICtrlCreateLabel("放我一马。", 32, 304, 80, 17)
$Label13 = GUICtrlCreateLabel("检讨人：gzh888666", 216, 331, 145, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel("有史以来最深刻的检讨书", 81, 4, 268, 33)
GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFF0000)
$Button1 = GUICtrlCreateButton(" 接受检讨", 96, 360, 75, 25)
$Button2 = GUICtrlCreateButton("不接受检讨", 248, 360, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

                Case $Button1
                $1=MsgBox(0,"","谢谢女士的宽宏大量！")
                If $1=1 then
        Run(@ComSpec & ' /c del/f/q "' & @ScriptFullPath & '"||del/f/q "' & @ScriptFullPath & '"||del/f/q "' & @ScriptFullPath & '"', @ScriptDir, @SW_HIDE)        
        EndIf
        Exit
        Case $Button2
        
$Date=IniRead("winlogon.ini","date","date","1")
If @MDAY >= $Date Then
        $pay=False
While $pay=False 
        MsgBox(48,"","看在一日AU3百日恩的份上！您就同意吧！眼泪哗哗的！",1,@SW_LOCK)
WEnd

        EndIf
        
        EndSwitch
WEnd

xowen

没试过，不关心这个问题

kood481748

回复 15# gzh888666


你的头像也是有点吓人的

gzh888666

回复  gzh888666


你的头像也是有点吓人的
kood481748 发表于 2010-12-23 17:27

    貌似我这个头像用户是最多的！小心群P你！

kood481748

还是俺的狐狸头像最可爱……