可以在加載時(shí)設(shè)置一個(gè)空間 ,沒(méi)有菜單,沒(méi)有命令窗口,完成后改為普通空間,
創(chuàng)新互聯(lián)建站服務(wù)項(xiàng)目包括汕尾網(wǎng)站建設(shè)、汕尾網(wǎng)站制作、汕尾網(wǎng)頁(yè)制作以及汕尾網(wǎng)絡(luò)營(yíng)銷策劃等。多年來(lái),我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢(shì)、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,汕尾網(wǎng)站推廣取得了明顯的社會(huì)效益與經(jīng)濟(jì)效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到汕尾省份的部分城市,未來(lái)相信會(huì)繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
望采納
你去查查書吧,書上挺詳細(xì)的,在這說(shuō)不好說(shuō),你先在項(xiàng)目里引用。然后 Dim acadapp As AcadApplication Dim acaddoc As AcadDocument On Error Resume Next AcadApp = GetObject(, "AutoCAD.Application") If Err.Number Then Err.Clear() AcadApp = CreateObject("AutoCAD.Application") If Err.Number Then MsgBox("不能運(yùn)行AutoCAD,請(qǐng)檢查是否安裝了AutoCAD") Exit Sub End If End If AcadApp.Visible = True '界面可視
1、AutoCAD2015切換成經(jīng)典界面菜單欄就出來(lái)了,直接在狀態(tài)欄,找到小齒輪的按鈕,點(diǎn)一下,選擇經(jīng)典界面即可。 2、如果還是沒(méi)出現(xiàn),輸入命令menu,找到acad.cuix文件,點(diǎn)打開。
當(dāng)前題目:vb.netcad菜單 vb菜單在哪里
URL分享:http://www.chinadenli.net/article30/dohgjpo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供微信小程序、外貿(mào)建站、微信公眾號(hào)、靜態(tài)網(wǎng)站、標(biāo)簽優(yōu)化、網(wǎng)站策劃
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容