textbox的值为空或没有更改时，按下回车键textbox会失去焦点此时用textbox1.setfocus不能使textbox1重新获取焦点Private Sub Textbox1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode =...
分类：
其他好文 时间：
2015-09-06 12:25:29
阅读次数：
155
Private Sub Form_Load()Dim sc As ObjectSet sc = CreateObject("ScriptControl")sc.Language = "VBScript"S = sc.Eval("123 + 4")'或S = sc.Eval("123" & "+" &...
分类：
其他好文 时间：
2015-09-06 10:57:19
阅读次数：
183
1 #include 2 using namespace std; 3 class Base{ 4 public: 5 void m() 6 { 7 cout f();29 base->m();30 }上述是以Base为基类,并且Sub派生了Base,同时复...
分类：
编程语言 时间：
2015-09-06 01:08:10
阅读次数：
298
#include<iostream>
using?namespace?std;
//匹配字符串。能匹配子串在原始字符串中所有出现的位置的开始下标，下标以0开始。
int?match(int?i,?int?n,?const?char?*ori,?const?char?*sub)
{
?int?...
分类：
编程语言 时间：
2015-09-05 22:25:00
阅读次数：
236
strstr函数：返回主串中子字符串的位置后的所有字符。#include const char *my_strstr(const char *str, const char *sub_str){ for(int i = 0; str[i] != '\0'; i++) { i...
分类：
其他好文 时间：
2015-09-05 19:19:33
阅读次数：
117
今天遇到了这个错误……真是弄了好久……在处理时有错误发生：
open-vm-tools
open-vm-tools-dkms
open-vm-dkms
E: Sub-process /usr/bin/dpkg returned an error code (1)解决办法：sudo apt-get autoremove open-vm-dkms open-vm-tools --purge这大概就...
分类：
系统相关 时间：
2015-09-04 14:21:57
阅读次数：
248
Public Sub Main() ' ' Add your code here ' Dim sbWA As New StringBuilder Dim i As Integer Dim arWA As New Collections.ArrayList Dim bEOF As Boolean Fo...
分类：
其他好文 时间：
2015-09-04 14:10:59
阅读次数：
166
对于Meteor应用来说，模型是不透明的，即，虽然在后端进行建模和模型操作、业务操作控制，前端仍然需要了解模型结构以正确进行前端业务。前端与数据的关系，主要有变更和查询两类。前端若要执行数据变更，需要调用后端提供的methods（参考）。前端对数据的查询，主要通过pub/sub模型来实现。后端可以有...
分类：
其他好文 时间：
2015-09-04 07:18:21
阅读次数：
154
Class TCSCConverter Private Word, Doc Private Sub Class_Initialize() Set Word = CreateObject("Word.Application") End Sub Pr...
分类：
其他好文 时间：
2015-09-03 14:02:18
阅读次数：
163
源代码文件main3.c 1 #include 2 #include "static_lib.h" 3 #include "fun.h" 4 5 int main(void){ 6 int a=2,b=3; 7 printf("add:%d sub:%d mul:%d div:%...
分类：
其他好文 时间：
2015-09-03 13:59:50
阅读次数：
164
