問題:如何利用微軟提供的標準日曆控制元件來獲得時間、日期?
答案:微軟標準日曆控制元件“Microsoft Date and Time Picker Control 6.0(SP4)”可以提供日期、時間兩種格式,通過此控制元件獲得日期、時間、星期。
工具/原料
組態王6.55
計算機一臺
方法/步驟
新建工程,
定義8個記憶體整數變數年、月、日、時、分、秒、星期、周;
定義2個記憶體字串變數:日期、時間;
製作畫面:
新建畫面,名為:日曆控制元件。
點選工具箱“插入通用控制元件”,
選擇“Microsoft Date and Time Picker Control 6.0(SP4)”;
如圖所示:
畫出矩形的日曆控制元件,雙擊控制元件,命名為:“ADate”。
畫出時間日曆控制元件,雙擊控制元件,命名為:“ATime”;
選中“ATime”控制元件,右擊選擇“控制元件屬性”,
進行“格式”設定,4種格式,
選擇“2-dtpTime”,確定。
"ATime"控制元件由日期變為時間。
控制元件屬性介紹:
常用控制元件屬性和事件:
屬性:FLOAT型--Day、Month、Year、DayOfWeek(周)、Hour、Minute、Second、
BOOL型--Enableed;
事件:Change()--在選擇時間的時候使用;
CloseUp()--在選擇日期的時候使用;
Enabled屬性控制此控制元件是否允許被使用。
如圖所示:
控制元件使用:
在動畫連線屬性,選擇“事件”,雙擊“CloseUp”事件的關聯函式,彈出“控制元件事件函式編輯框”。
函式宣告處為函式命名,如“CloseUp()”;
在命令語言編輯框中編寫指令碼程式,
點選編輯視窗下方“控制元件”按鈕,彈出“控制元件屬性和控制元件方法”,
在控制元件名稱中選擇“ADate”日曆控制元件;
在檢視型別中選擇“控制元件屬性”;
在屬性或方法中選擇“Year”。
指令碼程式分享如下:(請投票)
日期:
string temp;
\\本站點\年=ADate.Year;
\\本站點\月=ADate.Month;
\\本站點\日=ADate.Day;
\\本站點\周=ADate.DayOfWeek;
temp=StrFromInt(\\本站點\年,10);
if(\\本站點\月<10)
temp=temp+"/0"+StrFromInt(\\本站點\月,10);//一位數要加零
else
temp=temp+"/"+StrFromInt(\\本站點\月,10);
if(\\本站點\日<10)
temp=temp+"/0"+StrFromInt(\\本站點\日,10);
else
temp=temp+"/"+StrFromInt(\\本站點\日,10);
\\本站點\日期=temp;
if(\\本站點\周==1)
\\本站點\星期="星期日";
if(\\本站點\周==2)
\\本站點\星期="星期一";
if(\\本站點\周==3)
\\本站點\星期="星期二";
if(\\本站點\周==4)
\\本站點\星期="星期三";
if(\\本站點\周==5)
\\本站點\星期="星期四";
if(\\本站點\周==6)
\\本站點\星期="星期五";
if(\\本站點\周==7)
\\本站點\星期="星期六";
時間:
string temp;
\\本站點\時=ATime.Hour;
\\本站點\分=ATime.Minute;
\\本站點\秒=ATime.Second;
if(\\本站點\時<10)
temp="0"+StrFromInt(\\本站點\時,10);//10是十進位制的樣子;
else
temp=StrFromInt(\\本站點\時,10);
if(\\本站點\分<10)
temp=temp+":0"+StrFromInt(\\本站點\分,10);
else
temp=temp+":"+StrFromInt(\\本站點\分,10);
if(\\本站點\秒<10)
temp=temp+":0"+StrFromInt(\\本站點\秒,10);
else
temp=temp+":"+StrFromInt(\\本站點\秒,10);
\\本站點\時間=temp;
儲存畫面,
執行系統
如圖所示:
注意事項
注意動畫連線屬性的相關設定
日期時間選擇合適的