病情分析：
10年積累的網(wǎng)站建設(shè)、做網(wǎng)站經(jīng)驗(yàn)，可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你，你也不認(rèn)識我。但先網(wǎng)站制作后付款的網(wǎng)站建設(shè)流程，更有高縣免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。
您好，噴墨式打印機(jī)肯定會有有害物質(zhì)的，但是只要距離一定的距離并且放在通風(fēng)的地方，一般不會對人體有嚴(yán)重的危害。
指導(dǎo)意見：
建議您將打印機(jī)放在靠窗戶的位置，不用戴手套，打印機(jī)要遠(yuǎn)離臥室以及生活區(qū)域，可以放在書房。
病情分析：
這樣的情況還是建議你以后少用，這些辦公用品在進(jìn)行打印的時候，都會釋放出難聞的氣味，建議你遠(yuǎn)離，長期的接觸易導(dǎo)致出現(xiàn)免疫系統(tǒng)的地下
指導(dǎo)意見：
現(xiàn)在的辦公環(huán)境造就實(shí)現(xiàn)無紙化辦公的了，建議你每天體檢看是否正常
病情分析：
激光打印機(jī)會散發(fā)有毒物質(zhì)和臭氧,微粒的釋放程度，與打印機(jī)的品種、新舊程度、墨盒類型及使用壽命都有關(guān).
指導(dǎo)意見：
危害是有的,建議要保持環(huán)境通風(fēng),可以在旁邊種植仙人掌,可以幫助吸收輻射,釋放出有害微粒的是打印機(jī)墨盒中的細(xì)小墨粉，而非油墨等物質(zhì)。打印好的紙應(yīng)該沒問題.
1 打開Excel dim myexcelas new Excel.Application() myexcel.visible=true
2 添加新的工作簿myexcel.Workbooks.add()
3 設(shè)定第二個工作表為活動工作表myexcel.worksheets(2).Acivate()
4 打開指定的Excel文件myexcel.workbooks.open(“c:\my.xls”)
5 顯示Excel窗口myexcel.visible=true
6 更改Excel的標(biāo)題欄myexcel.caption=“歡迎,歡迎!”
7 為Excel的單元格賦值myexcel.cells(1,4).value=100 此語句使Excel當(dāng)前工作表的第一行第四列,即D1單元格等于100, 也可以這樣寫: myexcel.Range(“D1”).value=100
8 設(shè)置指定列的寬度(單位:字符個數(shù))myexcel.ActiveSheet.colums(1).columnwidth=20 設(shè)定當(dāng)前工作表第1列的寬度為20
9 設(shè)置指定行的高(單位:磅)myexcel.ActiveSheet.rows(1).rowHeight=1/0.035 1磅 =0.035厘米設(shè)置第1行的高度為1CM
10 插入分頁符 myexcel.Activesheet.rows(20).pagebreak=1在第20行前插入分頁符
11 刪除分頁符myexcel.Activesheet.columns(20).pagebreak=0 在第20列前刪除分頁符
12 指定邊框線的寬度myexcel.Activesheet.range(“B3:D3”).borders(1).weight=3 其中borders參數(shù)指定單元格邊框的位置:1:左 2:右 3:頂 4:底 5:斜\ 6:斜/
13 指定邊框線條的類型 myexcel.Activesheet.range(“B1:D3”).borders(2).linestyle=1此語句將當(dāng)前工作表的B1:D3單元格的右邊框設(shè)置為實(shí)線 linestyle參數(shù): 1:細(xì)實(shí)線 2:細(xì)虛線 3:點(diǎn)虛線 4:雙細(xì)實(shí)線
14 設(shè)置頁腳myexcel.activesheet.pagesetup.centerfooter=“第p頁” 注意:設(shè)置頁眉頁腳時要保證計算機(jī)上裝有打印機(jī),否則出錯!
15 設(shè)置頁眉myexcel.activesheet.pagesetup.centerfooter=“第p頁”
16 設(shè)置頁眉到頂斷距離為2cmmyexcel.Activesheet.pagesetup.Headermargin=2/0.035
17 設(shè)置頁腳到底端距離為2cmmyexcel.Activesheet.pagesetup.Footermargin=2/0.035
18 設(shè)置頂邊邊距為2cmmyexcel.Activesheet.pagesetup.topmargin=2/0.035
19 設(shè)置底邊邊距為2cmmyexcel.Activesheet.pagesetup.Bottommargin=2/0.035
20 設(shè)置左邊邊距為2cmmyexcel.Activesheet.pagesetup.Leftmargin=2/0.035
21 設(shè)置右邊邊距為2cmmyexcel.Activesheet.pagesetup.Rightmargin=2/0.035
22 設(shè)置頁面水平居中myexcel.activesheet.pagesetup.CenterHorizontally=true
23 設(shè)置頁面垂直居中myexcel.activesheet.pagesetup.Centervertically=true
24 設(shè)置頁面紙張大小 (1,窄行8.511 ;39 ,寬行1411) myexcel.activesheet.pagesetup.papersize=1
25 打印單元格網(wǎng)格線 myexcel.activesheet.pagesetup.PrintGridlines=true
26 復(fù)制整個工作表 myexcel.activesheet.Usedrange.Copy
27 復(fù)制指定區(qū)域 myexcel.activesheet.range(“a1:b5”).Copy
28 粘貼 myexcel.worksheets(“sheet2”).range(“A1”).PasteSpecial
29 在第2行前插入一行 myexcel.activesheet.rows(2).Insert
30 在第2列前插入一列 myexcel.Activesheet.Columns(2).Insert
31 合并 C4:D4 單元格 myexcel.Activesheet.Range(“C4:D4”).Merge()
32 自動調(diào)整第2列列寬 myexcel.activesheet.Columns(2).AutoFit
33 設(shè)置字體myexcel.Activesheet.cells(2,1).font.name=“黑體”
34 設(shè)置字體大小myexcel.Activesheet.cells(2,1).font.size=25
35 設(shè)置字體為斜體 myexcel.Activesheet.cells(2,1).font.Italic=true
36 設(shè)置字體為粗體 myexcel.Activesheet.cells(2,1).font.Bold=true
37 清除單元格內(nèi)容myexcel.activesheet.cells(2,1).ClearContents
38 打印預(yù)覽工作表myexcel.Activesheet.PrintPreview
39 打印工作表 myexcel.Activesheet.Printout
40 工作表另存為myexcel.ActiveWorkbook.saveas(“C:\book2.xls”)
41 放棄存盤 myexcel.ActiveWorkbook.saved=false
42 關(guān)閉工作簿 myexcel.Workbooks.close
43 退出 Excel myexcel.quit
44 紙張橫向：myexcel.activesheet.PageSetup.OrientaTion=2（1縱向）
45 單元格居中：cells(2,1).HorizontalAlignment=Excel.XlHAlign.xlHAlignCenter 水平方向cells(2,1).VerticalAlignment=Excel.XlVAlign.xlVAlignCenter 垂直方向
打開CSDN APP，看更多技術(shù)內(nèi)容
VB調(diào)用Excel軟件實(shí)現(xiàn)打印預(yù)覽功能
摘要:VB源碼,報表打印,打印預(yù)覽VB調(diào)用Excel軟件實(shí)現(xiàn)打印預(yù)覽功能，可以插入折線圖，VB打印預(yù)覽功能示例源碼，分享給大家參考。
用vb操作EXCEL打印報表
最近使用vb來打印報表,打印出來的EXCEL一直無法上傳到ftp 反復(fù)多次問題都沒解決, 200 PORT command successful. Consider using PASV. 問題出在這,由于win10的防火墻的原因,關(guān)閉防火墻后問題得到解決. 轉(zhuǎn)載于:...
繼續(xù)訪問
VB操作excel 格式設(shè)置及打印頁面設(shè)置（精簡）
langue：VB Set ExcelApp = CreateObject("Excel.Application") ’創(chuàng)建資源，建立連接 Set ExcelBook = ExcelApp.Workbooks.Open(“d:\pipo\index.htm") Set ExcelSheet = ExcelBook.Worksheet...
繼續(xù)訪問
vb.net excel操作：填充人事檔案表并打印
節(jié)選自：《Visual Basic.Net 循序漸進(jìn)》【例 21.7】【項(xiàng)目：code21-007】填充人事檔案表并打印。 本例使用到的Excel文件為：職員信息登記表.xlsx，如下圖所示： 圖21-10 職員信息登記表 窗體設(shè)計如下圖所示（注意：為了演示方便，已經(jīng)填充了數(shù)據(jù)）： 圖21-11 窗體設(shè)計 在本例中還需要掌握的知識： 1、插入圖片到指定位置 Worksheet.Shapes.AddPicture(Filename, LinkToFile, SaveWithDocumen
繼續(xù)訪問
vb.net操作Excel常用命令
轉(zhuǎn)載: 首先,須在項(xiàng)目里引用: 添加引用-Com-Microsoft Excel 9.0 Object Library （這是EXCEL2000） 1 打開Excel： dim myexcel as new Excel.Application() myexcel.visib...
繼續(xù)訪問
vb.net 如何實(shí)現(xiàn)報表打印_Excel如何實(shí)現(xiàn)分類別打?。縿?chuàng)建組輕松實(shí)現(xiàn)
有朋友咨詢個關(guān)于Excel打印數(shù)據(jù)問題，他的需求是這樣的：下表中是某公司人員信息表，現(xiàn)在領(lǐng)導(dǎo)要求將表格分部門打印出來，每位員工核對個人信息并簽字。需求很明確，就是將相同部門的人員打印到一張紙上。打印很簡單，難點(diǎn)在于如何按每個部門去打印？如果部門較少的話可以將不同部門復(fù)制到不同插頁中，再進(jìn)行打?。坏侨绻块T較多的話，這種辦法實(shí)在不可??；有小伙伴表示可以利用VBA技術(shù)將部門拆分到各個插頁，在進(jìn)行打印...
繼續(xù)訪問
最新發(fā)布 vb.net 教程 11-1 打印組件 3 PageSetupDialog
版權(quán)聲明：本文為博主原創(chuàng)文章，轉(zhuǎn)載請在顯著位置標(biāo)明本文出處以及作者網(wǎng)名，未經(jīng)作者允許不得用于商業(yè)目的。 本節(jié)談?wù)劻硗庖粋€有關(guān)打印的對話框：PageSetupDialog，頁面設(shè)置對話框 實(shí)際我們是通過這個對話框獲得PageSetting，關(guān)于PageSetting在上一節(jié)有部分介紹，請參看 vb.net 教程 11-1 打印組件 PrintDialog 2 注意的是，使用PageSetupDialog需要綁定一個PrintDocument，在PageSetupDialog的Document屬性處
繼續(xù)訪問
VB.NET使用EXCEL常見操作
首先,須在項(xiàng)目里引用: 添加引用Microsoft.Office.Interop.Excel Imports Excel = Microsoft.Office.Interop.Excel 1 打開Excel： Dim myexcel as new Excel.Application() myexcel.visible=true 2 添加新的工作簿： myexcel.Workbooks.ad
繼續(xù)訪問
【VB Excel】VB 操作Excel基本步驟
VB操作EXCEL,實(shí)現(xiàn)數(shù)據(jù)讀取 1、定義Excel操作變量 Dim objExcelFile As Excel.Application Dim objWorkBook As Excel.Workbook Dim objImportSheet As Excel.Worksheet 2、打開Excel進(jìn)程，并打開目標(biāo)Exc...
繼續(xù)訪問
vba代碼編程800例_如何設(shè)置Excel打印格式，學(xué)會這個VBA對象就可以隨心所欲
NO.1 Excel如何設(shè)置打印格式使用vba可以做打印格式處理，如何做一個漂亮的打印頁面，不外乎要設(shè)置打印表格的邊框、版式、頁眉、頁角等等。那么怎樣設(shè)置這些格式呢？NO.2 PageSetup對象vba編程用到Pagesetup對象，對表格打印進(jìn)行設(shè)置。PageSetup對象有許多屬性，下面圖片里列出了大部分常用的屬性，可以對照進(jìn)行設(shè)置。具體方法下面舉個例子來展示一下最終效果。PageSetup...
繼續(xù)訪問
vb.net操作excel文件
[轉(zhuǎn)自] vb.net操作excel文件 要求將數(shù)據(jù)顯示在Excel表中，并且要設(shè)好數(shù)據(jù)格式。雖說如此，真正實(shí)現(xiàn)了自己的功能，還是費(fèi)了不少時間。相信還是有很多與我相似的人需要實(shí)現(xiàn)這種功能。那就做個小結(jié)吧。不妥之處，請指正哦。 1.添加引用–com—microsoft excel 11.0 object library 2在需要訪問excel的過程中定義 dim exapp as excel.a
繼續(xù)訪問
VB.net使用PrintForm打印窗體
在VS2010中內(nèi)置了了一個PowerPacks的擴(kuò)展包,果然很好用啊,可以直接打印窗體內(nèi)容 先從"工具箱"中拖一個PrintForm到設(shè)計好的窗體中 然后在窗體里加了個打印的按鈕,對應(yīng)代碼如下 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.
繼續(xù)訪問
熱門推薦 開源:.NET環(huán)境下有關(guān)打印頁面設(shè)置、打印機(jī)設(shè)置、打印預(yù)覽對話框的實(shí)現(xiàn)與應(yīng)用(2)
!--google_ad_client = "pub-0022674553583619";google_ad_width = 728;google_ad_height = 90;google_ad_format = "728x90_as";google_ad_type = "text_image";google_ad_channel ="";google_color_
繼續(xù)訪問
vb.net 設(shè)置打印紙張與頁邊距_機(jī)關(guān)公文格式設(shè)置規(guī)范(最新整理版)
本方法根據(jù)《黨政機(jī)關(guān)公文格式國家標(biāo)準(zhǔn)》(GB/T9704-2012)制定。具體內(nèi)容如下：一、辦公軟件要求適用于微軟OFFICE—WORD文字處理軟件。二、頁面設(shè)置1.選擇“文件”——“頁面設(shè)置”選擇“頁邊距”附簽，上：3.7厘米，下：3.5厘米，左：2.8厘米，右：2.6厘米。2.選擇“紙張”附簽，“紙張大小”設(shè)成“A4”。3.選擇“版式”附簽，將“頁眉和頁腳”設(shè)置成“奇偶頁不同”,在該...
繼續(xù)訪問
VB.NET EXCEL 操作
實(shí)現(xiàn)打印功能的核心是PrintDocument類這個類屬于System.Drawing.Printing名字空間這個類封裝了當(dāng)前的打印設(shè)置頁面設(shè)置以及所
有的與打印有關(guān)的事件和方法
這個類包括以下幾個屬性 事件 和方法
1、PrinterSettings 屬性
存放打印機(jī)的設(shè)置信息這個屬性不需要程序員設(shè)置因?yàn)樗怯纱蛴υ捒颢@取的
2、PrintCountroller 屬性
控制打印過程
3、DefaultPageSettings 屬性
存放頁面設(shè)置信息 打印紙大小方向等也不需要程序員設(shè)置因?yàn)樗怯身撁嬖O(shè)置對話框獲取的
4、DocumentName 屬性
指定文檔名稱，出現(xiàn)在打印機(jī)狀態(tài)窗口中
1。 BeginPrint事件
在打印之前發(fā)出
2. PrintPage事件
每打印一頁是發(fā)出，事件接受一個PrintPageEventArgs參數(shù)該參數(shù)封裝了打印相關(guān)的信息
PrintPageEventArgs參數(shù)有很多重要的屬性
1 Cancel 取消打印
2 Graphics 頁面的繪圖對象
3 HasMorePages 是否還有要打印的頁面
Print 方法 該方法沒有參數(shù) 調(diào)用它將按照當(dāng)前設(shè)置開始打印
若實(shí)現(xiàn)打印功能首先構(gòu)造PrintDocument對象添加打印事件
PrintDocument printDocument;
private void InitializeComponent()
{
...
printDocument=new PrintDocument();
printDocument.PrintPage += new PrintPageEventHandler (this.printDocument_PrintPage);
...
}
實(shí)現(xiàn)打印事件功能
打印和繪圖類似都是調(diào)用Graphics 類的方法進(jìn)行畫圖 不同的是一個在顯示器上一個在打印紙上并且打印要進(jìn)行一些復(fù)雜的計算
如換行 分頁等。
private void printDocument_PrintPage(object sender,PrintPageEventArgs e)
{
StringReader lineReader = new StringReader(textBox.Text);
Graphics g = e.Graphics; //獲得繪圖對象
float linesPerPage = 0; //頁面的行號
float yPosition = 0; //繪制字符串的縱向位置
int count = 0; //行計數(shù)器
float leftMargin = e.MarginBounds.Left; //左邊距
float topMargin = e.MarginBounds.Top; //上邊距
string line = null; 行字符串
Font printFont = this.textBox.Font; //當(dāng)前的打印字體
SolidBrush myBrush = new SolidBrush(Color.Black);//刷子
linesPerPage = e.MarginBounds.Height / printFont.GetHeight(g);//每頁可打印的行數(shù)
//逐行的循環(huán)打印一頁
while(count linesPerPage ((line=lineReader.ReadLine()) != null))
{
yPosition = topMargin + (count * printFont.GetHeight(g));
g.DrawString(line, printFont, myBrush, leftMargin, yPosition, new StringFormat());
count++;
}
如果本頁打印完成而line不為空說明還有沒完成的頁面這將觸發(fā)下一次的打印事件在下一次的打印中l(wèi)ineReader會
自動讀取上次沒有打印完的內(nèi)容因?yàn)閘ineReader是這個打印方法外的類的成員它可以記錄當(dāng)前讀取的位置
if(line != null)
e.HasMorePages = true;
else
e.HasMorePages = false;
}
打印設(shè)置，構(gòu)造打印對話框 將對話框中設(shè)置的Document屬性賦給printDocument這樣會將用戶的設(shè)置自動保存到printDocument
的PrinterSettings屬性中
protected void FileMenuItem_PrintSet_Click(object sender,EventArgs e)
{
PrintDialog printDialog = new PrintDialog();
printDialog.Document = printDocument;
printDialog.ShowDialog();
}
頁面設(shè)置和打印預(yù)覽與打印設(shè)置原理相同都是構(gòu)造對話框?qū)⒂脩粼趯υ捒蛑械脑O(shè)置保存到相應(yīng)的類的屬性中
protected void FileMenuItem_PageSet_Click(object sender,EventArgs e)
{
PageSetupDialog pageSetupDialog = new PageSetupDialog();
pageSetupDialog.Document = printDocument;
pageSetupDialog.ShowDialog();
}
打印預(yù)覽
protected void FileMenuItem_PrintView_Click(object sender,EventArgs e)
{
PrintPreviewDialog printPreviewDialog = new PrintPreviewDialog();
printPreviewDialog.Document = printDocument;
try
{
printPreviewDialog.ShowDialog();
}
catch(Exception excep)
{
MessageBox.Show(excep.Message, "打印出錯", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
打印就可以直接調(diào)用printDocument的Print()方法因?yàn)橛脩艨赡茉诖蛴≈斑€要再更改打印設(shè)置所以
在這里再次顯示打印設(shè)置對話框
protected void FileMenuItem_Print_Click(object sender,EventArgs e)
{
PrintDialog printDialog = new PrintDialog();
printDialog.Document = printDocument;
lineReader = new StringReader(textBox.Text);
if (printDialog.ShowDialog() == DialogResult.OK)
{
try
{
printDocument.Print();
}
catch(Exception excep)
{
MessageBox.Show(excep.Message, "打印出錯", MessageBoxButtons.OK, MessageBoxIcon.Error);
printDocument.PrintController.OnEndPrint(printDocument,new PrintEventArgs());
}
}
}
總結(jié)打印的過程是
1 在應(yīng)用程序窗體初始化時構(gòu)造PrintDocument對象 添加 printDocument 的 PrintPage 方法
2 實(shí)現(xiàn)PrintPage方法 4 在用戶的單擊事件中調(diào)用 printDocument 的 Print方法實(shí)現(xiàn)打印功能
在這中間可能要用到 PrintDialog PrintPreviewDialog PageSetupDialog 設(shè)置和查看打印效
重慶分公司
重慶分公司
