- 博客(5)
- 资源 (2)
- 收藏
- 关注
RSS订阅原创 VB dde 编程完整 源码
FrmMain.frmVERSION 5.00Begin VB.Form FrmMain Caption = "DDEsvr" ClientHeight = 1425 ClientLeft = 60 ClientTop = 345 ClientWidth = 4020 L...
2019-09-12 14:49:17
1129
原创 vba将一个excel文件中一列中所有的项导入另一个excel文件
PrivateSubCommandButton1_Click()Application.ScreenUpdating=FalseDimwk1AsWorkbook,sh1AsWorksheet,wk2AsWorkbook,sh2AsWorksheetFilename=Application.GetOpenFilename(fil...
2019-09-12 14:42:00
3062
1
原创 asp获取微信公众号用户的头像和微信名及openid源码
<script language="jscript" runat="server">function getjson(str){try{eval("var jsonStr = (" + str + ")");}catch(ex){var jsonStr = null;}return jsonStr;}</script><%'===========...
2019-09-12 14:41:06
751
1
原创 快速排序
#include<stdio.h>void quickSort(int a[],int left,int right){ int i=left; int j=right; int temp=a[left]; if(left>=right) return; while(i!=j) { while(i<j&&a[...
2019-09-12 14:37:05
162
原创 VB与rs485
Option ExplicitDim a1 As String '定义a1为全局变量Dim bytData(1) As BytePrivate Sub cmdSend_Click()Call SendData(bytData)End SubPublic Function SendData(ByRef bytData() As Byte) As LongOn Error Resume ...
2019-09-12 14:31:35
937
vb vb6 vb6.0 dde 通信 绝对可用 伪多线程 进程外 源码
2019-08-14
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人