- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]日曆問題 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=45241)
-- 发布时间：2014/1/19 16:34:00
-- [求助]日曆問題
附上例子。謝謝！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:日历.table |
-- 发布时间：2014/1/19 19:53:00
--
第二点未理解，显示图片，是显示在日历上面吗？
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:日历.table |
-- 发布时间：2014/1/19 20:09:00
--
感恩啊！謝謝有點甜老費心了。顯示图片部分應該說是在同一個窗口也就是把導覽窗口右邊拉長裡邊是否加個面板控件讓圖片顯示。再次謝謝老師！
-- 发布时间：2014/1/19 20:30:00
--
你加入一个pictureBox控件，然后设置对应的文件名就行了
-- 发布时间：2014/1/19 22:13:00
--
感恩啊！再次謝謝有點甜老師！
-- 发布时间：2014/1/20 15:06:00
-- 回复：（有点甜） 你加入一个pictureBox控件，然...
不好意思，再請教老師，我看了幫助我用以下代碼是ok，我想再學的是資料夾裡有10張圖檔，代碼如何可以隨機顯示其中一張，不是固定一張。
Dim pbx As WinForm.PictureBox
pbx = Forms("导航").Controls("PictureBox1")
pbx.Image = GetImage("D:\\Joy data\\Pictures\\01.jpg")
-- 发布时间：2014/1/20 15:09:00
--
pbx.Image = GetImage("D:\\Joy data\\Pictures\\" & Format(Rand.Next(1,11),"00") & ".jpg")
-- 发布时间：2014/1/20 15:23:00
--
以下是引用Bin在2014-1-20 15:09:00的发言：
pbx.Image = GetImage("D:\\Joy data\\Pictures\\" & Format(Rand.Next(1,11),"00") & ".jpg")
pbx.Image = GetImage("D:\\Joy data\\Pictures\\" & Format(Rand.Next(1,11),"00") & ".jpg")
真是太感恩了，再次謝謝老師賜教。