如果不是很费脑细胞的话,可否与众分享....
cashiba 发表于 2017-1-3 21:46
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>
#include <Date.au3>
#include <nl.au3>;关于农历计算的
$Form1 = GUICreate("Form1", 723, 442, 192, 124)
$Input1 = GUICtrlCreateInput("", 56, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input1a = GUICtrlCreateInput("姓名", 56, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input2 = GUICtrlCreateInput("Input1", 127, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input2a = GUICtrlCreateInput("Input1a", 127, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input3 = GUICtrlCreateInput("Input2", 197, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input3a = GUICtrlCreateInput("Input2a", 197, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input4 = GUICtrlCreateInput("Input3", 268, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input4a = GUICtrlCreateInput("Input3a", 268, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input5 = GUICtrlCreateInput("Input4", 339, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input5a = GUICtrlCreateInput("Input4a", 339, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input6 = GUICtrlCreateInput("Input5", 410, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input6a = GUICtrlCreateInput("Input5a", 410, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input7 = GUICtrlCreateInput("Input6", 481, 28, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input7a = GUICtrlCreateInput("Input6a", 481, 49, 72, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input8 = GUICtrlCreateInput("Input7", 552, 28, 78, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Input8a = GUICtrlCreateInput("Input7a", 552, 49, 78, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$ListView1 = GUICtrlCreateListView("", 56, 70, 575, 345)
;GUICtrlSetState(-1, $GUI_DISABLE)
$hidListview = GUICtrlGetHandle($ListView1)
;_today();返回当前日期
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
|