📄 010102.htm

📁 提供一个VB学习教程,入门级。来源于网上
💻 HTM
字号:
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>vb study</title>
<style>
<!--
td {font-size: 9pt}
A:link {text-decoration: none; color: #0033cc;font-size: 9pt}
A:visited {text-decoration: none; color: #0066CC;font-size: 9pt}
A:active {text-decoration: none; color: #ff0000; font-size: 9pt}
A:hover {text-decoration: underline; color: #000000;font-size: 9pt}
-->
</style>
</head>

<body>

<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" width="98%">
    <tr>
      <td width="100%"><a href="#">你的位置</a>：<a href="http://www.xxby.com" target="_blank">华生小屋</a>--<a href="#">VB学习</a>--<a href="#">基本控件</a></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center">通用属性</td>
    </tr>
    <tr>
      <td width="100%"><br>
        ★ 系统对象：就是在VB中已定义好的不用自行创建的，有：<br> 
        App对象：当前的应用程序。<br>
        Clipboard对象：Windows剪贴板。<br>
        Screen对象：显示屏幕。<br>
        Printer对象：系统打印机。<br>
        Debug对象：调试窗口（调试时用）。<br>
        Screen对象的属性：<br>
        active control:拥有焦点的控件。<br> 
        active form:拥有焦点的窗体。（仅限于本程序所包含窗体）<br> 
        TwipsPerPixelX:对象中每一水平象素的缇数。（好象是1象素=15缇）<br>
        TwipsPerPixelY:对象中每一垂直象素的缇数。（好象是15）<br>
        Clipboard剪贴板对象的方法：<br>
        clear方法：清空剪贴板。<br>
        粘贴文本gettext方法：返回剪贴板中的文本。（如text1.text=clipboard.gettext）<br>
        粘贴图象getdata方法：返回剪贴板中的图象文件。<br>
        复制文本settext方法：复制文本到剪贴板。clipboard.settext 文本，类型格式；可以利用"类型格式"参数来改变文本成bmp等图象格式，有意思。？？？<br> 
        复制图象setdata方法：使用指定的图形格式将图形保存到剪贴板。注：在使用本方法向剪贴板复制图象前，必须先用Clear方法清空剪贴板原有图象。如：<br>
        Clipboard .Clear<br> 
        Clipboard .SetData Picture1.Picture, 2<br> 
        其中参数2表示图形为bmp格式。&nbsp;<br>
        getformat方法：返回剪贴板中项目的格式。<br>
        剪贴板对象中项目格式有如下几种：vbCFtext(值为1)文本格式；vbCFBitmap(2)位图bmp格式；vbCFMetafile(3)图元文件wmf格式；vbCFDIB(8)与设备无关的位图格式（DIB），vbCFPalette(9)调色板格式；vbCFlink(&amp;HBF00)动态数据交互链。<br>
        检查剪贴板项目格式的例子如：<br>
        If Clipboard.GetFormat(vbCFText)=True then<br> 
        mnupaste.enabled=true<br>
        end if<br> 
        注：在剪贴板中可以同时包含文本和图象，互不干扰。<br>
        ★ 使用打印机打印：1，打印文本：Printer对象的print方法：格式：<br> 
        Printer . print 文本内容 如：Printer . print "李新宁"<br> 
        在使用print方法把文本输出到打印机前，还可对字体进行设置，如：<br>
        Printer.FontSize = 14<br> 
        Printer.Print "你好"<br> 
        字体的设置有FontName,FontUnderline等。<br>
        2，打印整个窗体：窗体的PrintForm方法，格式：Form对象。PrintForm.<br>
        将窗体客户区及其上可见的控件全部打印到纸上，如图形，表格等。能保留原来的位置和格式，如果要使某些控件（如按纽、表格线等）不打印到纸上，只要将其Visible属性设为False即可。如：<br>
        Command1.Visible = False<br> 
        Form1. PrintForm<br> 
        打印机对象Printer有以下一些属性方法：<br>
        NewPage方法:在打印作业中开始新的一页。<br>
        EndDoc方法：结束打印设置并将全部结果输出到打印机（真正打印开始）；<br>
        KillDoc方法：中断当前打印作业。<br>
        Page属性：打印时包含的页号。<br>
        如下例：<br>
        Printer . Print "" 初始化打印机，作好打印准备。<br> 
        Printer.FontName = "Arial" 设置字体&nbsp;<br>
        Printer.FontBold = True&nbsp;<br>
        Printer.Print Label1.Caption 用粗体打印标签label1中的文本<br> 
        Printer.FontBold = False<br> 
        Printer.Print Text1.Text 不用粗体打印文本框中文本<br> 
        Printer.EndDoc 结束打印设置并真正打印所有指定内容<br> 
        <br>
        ★ 各对象通用属性一则：tooltiptext属性--当鼠标在该对象上暂停时显示的小文本框，用于作一些对用户的提示。如：label1.tooltiptext="哇，太酷了！"，注意，弹出的小文本框不会自动消失，直到鼠标离开它，如果只是作短暂的提示，那么，就用一个timer对象吧。 
        <p align="center">
        <br>
        &lt; <a href="010101.htm">上一页</a>--<a href="http://www.xxby.com" target="_blank">华生小屋</a>--<a href="010103.htm">下一页</a> 
        &gt;<br>
        </p>
      </td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>
💿 文件大小 232 K
👤 上传用户 Sundaymorn
📂 所属分类其他
🏷️ 相关标签

#教程 #入门级
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -