2009年7月4日 星期六
2009年7月3日 星期五
autolisp 等分物件(measure)
(print "等分物件: dd")
(defun c:dd(/ mc ss1)
(setq mc (getreal "請輸入節點長度:"))
(princ "\n 請選取要列示路線: ") (setq ss1 (entsel))
(if (= ss1 nil)(progn
(print "沒有選取物件!!"))
(progn (command "_.measure" ss1 mc)(print "完成繪製!"))
)
(princ)
)
(defun c:dd(/ mc ss1)
(setq mc (getreal "請輸入節點長度:"))
(princ "\n 請選取要列示路線: ") (setq ss1 (entsel))
(if (= ss1 nil)(progn
(print "沒有選取物件!!"))
(progn (command "_.measure" ss1 mc)(print "完成繪製!"))
)
(princ)
)
2009年7月2日 星期四
vb.net 最上層顯示
'程式如下,即在Form1_Load加上 Me.TopMost = True
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.TopMost = True '最上層顯示
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.TopMost = True '最上層顯示
End Sub
vb.net 使Form不可以調整大小
'使不可以調整大小(size),成為固定大小的寬與高.
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D
原來的FormBorderStyle屬性值為 Sizable
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D
原來的FormBorderStyle屬性值為 Sizable
訂閱:
文章 (Atom)
Search Google
熱門文章
-
前言:有一些EXCEL檔內容不多可是檔案大小確是很大一個的解決方法,或者你在網頁上去複製貼上一個有網頁程式的網頁而要刪除,方法如下; 1. 如下為網頁上去複製貼上一個有網頁程式的網頁貼上後內容有一堆程式物件 ; 2.點選「功能區」的常用,編輯/尋找與選取/到 ; 3...
-
前言:使用AUTOCAD有很多共用圖例在公共工程製圖手冊 - 標準圖例中已經幫我們建立網址如下; 下載: http://pcces.archnowledge.com/csi/PicMaker/CD5/CD5-2.htm 製圖標準圖例 ...
-
前言:在辦公室時可以用 Novell 共用檔案伺服器「\\nw13」將計畫資料備份上來; 1.開始/執行 ; 2. 輸入「\\nw13」按一下,[確定] ; 3.輸入職工編號與上網密碼 ; 4.登入成功,即可以看到Novell 共用檔案資料夾和檔案。 使...
-
T40=鋪築地點: T41=7K+542.78~8K+220東行線 T42=第1、2車道及路肩 T43=第一層 =CONCATENATE(T40,U41,IF(U42="",""," "&U42),IF(U43...
-
這個網址提供最新程式版本全部顯示在一個頁面提供更新資訊及下載網址: http://www.filehippo.com/ 上面可以看到常用的 firefox Google Chrome Skype Adobe Reader Notepad++ 7-Zip
-
部門的秘書在 [ 個人專區 ]->[ 個人工作區 ]->[ 網頁管理 ]->[ 部門公告 ] 這個界面中可以去修改部門公告中所有公告的下架日期讓該公告手動下架 延伸閱讀: Windows 7 遠端協助 for 台灣世曦工程顧問股份有限公司 - CEC...
-
前言:Word2010建立目錄,步驟一為就是將文章有規則階層式的設定,即使用 Word樣式來作排版 ,目錄建立方法如下; 1.功能區的,參考資料/目錄,選取"插入目錄" ; 2.本例只顯示2階層為目錄,在顯示階層值改為2 ; 3.按一下,[確定]...
-
前言:使用EXCEL資料一次印了10多頁至DocuWorks中結果文件排列是由第10~1頁,使用DocuWorks頁面排列翻轉文件排列順序由第1~10頁方法如下; 1. 選取要翻轉文件,按一下, [頁面排列]; 2.點選「●反向排列頁面」,按一下,[確定] ;。 3...