重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

w5vb188net的简单介绍

目前VB的最新版本是多少

VB 是 COM (Common Object Model) 平台的

成都创新互联长期为上1000+客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为新丰企业提供专业的网站设计、网站建设新丰网站改版等技术服务。拥有十余年丰富建站经验和众多成功案例,为您定制开发。

VB.Net 是 .Net Framework 平台的

自从 VB6.0 以后,有 VB.Net、VB.Net 2002、VB 2005 和 VB 2008

目前最新版是 VB2008。

用 VB.Net 制作的程序运行时需要电脑安装 Microsoft .Net Framework 运行库。

和 Java 比较,VB 主要差在它的程序只能在 Windows 下运行,而 Java 的程序则可以跨平台。

一般的 Windows 下窗口程序 VB 都可以做出来。

VB中用什么代码打印文件啊,语句怎么写啊,

VB中的几种打印方法

1. 采用Visual Basic 提供的简单打印函数PrintForm 方法。应用程序窗体的PrintForm 方法时,Visual Basic 把窗体的位图送到当前打印机。该方法的优点在于它几乎不需要任何编程,但也有很大缺陷。最为突出的是当低分辨率图形在高分辨率打印机上打印时,其结果令人无法满意,会产生锯齿。下面代码将在打印机上打印窗体。

Private Sub Command1_Click() ' 用PrintForm 打印

Me.PrintForm ' 打印窗体的可见区域

End Sub

2. 用Printer 对象进行高分辨率输出。但要想产生复杂的打印输出,编程较为烦琐。Printer 对象代表系统缺省的打印机,Printer 对象支持许多由窗体和图形框所支持的属性和方法,三种对象都有画线和画方框。应用程序可用以下代码在Printer 对象上画出一平方英寸的方框。它离左上角二英寸。注意:打印机以twips 来测量距离。每英寸有1440 个twips。

Printer.Line(2 *1440,2 *1440) -Step(1440,1440), ,B

打印机、从窗体和图形框都有Circle、PaintPicture、Print、Pset、TextHeight、TextWidth 方法。使用这些方法,应用程序可以为打印机生成高分辨率输出。

打印文本直接用Print 方法,见下列代码:

Printer.Print "Hello,China ComputerWorld!" ' 打印字符串

Printer 对象还有一些窗体和图形框都没有方法:

NewPage 告诉打印机,程序对当前输出页的发送已经结束,Printer 对象应开始新的一页。

EndDoc 告诉VB,程序创建文档结束,VB 应将它发送到物理打印机上打印。

KillDoc 取消当前打印作业。应用程序应该终止由EndDoc 和KillDoc 所设定的每个打印作业。

Zoom 属性用于定义打印输出的缩放因子。

Copies 属性用于定义打印的副本数目。

3. 采用直接将数据传送打印机的方法进行打印输出。有两种方法将数据送往打印机。第一种是用Print #方法,就像将数据写入一个文件一样。另一种方法写端口,但不是送文本,而是送特定的PCL 语言,PCL 表示打印控制语言,它是一种特殊语言,用转义代码来控制打印机的具体动作。因为此方法太烦琐,本文不做太多介绍。

4. 如果你在编程时用到了RichTextBox 控制,那么你可以使用该控件的SelPrint 方法来打印,使用非常简单。下面一段代码即用RichTextBox 控件的SelPrint 方法来完成打印。

Private Sub Command3_Click() 'SelPrint 方法

CommonDialog1.Flags=cdlPDReturnDC +cdlPDNoPageNums

If RTF1.SelLength = 0 Then

'RTF1 为窗体的RichTextBox 控制

CommonDialog1.Flags = CommonDialog1.Flags

+cdlPDAllPages

Else

CommonDialog1.Flags = CommonDialog1.Flags +

cdlPDSelection

End If

CommonDialog1.CancelError = True

On Error Resume Next

CommonDialog1.ShowPrinter

If Err.Number = cdlCancel Then Exit Sub

If Err.Number 0 Then

Beep

MsgBox "Error printing file."

&vbCrLf +Err.Description, vbOKOnly +vbExclamation,

“Printing Error!"

Exit Sub

End If

Printer.Print ""

RTF1.SelPrint CommonDialog1.hDC

' 打印RTF1 控件的可见区域

End Sub

上面代码先进行打进设置,再进行打印。如果不需要设置,采用下面代码更为简单:

RTF1.SelPrint Printer.hDC

' 打印RTF1 控件的可见区域

5. 可以在VB 中调用Word 97 提供的OLE 自动化服务,利用Word 97 强大的打印功能来完成VB 打印,笔者认为这是最令人满意的方法。下面代码说明VB 如何与Word 集成。

Private Sub Command4_Click() ' 调用Word 打印

Dim objWord As Object

Const CLASSOBJECT = "Word.Application"

On Error GoTo objError

Set objWord = CreateObject(CLASSOBJECT)

objWord.Visible = True

objWord.Documents.Add

With objWord

.ActiveDocument.Paragraphs.Last.Range.Bold = False

.ActiveDocument.Paragraphs.Last.Range.Font.Size =20

.ActiveDocument.Paragraphs.Last.Range.Font.Name =

"黑体"

.ActiveDocument.Paragraphs.Last.Range.Font.ColorIndex==4

.ActiveDocument.Paragraphs.Last.Range.Text =

"我是计算机世界读者!"

End With

Clipboard.Clear

Clipboard.SetText

"通过剪切板向WORD 传送数据!"

objWord.Selection.Paste

objWord.PrintPreview = True ' 预览方式

'objWord.PrintOut' 执行打印

'objWord.Quit' 退出Word

Exit Sub

objError:

If Err 429 Then

MsgBox Str $(Err) &Error $

Set objWord = Nothing

' 不能创建Word 对象则退出

Exit Sub

Else

Resume Next

End If

End Sub

6. 用VC 编制DLL 模块完成打印。在VB 中调用该模块,用混合编程方法进行打印输出。因涉及VC 编程比较烦琐,这里不再讨论。

vb.net 用户登录

哈哈简单哪

第一步:登陆网页代码

第二步:登陆以后判断是否登陆成功

有两种方法:1.获取网页代码,判断网页字符有无”登陆成功”字样

源代码:

2.就是判断网页是否跳转到了某一页

源代码:

两种方法结合起来用,可以判断网页是否无法连接

请问VB总共有哪几种版本?我是初学者,我应该从哪种版本学起??请高手指点下??谢谢

现在用的比较多的有vb6.0和vb.net,其中vb.net又有很多版本。6.0算比较经典的,用的人比较多,但。net功能更强大,而且版本不断更新。而且用起来更方便。所以建议新学的话学vb.net。.net中2003版本用的比较多。但2003和vista,win7不兼容。另外,如果你考全国计算机二级的话,还是学6.0,因为考的是6.0。希望对你有帮助

初学者学习VB,哪个版本比较好

不建议你从VB6学起,因为VB.NET和VB差了太多,基本上算两个语言了。建议您先决定学老VB(VB6,不再更新,个人感觉比较弱,但是优点是系统自带VB的运行库)或者是VB.NET(一直更新,很强大,尤其是多线程完爆VB,另外VS的代码提示非常非常完善,写代码的时候会感觉到很舒服很痛快!VB.NET是为数不多的初学者越学越高兴而不是越痛苦的语言)。我推荐后者!

如果楼主想学后者,建议使用VB2010学习版(免费,比较小,够用),然后看微软的VB2008速成版的教程。


当前标题:w5vb188net的简单介绍
文章链接:http://cqcxhl.com/article/dooheoo.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP