- 博客(150)
- 资源 (2)
- 收藏
- 关注
原创 获取网页内容(http)
//获取网页内容mainForm.btn_GetWeb.oncommand = function(id,event){ var ls_url; var o_nr; var ls_text; ls_url = mainForm.edt_rul.text; var o_http = inet.http(); o_nr = o_http.get(ls_url); ls_text = string.fromto(o_nr); //转换字符串模式 mainForm.edt.
2021-09-09 17:31:53
201
转载 窗体之间的通信,与模态窗体的通信的两种方式
窗体之间的通信,与模态窗体的通信的两种方式Byadminat 2018-02-11 • 0人收藏 • 1623人看过父窗口代码如下: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27..
2021-08-25 15:46:03
323
转载 多窗口变量传递
多窗口变量传递多窗口交互的方法将窗体对象赋值到全局变量,就可以在其他代码文件中直接使用了。例如主窗体我们一般这样写:mainForm = win.form(text="使用选项卡控件";right=599;bottom=399)注意一个程序中只有主窗体命名为 mainForm 。但大多时候,我们应当把其他窗体对象赋值以局部变量,例如:var frmTabPage1 = win.form(text="选项卡的子窗口";right=599;bottom=399)上面的 var 语句声明一个局部变
2021-08-25 15:37:39
472
原创 Aardio消息窗口
Aardio消息窗口importwin;varid = win.msgbox("三个按钮","标题",0x3/*_MB_YESNOCANCEL*/)参考标准库函数:namespacewin { msgboxErr =function(str,title ="错误",hwndOwner=0 ){ returnmsgbox( str,title,0x10/*_MB_ICONHAND*/); } msgboxTest =func...
2021-08-19 14:58:54
789
原创 vba clear清除公式、内容、格式的使用
vba clear清除公式、内容、格式的使用一、清除所有属性Sheet9.Cells.Clear清除默认表Y1:Z10这个范围的所有属性Range("Y1:Z10").Clear所指定的范围的单元格中的格式、值、批注等全部被清空。二、清除指定范围的格式Sheet9.Cells.ClearFormats清除默认表Y1:Z10这个范围的单元格的格式Range("Y1:Z10").ClearFormats注意哦,ClearFormats只清除格式,比如字体、字号、加
2021-08-10 10:45:32
8074
原创 用 For Each 遍历区域内所有单元格
Sub aaa() Dim rng As Range Dim index As Long index = 0 For Each r In Range("a1:d5") r.Value = index index = index + 1 NextEnd Sub
2021-08-08 10:29:57
856
转载 VBA语句集100句
VBA语句集100句 (Word VBA)http://you613.blog.163.com/blog/static/59514692009116114431678/- - - - - - - - - - - - - - - - - - - -Application对象- - - - - - - - - - - - - - - - - - - -(301) Application.ActivePrinter ‘获取当前打印机(302) Application.Height '当前应用程序文档
2021-07-21 11:06:16
561
原创 VBA获取区域的起始行、结束行
用到的属性Range.MergeArea,返回 Range 对象,代表包含指定单元格的合并的范围。如果指定的单元格不在合并的范围内,则该属性返回指定的单元格。只读。Variant类型。Range.Address,以宏语言返回区域引用。String 类型,只读。如::$A$3:$A$10o_xls.Visible = TRUEo_xls.WindowState = -4140 //最小化o_WorkBook = o_xls.Workbooks.Open(ls_FileName)o
2021-07-21 11:00:10
2636
转载 Word查找和替换通配符(完全版)
Word查找和替换通配符(完全版)Word查找栏代码·通配符一览表 序号 清除使用通配符复选框 勾选使用通配符复选框 特殊字符 代码 特殊字符 代码or通配符 1 任意单个字符 ^? 任意单个字符 ? 2 任意数字
2021-07-20 08:40:11
1596
原创 VBA获取所有Sheet名字
oleobject o_WorkBooklong ll_Row,ll_RowCount,ll_NewRowString ls_SheetNameo_WorkBook = Message.PowerObjectParmll_RowCount = o_WorkBook.Worksheets.CountFOR ll_Row = 1 TO ll_RowCount ls_SheetName = o_WorkBook.WorkSheets(ll_Row).Name ll_Ne...
2021-07-16 17:36:31
1354
转载 用VBA得到EXCEL表格中的行数和列数
用VBA得到EXCEL表格中的行数和列数 每种方法中上面的是 Excel的行数,下面的是 Excel的列数。方法1: ActiveSheet.UsedRange.Rows.Count ActiveSheet.UsedRange.Columns.Count 缺点:有时可能会比实际数大一些,原因是如果你把最后几行(列) 数据清除后(非整行或整列删除),用这个命令仍返回未清除前的值。就是说现在虽然是空的,但是你曾经用过也算你的。方法2: ActiveSheet.Rang...
2021-07-05 13:59:09
3359
原创 直接使用备份文件生成新的数据库
--备份BACKUP DATABASE LeaRunFramework_Base_2016 TO DISK = 'c:\DB_BACKUP\LenborMealOrder_Base_2017.bak'--还原RESTORE DATABASE Members_01 FROM DISK = 'c:\DB_BACKUP\LenborMealOrder_Base_2017.bak' WITH MOVE 'LenborMealOrder_Base_2017' TO 'c:\DB_BACKUP\M...
2021-02-21 10:53:16
136
转载 格式化字符串
格式化字符串格式化函数string.format用来格式化字符串(按指定的规则连接字符串或输出其他变量并返回新的字符串) 。使用方法与C语言的printf函数相同(实际上很多编程语言中都有同样的格式化函数).str = string.format(fm,...);第一个参数用fm表示输出的格式,每个%符号后面是一个格式化表达式,每个格式化表达式按顺序对应后面的参数。所以用了N个格式化表达式,就必须在后面添加N个参数。下面是一个简单的例子:int = 123;str = "字符串
2021-01-26 13:26:26
231
原创 aadio读写ini文件
import fsys.ini var strTemp; ini = fsys.ini("E:\Test\aardio\aaa.ini"); //写 ini.write("节1","项1","aaa1"); ini.write("节1","项2","bbb2"); //读 strTemp = ini.read("节1","项1"); mainForm.edt_1.text = strTemp;
2021-01-21 15:11:00
478
转载 c# 转义字符
C#中转义字符[转]https://www.cnblogs.com/muran/p/3174865.html编程中很多细节问题我们都要十分的注意,要不一个小小的字母错误就能引起程序的无法运行。C#中转义字符分2中,一种是\,一种是@。@符号在C#中有两个作用作用1、在字符串的前面加@表示取消字符串中的转义例如stringpath=@"d:\root\subdir";作用2...
2020-03-07 11:48:00
2036
原创 C# 截屏并保存图片
public void fu_ScreenCut(String strFileName) { int nWidth, nHeight; //显示器宽度、高度 //获取显示器尺寸 nWidth = Screen.PrimaryScreen.Bounds.Width; nHeigh...
2020-03-07 09:14:43
1734
原创 c# 托盘程序
//类变量:private NotifyIcon notifyMonitor;窗体Load事件中初始化托盘程序 private void Form1_Load(object sender, EventArgs e) { notifyMonitor = new NotifyIcon(); notifyMoni...
2020-02-23 22:06:03
265
转载 Android Studio删除工程、项目的操作步骤
Android Studio删除工程、项目的操作步骤。移除工程主要用于从最近打开的项目列表中移除。硬盘中还是存在这个项目的。File——Close Project注意:不要点击项目。(点击项目就是打开项目了)最近打开的项目列表中就会少了刚才移除的项目。删除项目直接从硬盘中删除整个目录即可。转自:https://www.cnblogs.com/...
2020-01-26 20:21:27
8447
转载 Android开发中activity中传递数据的四种方式【收藏其他大佬的代码】
通过intent方式传递(1)传递字符串等发送端activity接收端activity(2)传递一个对象法1(Serializable是java中自带的方法数据存在内存中)传递activity中的代码,并且传递的对象必须接上Serializable这个接口如第二个图接收activity代码(3)传递一个对象法2(Serializable是android的方法数据存在...
2020-01-12 21:34:13
215
原创 Activity间传递参数【学习笔记,不带回调】
Activity间传递参数不带回调方法(显示意图)采用键值的方式:发送数据:public void btn_open_click(View v) { EditText edtName = (EditText)findViewById(R.id.edt_name); edtName.setText("张三"); Intent intSend = n...
2020-01-12 21:27:35
84
转载 Android Studio 快捷键
Android Studio 快捷键 转至 http://www.android-studio.org/index.php/docs/experience/142-androidstudio-shortcut-keysAlt+回车 导入包,自动修正Ctrl+N 查找类Ctrl+Shift+N 查找文件Ctrl+Alt+L 格式化代码Ctrl+Alt+O 优化...
2020-01-12 11:06:27
99
转载 android studio 添加按钮事件的三种方法
方法一:1.在布局中添加一个按钮,ID为button2.在MainActivity.Java中的头文件中添加importAndroid.widget.*;3.在主类中添加按钮和其他所需类TextView textview;Button button;4.获取按键ID,在onCreat中添加按钮监听函数Button myButton2 = (Butt...
2020-01-01 22:22:29
4595
转载 AS版本报错的处理
Failed to resolve:com.android.support:appcompat-v7:报错处理2017-10-29 14:44:22低-调阅读数 136562更多分类专栏:Android studio 常见报错处理版权声明:本文为博主原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接和本声明。本文链接:https://blog.csdn...
2019-12-21 17:15:57
281
转载 pb dw使用技巧
pb dw使用技巧1.如何让存储文件目录的列,显示图片?答:选择对应的column的display as picture属性为true 2、如何复制grid类型的所选择的行的数据到系统剪切板?答:string ls_selectedls_selected=dw_1.Object.DataWindow.Selected.Dataclipboard(ls_selected)...
2019-04-17 08:46:59
935
转载 PB指定某行某列的颜色属性值uf_setcell_color
PB指定某行某列的颜色属性值uf_setcell_color转自:https://blog.csdn.net/happymagic/article/details/7843031/*-----------------------------------------------------------------------------------函数功能:指定某行某列的属性值(字体、背...
2019-04-04 22:51:01
1606
原创 PB打开EXCEL文件报错
OLEObject ExcelServerInteger ExcelOkstringls_pathnamels_pathname="e:\gzdr\book1.xlsx"IFFileExists(ls_pathname)=FALSEthenMessageBox("msg","Fileisnotfound")returnendifExcelServer=C...
2019-03-04 10:13:43
1950
1
原创 获取单元格的计算公式
'获取计算公式,使用Formula属性Sub cb_test()Dim ll_SheetCountDim ls_SheetNameDim ls_gsDim ll_Itemll_SheetCount = Worksheets.Countls_gs = ""''Sheet1 (2)'!B3:C3For ll_Item = 2 To ll_SheetCount ls...
2018-12-20 23:19:32
706
原创 列出表格的目录,并添加超级链接
‘列出表格的目录,并添加超级链接Sub cb_test()Dim ll_SheetCountDim ls_SheetNameDim ll_ItemDim ls_SubAddressDim ls_ryxm '人员姓名 B2ll_SheetCount = Worksheets.CountFor ll_Item = 2 To ll_SheetCount ls_Shee...
2018-12-20 23:16:16
414
转载 NotePad++ 正则表达式
在我们处理文件时,很多时候会用到查找与替换。当我们想将文件中某一部分替换替换文件中另一部分时,怎么办呢? 下面正则表达式 给我提供方法。正则表达式,提供复杂 并且弹性的查找与替换注意: 不支持多行表达式 (involving \n, \r, etc).1 基本表达式符号 解释 . 匹配任意字符,除了新一行(\n)。也就是说 “.”可以匹配 \r ,当文件中同时...
2018-11-26 21:36:00
357
Error:(26, 13) Failed to resolve: com.android.support:appcompat-v7:29.+ *****
2019-10-21
个人所得税测算
2019-02-07
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人