vb.net Document_PrintPag 打印

我帮你把最后一部分的语句顺序调换一下。你试一试

让客户满意是我们工作的目标，不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户，将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴，公司提供的服务项目有：空间域名、虚拟空间、营销软件、网站建设、重庆网站维护、网站推广。

sub button1_click() '---执行打印

Dim pd As PrintDocument = New PrintDocument

pd.PrinterSettings = PrintDialog1.PrinterSettings

If _PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

for i=0 to 1 '这样可以两次截图

CaptureScreen() '--执行前面自定义函数截图

AddHandler pd.PrintPage, AddressOf Document_PrintPage

pd.Print()

Threading.Thread.sleep(100) ‘ 再加上一个间隔

next

end sub

vb.net 打印预览分页

病情分析：

您好，你经常头晕估计是与血压偏低是有关系的。

指导意见：

你可以吃点蜂王浆或生脉饮调理，平时要积极参加体育锻炼，改善体质，增加营养，多喝水，多吃汤。

病情分析：

你好，你的情况属于低血压引起的症状，一般会引起经常头晕乏力和眼花等症状，你的情况需要积极治疗的的

指导意见：

你的情况我建议首先就要注意休息，清淡温热易消化饮食很关键的，建议你用人参炖鸡汤服用看看，多吃红枣和枸杞等食物，积极参加体育锻炼，祝你健康

病情分析：

你好!根据你的资料初步考虑,你的头晕和你的血压偏低相关。血压偏低时改变体位会导致的一过性脑供血不足，其临床特点是头晕,睡眠障碍,记忆力减退三大症状,还有顶枕部头痛,轻瘫,言语障碍、情绪易激动等表现,一般病情缓慢发展,此类头晕的特点是在体位转变时容易出现或加重，如由平卧突然坐起，或者是下蹲后突然站立等动作。头晕可分为两类：一为旋转性眩晕,多由前庭神经系统及小脑的功能障碍所致,以倾倒的感觉为主,感到自身晃动或景物旋转。二为一般性晕,多由某些全身性疾病引起,以头昏的感觉为主,感到头重脚轻。如贫血、体质衰竭等。

指导意见：

建议做全身体检,测血压,血糖,血常规,做头颅、颈椎CT等,寻找原因,对症治疗。避免劳累,减轻心理负担,积极配合治疗,增强免疫力。祝你健康！

头晕可能是感冒，颈椎病，贫血，美尼尔氏综合征，心律失常,休息的时间和质量不好,都是可能导致的，需要找到原因，针对性的治疗才行。

头晕可能是感冒,颈椎病,贫血,美尼尔氏综合征,心律失常,休息的时间和质量不好,都是可能导致的,需要找到原因,针对性的治疗

你好,血压只是低些而没有不适症状一般不需要处理,如果感到不适或伴有其他症状就医治疗了,建议服用生脉饮口服液或者脑心舒口服液治疗.希望回答可以对您有帮助

可能是感冒，贫血，美尼尔氏综合征，心律失常,休息的时间和质量不好,都是可能导致的，需要找到原因，针对性的治疗。

头晕原因很多，一般有颈椎病，贫血，美尼尔氏综合征，心律失常,，腔隙性脑梗塞等，建议你去医院检查，确诊病因才能有效治疗。

您好，头晕还要结合一下血脂等情况，根据具体原因采取治疗措施，

vb.net listview 分页

用pageDataSource类

与DataSource用法差不多

由于DataList本身没有带分页功能，pageDateSource祢补了这个不足，你可以当作DateSource来使用，没有太大区别

using System;

using System.Data;

using System.Configuration;

using System.Web;

using System.Web.Security;

using System.Web.UI;

using System.Web.UI.WebControls;

using System.Web.UI.WebControls.WebParts;

using System.Web.UI.HtmlControls;

using System.Text.RegularExpressions;

public partial class _Default : System.Web.UI.Page

{

SqlHelper MySqlHelper = new SqlHelper(); // 我写的数据库操作方法集，创建一个实例

Operation MyOperation = new Operation(); // 我写的网站通用处理方法集，创建一个实例

protected void Page_Load(object sender, EventArgs e)

{

if (!IsPostBack)

{

GbookData();

lb_count.Text = MySqlHelper.MyScalar("SELECT COUNT(*) FROM BBS WHERE BBS_IsDisplay = '1'"); // 记录条数

}

}

protected void GbookData() // 分页程序代码

{

string strURL = Request.RawUrl;

int intPage = 1;

PagedDataSource MyPager = new PagedDataSource();

MyPager.DataSource = MySqlHelper.MyDS("SELECT * FROM BBS WHERE BBS_IsDisplay = '1' ORDER BY BBS_ID DESC").Tables["MyTable"].DefaultView;

MyPager.PageSize = 9;

MyPager.AllowPaging = true;

hpl_first.Enabled = true;

hpl_up.Enabled = true;

hpl_down.Enabled = true;

hpl_end.Enabled = true;

if (strURL.Contains("/Page/"))

{

string strPage = strURL.Substring(strURL.LastIndexOf("/Page/") + 6);

if (strURL.Substring(strURL.LastIndexOf("/")) == "/")

{

Response.Redirect("NoAccess.htm");

}

if (Regex.IsMatch(strPage, "\\d"))

{

int thisPage;

try

{

thisPage = Convert.ToInt32(strURL.Substring(strURL.LastIndexOf("/Page/") + 6));

if (thisPage 1 || thisPage MyPager.PageCount)

{

Response.Redirect("NoAccess.htm");

}

else

{

intPage = thisPage;

}

}

catch

{

Response.Redirect("NoAccess.htm");

}

}

else

{

Response.Redirect("NoAccess.htm");

}

}

hpl_first.NavigateUrl = "~/GuestBook/Page/1";

hpl_up.NavigateUrl = "~/GuestBook/Page/" + (intPage - 1).ToString();

hpl_down.NavigateUrl = "~/GuestBook/Page/" + (intPage + 1).ToString();

hpl_end.NavigateUrl = "~/GuestBook/Page/" + MyPager.PageCount;

MyPager.CurrentPageIndex = intPage - 1;

Repeater_1.DataSource = MyPager;

Repeater_1.DataBind();

if (MyPager.IsFirstPage)

{

hpl_first.Enabled = false;

hpl_up.Enabled = false;

}

if (MyPager.IsLastPage)

{

hpl_down.Enabled = false;

hpl_end.Enabled = false;

}

lb_thispage.Text = intPage.ToString(); // 当前页码

lb_totalpage.Text = MyPager.PageCount.ToString(); // 总页数

}

}

VB.NET或C#如何调用某个打印机（例如"Microsoft XPS Document Writer"）的“打印首选项”？

实现打印功能的核心是PrintDocument类这个类属于System.Drawing.Printing名字空间这个类封装了当前的打印设置页面设置以及所

有的与打印有关的事件和方法

这个类包括以下几个属性 事件 和方法

1、PrinterSettings 属性

存放打印机的设置信息这个属性不需要程序员设置因为它是由打印对话框获取的

2、PrintCountroller 属性

控制打印过程

3、DefaultPageSettings 属性

存放页面设置信息 打印纸大小方向等也不需要程序员设置因为它是由页面设置对话框获取的

4、DocumentName 属性

指定文档名称，出现在打印机状态窗口中

1。 BeginPrint事件

在打印之前发出

2. PrintPage事件

每打印一页是发出，事件接受一个PrintPageEventArgs参数该参数封装了打印相关的信息

PrintPageEventArgs参数有很多重要的属性

1 Cancel 取消打印

2 Graphics 页面的绘图对象

3 HasMorePages 是否还有要打印的页面

Print 方法 该方法没有参数 调用它将按照当前设置开始打印

若实现打印功能首先构造PrintDocument对象添加打印事件

PrintDocument printDocument;

private void InitializeComponent()

{

...

printDocument=new PrintDocument();

printDocument.PrintPage += new PrintPageEventHandler (this.printDocument_PrintPage);

...

}

实现打印事件功能

打印和绘图类似都是调用Graphics 类的方法进行画图 不同的是一个在显示器上一个在打印纸上并且打印要进行一些复杂的计算

如换行 分页等。

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; //行计数器

float leftMargin = e.MarginBounds.Left; //左边距

float topMargin = e.MarginBounds.Top; //上边距

string line = null; 行字符串

Font printFont = this.textBox.Font; //当前的打印字体

SolidBrush myBrush = new SolidBrush(Color.Black);//刷子

linesPerPage = e.MarginBounds.Height / printFont.GetHeight(g);//每页可打印的行数

//逐行的循环打印一页

while(count linesPerPage ((line=lineReader.ReadLine()) != null))

{

yPosition = topMargin + (count * printFont.GetHeight(g));

g.DrawString(line, printFont, myBrush, leftMargin, yPosition, new StringFormat());

count++;

}

如果本页打印完成而line不为空说明还有没完成的页面这将触发下一次的打印事件在下一次的打印中lineReader会

自动读取上次没有打印完的内容因为lineReader是这个打印方法外的类的成员它可以记录当前读取的位置

if(line != null)

e.HasMorePages = true;

else

e.HasMorePages = false;

}

打印设置，构造打印对话框 将对话框中设置的Document属性赋给printDocument这样会将用户的设置自动保存到printDocument

的PrinterSettings属性中

protected void FileMenuItem_PrintSet_Click(object sender,EventArgs e)

{

PrintDialog printDialog = new PrintDialog();

printDialog.Document = printDocument;

printDialog.ShowDialog();

}

页面设置和打印预览与打印设置原理相同都是构造对话框将用户在对话框中的设置保存到相应的类的属性中

protected void FileMenuItem_PageSet_Click(object sender,EventArgs e)

{

PageSetupDialog pageSetupDialog = new PageSetupDialog();

pageSetupDialog.Document = printDocument;

pageSetupDialog.ShowDialog();

}

打印预览

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);

}

}

打印就可以直接调用printDocument的Print()方法因为用户可能在打印之前还要再更改打印设置所以

在这里再次显示打印设置对话框

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());

}

}

}

总结打印的过程是

1 在应用程序窗体初始化时构造PrintDocument对象 添加 printDocument 的 PrintPage 方法

2 实现PrintPage方法 4 在用户的单击事件中调用 printDocument 的 Print方法实现打印功能

在这中间可能要用到 PrintDialog PrintPreviewDialog PageSetupDialog 设置和查看打印效

vb.net的 分页处理

两个方案，一，是通过控件来控制分页，就是先将数据全部读到缓存中，然后利用控件的每页显示数量以及下一页，上一页的跳转按钮控制。二，是利用数据库中的存储过程来实现，在存储过程中已经写好分页代码，每次读取的时候都只读取一定数量的信息！！

请教vb.net的打印分页问题，各位高手帮帮忙

简单，代码如下：

Print("...")

Print("---分页---")

Print("...")

网站标题：vb.net打印分页,c# printdocument 分页打印
网页地址：http://pwwzsj.com/article/hdgcpg.html