a亚洲精品_精品国产91乱码一区二区三区_亚洲精品在线免费观看视频_欧美日韩亚洲国产综合_久久久久久久久久久成人_在线区

首頁 > 學院 > 開發設計 > 正文

VB編程步步高-打印篇(一)

2019-11-18 17:45:11
字體:
來源:轉載
供稿:網友
打印多頁RichText

  打印對象在處理RichTextBox時由于忽視了RichText代碼將不會工作得很好。為了打印RichTextBox,要使用SelPRint命令,但是SelPrint不是非常得友好,它按照自己的方式打印然后產生退紙動作。為了打印多頁RichText,要找到每一頁的開始和結束點,然后依此設置SelStart和SelLength,最后使用SelPrint打印出每一頁。以下是工作的每一個步驟:

  1、使用SaveFile命令保存編輯版本的文件。

  2、轉換編輯版本為打印版本:

遍歷這個文檔,修改SelIndent和SelRightIndent的數值,使之適合于打印機(注意:編輯時的縮進數值對于屏幕是合適的,但不適用于打印機)。
做些其他的修改,比如:添加頁眉,消除行號。
  3、使用SelPrint循環一次打印一個頁面。這里,計算行數是一個技巧,找到LFCRs是容易的,但是,也必須要計算一下行纏繞,它也算在了行統計中,以及絕對不允許發生的頁面溢出情況。

  4、使用SelRTF=""刪除打印版本。

  5、使用LoadFile重新啟動編輯版本。

  打印MSFlexGrid

  這里有一個快速打印MSFlexGrid控件內容的方法:

  Printer.PaintPictureMSFlexGrid_Name.Picture,0,0
Printer.EndDoc

  如果想打印滿頁面的整個長度,請在前面添加下面2個語句:

  Dimold_widthasInteger
MSFlexGrid_Name.width=printer.width

  然后,再在尾部添加:

  MSFlexGrid_Name.width=old_width->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 欧美精品一区二区三区蜜桃视频 | 蜜臀91精品国产高清在线观看 | 超碰免费av | 天天草天天色 | 欧美a在线观看 | 午夜影院普通用户体验区 | 美女福利视频网站 | 成人tv888 | 日韩视频一区二区三区四区 | 日韩激情一区二区 | 午夜精品久久久久久久久久久久 | 欧美日韩三区 | 久久久久一区二区三区 | 欧美精品久久 | 成人亚洲精品久久久久软件 | 欧美在线一区二区 | 国产成人在线一区二区 | 国产欧美精品一区二区色综合朱莉 | 亚洲视频一区二区 | 日韩中文字幕av | 黄色网址视频在线观看 | 久久国产精品免费一区二区三区 | 国产主播一区 | 国产精品自产拍在线观看 | 久久亚洲美女视频 | 国产 在线 | 日韩 | 婷婷色狠狠 | 久久久久91 | 国产成人视屏 | 日韩不卡一区二区三区 | www国产亚洲精品久久网站 | 超碰在线影院 | 亚洲一区二区视频在线观看 | 日本高清一区 | 日韩伦理一区二区三区 | 久久一二区 | 精品一区二区三区免费视频 | 午夜精品久久久久久久久久久久 | 九久久久久 | 久热亚洲| 在线成人www免费观看视频 |