zjkqxjsxb-优快云博客

原创 vb2010中ComboBox的item用法

以前使用combobox都是直接用items.add添加一些字符串，看提示add方法可以添加对象1.比如使用point对象，具有x,y属性，使用属性x作为显示文字ComboBox1.DisplayMember = "x"ComboBox1.Items.Add(New Point(100, 200))2.使用DictionaryEntry对象，具有key/value属性Comb...

2019-08-12 17:08:21 2063

转载 js中const,var,let区别

js中const,var,let区别js中三种定义变量的方式const， var， let的区别。1.const定义的变量不可以修改，而且必须初始化。1 const b = 2;//正确2 // const b;//错误，必须初始化 3 console.log('函数外const定义b：' + b);//有输出值4 // b = 5;5 // console.log('函数外...

2019-06-01 23:52:07 141

原创 vb.net读取另一程序的标准输出

访问一个进程的标准化输出Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click Dim p = New Process p.StartInfo.FileName = "ping" p.StartInfo....

2019-05-15 21:32:36 375

原创 Word中的域

DOCVARIABLE：使用的是activeDocument.Variables集合。例如添加一个变量ActiveDocument.Variables.Add "YourName","LiuJY"，插入域{DOCVARIABLE YourName}，运行宏后，显示变量值Sub aa()'' aa 宏'' ActiveDocument.Variables.Add "Your...

2018-10-11 10:43:51 1354

原创 vb.net如何打印文档

需要的组件Button1、PrintDocument1、PrintPreviewDialog1 Dim currentPage = 1 Dim totalPage = 3 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1....

2018-02-17 09:30:47 1211

原创小程序之include

include用于拷贝文件内容到当前视图，经测试不能动态引用，像这样无效。只能用block根据实际需要来显示了。display testinc: function () { this.setData({ v: 2}) }另外假如当前页面为a，目录下有a.js、a.wxml、a.wxss、x.wxml、y.wxml那么x.wxml和y.wxml

2018-01-27 14:44:46 4651

原创使用按键精灵添加edius的批输出列表

//作者：刘建勇//写作时间：2012.7.20//功能：自动添加批量列表//备注：若执行中出现问题，可能是edius反应太慢造成的，适当增加delay参数值 sa = Array("宣化", "宣化", "宣化", "万全", "怀安", "阳原", "涿鹿", "张北", "崇礼", "康保", "赤城", "蔚县") sb = Array("xh", "xhx", "

2012-07-20 10:46:25 1507

原创 premiere定时采集视频

按键精灵脚本设定一个时间（如12：00：00），采集10分钟。运行时打开采集窗口。//Premiere应用程序窗口// |_____MDIClient// |______采集主窗口// |______captureView// |______transportView//

2011-11-14 15:03:51 824

转载 Flash AS3 保存图片到本地

核心提示:如果你想保存从视频，图表或表格中获取的图片数据到本地，可以使用BitmapData类。原文地址：http://www.adobe.com/cfusion/communityengine/index.cfm?event=showdetails&produc

2011-09-16 11:41:40 1368

Library QuartzTypeLib C:/WINDOWS/system32/quartz.dll ActiveMovie control type libraryDim grp As New QuartzTypeLib.FilgraphManagerConst WS_CHILD = &H40000000Const WS_VISIBLE = &H10000000Private Sub Form_Load() Dim v As IVideoWindow

2011-03-21 11:50:00 1321

原创 linux笔记

linux的Cgcc abc.c 默认生成a.out./a.out 执行程序Perl：test.pl:#/usr/bin/perlprint(100);print("/n");perl test.plPython：中文支持，在头部加上# coding=cp936Java：HelloWorld.java 文件名和类名必须一致public class HelloWorld{ public static void m

2011-03-17 16:23:00 420

转载 C51中interrupt和using的用法——单片机

【引自http://www.cnblogs.com/xianghang123/archive/2011/02/24/1963699.html】void INT0（）interrupt 0 using 1{.........}interrupt 0 指明是外部中断0；interrupt 1 指明是定时器中断0； interrupt 2 指明是外部中断1；interrupt 3 指明是定时器中断1；interrupt 4 指明是串行口中断；using 0

2011-03-08 11:03:00 869

原创 python gtk入门

#!/usr/bin/env pythonimport pygtkpygtk.require('2.0')import gtkclass HelloWorld: def hello(self, widget, data=None): print "Hello World" def delete_event(self, widget, event, data=None): print "delete event occurred" return Fals

2011-02-25 16:53:00 7644

原创简单HTTP服务

Imports System.NetPublic Class Form1 Dim listener As HttpListener Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load listener = New System.Net.HttpListener() listener.Authent

2011-01-17 16:20:00 845

原创 vb2008：字符串

byteArray转换为string: Dim b(3) As Byte b(0) = &HCE b(1) = &HD2 b(2) = &HC3 b(3) = &HC7 Dim z As System.Text.Encoding z = System.Text.Encoding.GetEncoding("gb2312") Debug.Print(z.GetString(b))

2010-12-28 14:30:00 1081

原创 VB2008：数据绑定

打开一个数据库连接，获得其中一个表项。将label、textbox等部件的数据绑定的某属性(一般是text、tag属性)，选中数据表中的某一字段。高级选项允许为数据设置格式。绑定向导：BindingNavigator使用该部件方便数据浏览如使用代码移动数据库指针，可使用Me.EmployeesBindingSource.MoveNext (MoveFirst/MoveLa

2010-12-16 15:49:00 1577

原创 VB2008：菜单、工具条、状态栏

菜单设计： 窗体菜单 将MenuStrip拖入窗体，即可进行设计，双击某一项菜单，即可设计响应代码。 上下文菜单 将ContextMenuStrip拖入窗体，并进行设计。将使用到该菜单的部件的ContextMenuStrip属性中选入该菜单。 tooltip 将ToolTip拖入窗体，窗体各部件就会出现tooltip属性，填写提示短语即可。 工具条：ToolStrip 工具条

2010-12-14 11:13:00 1525

原创 vb2008入门：窗体绘图

form的绘图绘图准备，获得graphics对象一种方法： Dim a As Graphics a = Me.CreateGraphics() a.DrawLine(Pens.Blue, 0, 0, 100, 100)另一种方法：在paint事件中，直接使用e.Graphicspoint与rectangle：Dim m As Point m.X = 100 m.Y = 100Dim r As Rectangle r.X = 100

2010-12-14 10:01:00 2165 1

原创应用程序退出时的返回值

在批处理中使用%errorlevel%获得返回值 ping 10.54.2.139 echo %errorlevel%使用GetExitCodeProcess函数获取进程返回值Private Declare Function OpenProcess Lib "kernel32" _(ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, _ByVal dwProcessId As Long) As LongPrivate De

2010-10-09 15:20:00 1731

原创 vb中的定长字符串

定长字符串的定义方法：dim s as string *32后面的数字代表分配的长度s="adddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddp"如果超长赋值仅保留指定长度的前一部分若长度不足，在有效字符串后填充0字符（vbNullString）使用len方法测定长度，总返回定义时的长度以下示例读取配置文件中密码值a.ini文件内容[abc]password=87654321读取其中的密码#Private Declare

2010-09-29 15:37:00 3840

原创使用WIA获得扫描图像

Library WIALib C:/WINDOWS/system32/wiascr.dll Microsoft Windows Image Acquisition 1.01 Type Library Dim root As WiaSet root = New WiaDim dev As ItemSet dev = root.Devices.Item(0).CreateDim pic As Item

2010-09-08 15:25:00 2289

原创 python注册表操作

import winreg#打印子键def getSubKeys(k): i=0 while True: try: h=winreg.EnumKey(k,i) except: break finally: print(h) i=i+1def goBranch(s): a=s.split("/

2010-09-06 16:18:00 668

原创 JS对象查看

javascript:typeof(document): 获取对象类型，此结果等于objecttypeof(document.write):结果为functionfor(i in document)alert(i): 获得对象所有属性,包括函数for(i in this)alert(i):this应为全局对象或顶级对象for(i in document)s=s+"/n"+document[i];显示所有属性的值[以上document可换作任意对象]vb:typename:对象名称vartype:对象类型

2010-08-12 15:11:00 495

转载 IEEE 754 浮点二进制转换

定点数 定点数就是指小数点的位置固定不变，小数点的位置通常有两种约定方式：定点整数（纯整数，小数点在最低有效值位之后比如：100.）和定点小数（纯小数，小数点在最高有效数值位之前比如：.101）。 浮点数 浮点数是小数点位置不因定的数，它能表示更大范围。在浮点表示法中，阶码通常为带符号的纯整数，尾数为带符号的纯小数，浮点灵敏的表示格式如下： 阶符 | 阶码

2010-07-15 15:55:00 2818

转载 FPU指令集

FPU指令收集Data Transfer and ConstantsFLD src Load real: st(0) FILD src Load integer: st(0) FBLD src Load BCD: st(0) FLDZ Load zero: st(0) FLD1 Load 1: st(0) FLDPI Load pi: st(0) FLDL2T Load log2(10): st(0) FLDL2E Load log2(e): st(0) FLDLG2 Load log10

2010-07-14 09:53:00 3611

原创读取一封邮件

#python3.1 import poplib import base64 import email import email.header s=poplib.POP3_SSL('pop3.live.com',995) s.user('hyadv@hotmail.com') s.pass_('xxxxxxxxxxxxxx') #获取最新一封邮件 n = len(s

2010-06-02 11:01:00 683

zjkqxjsxb的专栏