返回列表 上一主題 發帖

[發問] 如何在 vba 月曆控制項目 加入快速關閉按鈕

user999

帖子
76 
主題
33 
精華
0 
積分
116 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
性別
男 
來自
新竹 
註冊時間
2011-9-29 
最後登錄
2020-8-25 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2011-10-24 16:20 | 只看該作者

[發問] 如何在 vba 月曆控制項目 加入快速關閉按鈕

請教各位高手 如何在 vba 月曆控制項目 加入快速關閉按鈕? 謝謝!
收藏 分享
max

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
16  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2024-11-14 
2#
發表於 2011-10-25 21:16 | 只看該作者
本帖最後由 luhpro 於 2011-10-25 21:18 編輯
請教各位高手 如何在 vba 月曆控制項目 加入快速關閉按鈕? 謝謝!
user999 發表於 2011-10-24 16:20

加入快速關閉的按鈕?
我覺得除非自己另外做一個,
不然以其本身的架構與組成元素來看似乎並不能在其中加上按鈕這個元件.

不過還是可以透過其他的方式來達成相同的目的,
1. 在 Double Click 事件處理程序的最後加上此功能 :
  1. Private Sub MonthView1_DblClick()
  2.   MonthView1.Visible = False
  3.   MsgBox MonthView1.Value ' 這邊也可以將此日期傳給需要用到的變數中
  4. End Sub
複製代碼
這樣只要使用者在任一個日期數字上快點左鍵兩下,
則可以取得該日期並同時關閉此月曆控制項.

2. 在月曆控制項旁邊放上一個關閉按鈕, 負責執行關閉的動作.

另外要將月曆控制項暫時關閉的方法則有兩個 :
1. 把它隱藏起來, 需要用時再解除隱藏即可 - MonthView1.Visible = False 或是 True
2. 直接把它刪掉(MonthView1.Delete), 但需要用時則須重建一個新的月曆控制項以操作.

TOP

        靜思自在 : 時時好心就是時時好日。
返回列表 上一主題