|
|||
|
摘要：
【简 介】TextBox 是以 vbCr+vbLf 为分行符号， 如果我们要逐一读取 TextBox 每一行， 无非是寻找 vbCr+vbLf 的所在位置， 然后取出每一行的字串， 不过这个方法不快，而且如果我们要读取第 N 行数据，还是要从第 1、2、…N-1 行逐一读起，实在麻烦。 还好 Windows API 提供有读取 TextBox 第 N 行的功能细节如下： 1、API 的声明： Public Const EM_GETLINE = amp;HC4 Public Const EM_LINELENGTH = amp;HC1 Public Const EM_LINEIND 阅读全文
posted @ 2009-06-11 14:20 随风飘零0 阅读(289) 评论(0) 推荐(0) 编辑
摘要：
modPing.basAttribute VB_Name = "modPing"'modPing'MsgBox IPValid("10.167.133.205")Option ExplicitPrivate Const IP_STATUS_BASE = 11000Private Const IP_SUCCESS = 0Private Const IP_BUF_TOO_SMALL = (11000 + 1)Private Const IP_DEST_NET_UNREACHABLE = (11000 + 2)Private Const IP_DEST_HOST_UNREACHABLE = (110 阅读全文
posted @ 2009-06-05 13:11 随风飘零0 阅读(558) 评论(0) 推荐(0) 编辑
摘要：
工程1.vbpType=ExeReference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\WINDOWS\system32\STDOLE2.TLB#OLE AutomationModule=modPub; modPub.basClass=clsCommand; clsCommand.clsClass=clsWaitableTimer; clsWaitableTimer.clsStartup="Sub Main"HelpFile=""Title="PcControl"ExeName32="pccontrol.exe" 阅读全文
posted @ 2009-05-25 22:14 随风飘零0 阅读(163) 评论(0) 推荐(0) 编辑
摘要：
文字?語彙 (100点 35分) 問題Ⅰ の ことばは どう 読み なすか。１．２．３．４から いちばん いい ものを 一つ えらびなさい。 （例(れい)）じゅぎょうは さっき 終わった。 終わった １ おわった ２ さわった ３ まわった ４ くわわった （解答用紙(かいとうようし)） （例(れい)） ● ② ③ ④ 問１ その ［１］黒い カメラで ［２］写して ください。 ［１］黒い １ しろい ２ あかい ３ あおい ４ くろい ［２］写して １ しゃして ２ かえして ３ うつして ４ とりして 問２ きのう ［３］薬を 飲みました。 ［３］ 阅读全文
posted @ 2009-05-25 01:08 随风飘零0 阅读(216) 评论(0) 推荐(0) 编辑
摘要：
こんにちは。你好。 こんばんは。晚上好。おはようございます。早上好。お休(やす)みなさい。晚安。お元気(げんき)ですか。您还好吧，相当于英语的“How are you”，一种打招呼的方式。いくらですか。多少钱？すみません。不好意思，麻烦你…。相当于英语的“Excuse me”。用于向别人开口时。ごめんなさい。对不起。どういうことですか。什么意思呢？山田さんは中国語(ちゅうごくご)が上手(じょうず)ですね。山田的中国话说的真好。まだまだです。没什么。没什么。（自谦）どうしたの。どうしたんですか。发生了什么事啊。なんでもない。没什么事。ちょっと待ってください。请稍等一下。約束(やくそく)します。就 阅读全文
posted @ 2009-05-24 02:04 随风飘零0 阅读(206) 评论(0) 推荐(0) 编辑
摘要：
CMD::shutdown /s /f /t 0::CMDVBS::set wsShell=createobject("wscript.shell"):wsShell.Popup "准备启动word，请等待...1234",3,"test",vbinformation:wsShell.run "winword":wscript.sleep 3000:wsShell.sendkeys "你好啊？"::VBSset wsShell=createobject("wscript.shell"):wsShell.Popup "me want open the word.exe,wait...",3,"t 阅读全文
posted @ 2009-05-19 12:40 随风飘零0 阅读(155) 评论(0) 推荐(0) 编辑
摘要：
frmMain.frmVERSION 5.00Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"Object = "{BCA00000-0F85-414C-A938-5526E9F1E56A}#4.0#0"; "CASMUI.dll"Begin VB.Form frmMain Caption = "FileMonitor" ClientHeight = 8235 ClientLeft = 60 ClientTop = 630 ClientWidth = 9195 Icon = "frmMain.frx" 阅读全文
posted @ 2009-05-15 20:31 随风飘零0 阅读(305) 评论(0) 推荐(0) 编辑
摘要：
VERSION 5.00Begin VB.Form frmInputDlg Caption = "Input Dialog" ClientHeight = 1590 ClientLeft = 60 ClientTop = 345 ClientWidth = 5940 Icon = "frmInputDlg.frx":0000 LinkTopic = "Form2" ScaleHeight = 1590 ScaleWidth = 5940 StartUpPosition = 1 'CenterOwner Visible = 0 'False Begin VB.TextBox txtConten 阅读全文
posted @ 2009-05-12 12:39 随风飘零0 阅读(214) 评论(0) 推荐(0) 编辑
摘要：
JP2CH.vbpType=ExeReference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\WINDOWS\system32\stdole2.tlb#OLE AutomationObject={EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}#1.1#0; shdocvw.dllReference=*\G{00000205-0000-0010-8000-00AA006D2EA4}#2.5#0#..\..\..\..\Program Files\Common Files\system\ad 阅读全文
posted @ 2009-04-24 18:25 随风飘零0 阅读(234) 评论(0) 推荐(0) 编辑 |
|||
