a020415036
a020415036
关注数: 30
粉丝数: 56
发帖数: 413
关注贴吧数: 52
一建准备考水利,听哪位老师的课比较好呢?
2013年一建新教材出来没?
谁买了一建的经济和管理的视频课程,可以借给我看下吗? 之前重点一直在准备造价,所以一建没有准备,报名的时候报了经济和法规,还有几天的时间想看看串讲课程,但是也不能因为这几天的时间去报个班?所以有没有哪位一建的考生,借我看下这两科的课程呢?
谁有一建经济的冲刺串讲课程,可以给个下载链接不?
弃坑五年回归,求攻略! 弃坑五年刚回来,主线任务刚做完,但现在不知道怎么玩了,有没有什么攻略指导下怎么玩呢?
弃坑五年回归,主线任务卡住了! 剑灵主线任务 第三章天下四杰 ”为扫荡金角命令士兵们出兵”怎么完成?有没有给指点下!
Excel VBA 中窗体工具箱为什么没有控件 我打开excel的visual basic,新建了一个窗体,但是工具箱里没有控件,请问这个问题该怎么处理呢
通过VBA往单元格写公式的问题! 这是我在VBA里写的程序,Cells(j, 20).Formula = "= cells(j,17) * cells(j,19)",j是变量,想给选定的单元格写公式,但是写进去的变量j直接是字母,不是对应的数字,这个问题怎么解决呢?
用sql 连接excel的问题! 我通过一个模板程序来读取excel表格的数据,是通过union all select 的方式来实现的,现在union个数超过10个提示语法错误了,想咨询下各位高手union最高只能是10 个吗?我现在有十几张表需要连,这种情况程序改怎么改呢?具体的程序如下: Sub Query() Dim Conn As Object, Rst As Object Dim strConn As String, strSQL As String Dim i As Integer, PathStr As String Set Conn = CreateObject("ADODB.Connection") Set Rst = CreateObject("ADODB.Recordset") PathStr = "C:\Users\SQ\Desktop\自动化系统设备选型清单.xlsx" '设置工作簿的完整路径和名称 t = ActiveSheet.Name Select Case Application.Version * 1 '设置连接字符串,根据版本创建连接 Case Is <= 11 strConn = "Provider=Microsoft.Jet.Oledb.4.0;Extended Properties=excel 8.0;Data source=" & PathStr Case Is >= 12 strConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & PathStr & ";Extended Properties=""Excel 12.0;HDR=YES"";""" End Select '设置SQL查询语句 strSQL = "select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [01PLC$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [02上位机软件$]union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [03断路器$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [04UPS$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [05网络设备$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [06机柜及其附件$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [07电脑及服务器$]union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [08视频监控$] union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [09电子围栏$]union all select 类别,系列,名称,型号订货号,规格参数,数量,单位,单价,总价,品牌,备注 from [10门禁$]" ‘此处只能连十个,超过后就报错了! Conn.Open strConn '打开数据库链接 Set Rst = Conn.Execute(strSQL) '执行查询,并将结果输出到记录集对象 'ThisWorkbook.Sheets.Add after:=Worksheets("数据源") '添加一个新工作表在第一工作后 For Each ws In Worksheets If ws.Name = "提数结果" Then ws.Delete Next Sheets.Add.Name = "提数结果" With Sheets("提数结果") .Cells.Clear .Tab.Color = 255 For i = 0 To Rst.Fields.Count - 1 '填写标题 .Cells(1, i + 1) = Rst.Fields(i).Name Next i .Range("A2").CopyFromRecordset Rst ' .Cells.EntireColumn.AutoFit '自动调整列宽 End With Rst.Close '关闭数据库连接 Conn.Close Set Conn = Nothing Set Rst = Nothing End Sub
想问一个问题,23号考的二建实务的知识点,我们30号二批的考生,
想问一个问题,23号考的二建实务的知识点,我们30号二批的考 想问一个问题,23号考的二建实务的知识点,我们30号二批的考生,这部分知识点是不是不会考,这部分内容复习可以跳过了?
四千块的预算,推荐下型号手机,不玩游戏,但手机用的还很频繁!
关于excel 读取网盘数据的问题! 这是我之前连网盘的方式,conn.Open "provider = microsoft.ACE.OLEDB.12.0;Data Source=\\MYCLOUD\data\自动化系统设备选型清单.xlsx;extended properties=""excel 12.0;HDR=YES"""今天公司更换无限网络,网盘和我的笔记本不在同一个网络了,但是我电脑可以通过10.0.0.108这个地址访问到网盘,我就修改了下连接方式conn.Open "provider = microsoft.ACE.OLEDB.12.0;Data Source=\\10.0.0.108\data\自动化系统设备选型清单.xlsx;extended properties=""excel 12.0;HDR=YES"""我就把MYCLOUD修改成10.0.0.108,但是就出错了,读不上来网盘里的数据,这个问题怎么解决呢?
有没有谁有培训机构的二建机电实务的面授课的信息啊?可以分享下吗
VBA 使用ado连接外部excel 的问题! Sub zhuashuju() Dim conn As New ADODB.Connection conn.Open "provider = microsoft.ACE.OLEDB.12.0;Data Source=E\SVN资料\03标准资料\自动化系统设备选型清单V1.1.xlsx;extended properties=""excel 12.0;HDR=YES""" conn.Close End Sub 上面是我写的想访问在电脑E盘下一个文件价里的ecxel文件,但是弹出错误,在我的想访问的文件夹前面加了个my docoment ,这是什么原因啊,有没有大神能解决这个问题?
VBA 代码里用FOR循环时间很长的问题! Sub 品牌筛选(p) Dim i As Integer Dim j As Integer Dim m As Integer Dim n As Integer Dim arr() '品牌的筛选及删除重复值 j = 1 For i = 1 To Sheets("清单目录").Range("a65535").End(xlUp).Row If Sheets("清单目录").Range("a" & i).Value = Sheets(4).Range("a" & p).Value Then j = j + 1 Sheets(4).Range("f" & j).Value = Sheets("清单目录").Range("j" & i).Value End If Next For m = 1 To Sheets(4).Range("f65535").End(xlUp).Row - 1 For n = Sheets(4).Range("f65535").End(xlUp).Row To m + 1 Step -1 If Sheets(4).Range("f" & m).Value = Sheets(4).Range("f" & n).Value Then Range("f" & n).Delete End If Next Next End Sub 这是我写一段代码,因为数据有八百多行,所以执行起来很慢,要二十多秒,请问有大神知道咋优化我这段代码吗?
在数组里删除重复值时提示下标越界! sub shuzu() dim m as interger dim n as interger dim arr1() r = Sheets(4).Range("f65535").End(xlUp).Row ReDim arr1(1 To r) For m = 1 To r For n = r To m + 1 Step -1 arr1 = Sheet1.Range("f1:f" & Sheets(4).Range("f65535").End(xlUp).Row) If arr1(m) = arr1(n) Then ' If Sheets(4).Range("f" & m).Value = Sheets(4).Range("f" & n).Value Then arr1(n).Delete End If Next end sub 上面是我自己写的一段代码,思路就是吧一列单元格里的数据赋值给数组,然后在数组里比较,有重复值的时候就删除!但是老是提示下标越界,有没有大神知道怎么回事啊?
给数组赋值提示类型不匹配的问题! 我自己写的一段代码,想把一段指定的表格区域的值放到数组里 sub shuzu() dim arr() arr() = Sheets("清单目录").Range("a1:k" & Sheets("清单目录").Range("a65535").End(xlUp).Row) end sub 但是执行的时候提示类型不匹配,这是怎么回事呢?
修改数据验证区的数据来源为动态的问题! 我自己录制了一段数据验证的宏,代码如下:Range("B4").Select With Selection.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:=“=F2:F8” .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .IMEMode = xlIMEModeNoControl .ShowInput = True .ShowError = True 然后我把区域修改了一下,修改如下 xlBetween, Formula1:=Range("F2:F" & Sheets(5).Range("b1").Value),然后就出错了,这个问题怎么解决呢? End With
用vba 来实现excel表格中c列中重复的行,只保留一行! 我想实现excel表格中c列里相同的行,删掉只保留一行,把重复行第e列的数据汇总到保留的这一行里,我自己写的代码如下,但是运行结果不对,都删掉了!请大神帮看看,我这个程序哪里出问题了? For i = Sheets(3).Range("a65535").End(xlUp).Row To 1 Step -1 If Sheets(3).Range("c" & i) = "" Then Range("c" & i).EntireRow.Delete End If Next For j = Sheets(3).Range("a65535").End(xlUp).Row To 2 Step -1 For k = j - 1 To 1 Step -1 If Sheets(3).Range("c" & j) = Sheets(3).Range("c" & k) Then Sheets(3).Range("e" & k) = Sheets(3).Range("e" & j) + Sheets(3).Range("e" & k) Sheets(3).Range("c" & j).EntireRow.delete End If Next Next
谁那有二建历年真题的答案解析啊?能不能给我一份,我这只有真题 谁那有二建历年真题的答案解析啊?能不能给我一份,我这只有真题答案,没有解析!谢谢了!
plc通过dtu设备连的外网,中控室组态软件如何和plc实现 plc通过dtu设备连的外网,中控室组态软件如何和plc实现通讯传输呢?能解决这个问题可有偿!
plc通过dtu设备怎么实现和远程的组态软件进行通讯呢? plc通过dtu设备怎么实现和远程的组态软件进行通讯呢?
plc通过dtu设备怎么样实现和远程的组态软件通讯呢?大神们 plc通过dtu设备怎么样实现和远程的组态软件通讯呢?大神们,给点方法!
远程plc可以连外网,怎么实现本地的组态软件能控制它? 远程plc可以连外网,怎么实现本地的组态软件能控制它?
200smart里,vd8的数据为啥上面和下面监控的值会不一样呢?
西门子博图V14 SP1里面组态了S7 1200 PLC和KTP700 BASIC PN触摸屏,电脑上安装了S7-PLCSIM V14,PLC模拟的时候可以正常连接,编译触摸屏的时候显示不兼容,请问下吧里大神有知道怎么处理吗?
今天刚安装成功的eplan p8 2.7,也破解成功了,但新建项目时,找不到模板,这个怎么解决啊?有没有大神会的?
吧里大神谁有Patch EPLAN P8 (V1.8-V2.7)这个啊,能给分享下不?
放十天!哈哈 放十天!哈哈
本人初学者,用在win10系统用博图v14sp1进行仿真不成功,下面有图,不知道有没有高手能给指点下迷津啊,搞了一天咯,还是不知道呀弄!
win10系统开机启动的时候为什么会有一分钟左右的黑屏很才正 win10系统开机启动的时候为什么会有一分钟左右的黑屏很才正常启动,我的是固态硬盘,昨天安装个cad,有病毒,后面杀毒了后,再启动就一直要黑个一分钟左右才能启动现在启动要一分半钟!怎么解决这个问题呢?
装了个wincc7.4,但一直无法授权成功,有没有高手给指点指点啊,网上也找不到7.4的破解教程
华硕n53t最大可以加多大的内存呢? 我这电脑是12年买的,华硕n53t,CPU是AMD a8-3520m,自带内存是4g,现在我想给笔记本添加一个内存,但不知道最大可以支持多大的,网上也查不到了,不知道高手知道的,给我解解惑。
打开wincc v7.3图形编辑器,弹出两个窗口,然后就打不开了,怎么处理呢?
安装winccv7.3时弹出这个画面,按照网上提示在注册表里删了一条,可一点安装,还是同样的这个画面,有没有哪位大神知道怎么解决这个问题啊?
下了个wincc,刚点安装,就弹出这个界面,请问哪位大神知道咋弄啊?
中超预备队的比赛不对外卖票吗? 中超预备队的比赛不对外卖票吗?
在自学plc200,刚看到网上的一个程序,我也学着编,可结果是32个错误,都是这种全局符号或局部变量未定义,我在符号表自己定义,可还是不行,有哪位大神能帮忙给指点一二不,我这头都大了,感激不尽啊!
想考个电工证,在西安可以去哪里报名啊? 想考个电工证,在西安可以去哪里报名啊?
求大神给一个ps软件下载的链接 求大神给一个ps软件下载的链接
西安东三环有啥资源可以推荐下的啊?
安卓手机可以下载什么软件看tv 安卓手机可以下载什么软件看tvb新剧啊?
电一仙履奇缘的十一星剑士,完全 电一仙履奇缘的十一星剑士,完全符合做徒弟要求,寻找一名师傅!
剑士控雪域宫老二的时候拔刀眩晕老是没有命中,怎么解决呢?
还有两天研究生考试,好久没来吧里了,来逛逛! 还有两天研究生考试,好久没来吧里了,来逛逛!
大张伟根据夫妻双双把家还改编的《鹊桥汇》!
以前那么好看的宝贝赖上大明星,现在都没了啊! 希望能恢复宝贝赖上大明星!
黄新德老师<<快乐戏园>>教小朋友们动作要领 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fxiqu.cntv.cn%2Fspecial%2Fklxy%2Fclasspage%2Fvideo%2F20120605%2F100039.shtml&urlrefer=d38437704fa3991d2046a842f319dad2
黄新德老师<<快乐戏园>>教小朋友们动作要领 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fxiqu.cntv.cn%2Fspecial%2Fklxy%2Fclasspage%2Fvideo%2F20120605%2F100039.shtml&urlrefer=d38437704fa3991d2046a842f319dad2
重庆卫视《记忆》 20120522 岁月留声 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fbugu.cntv.cn%2Fdocumentary%2Fsociety%2Fjyzhsjd%2Fclasspage%2Fvideo%2F20120522%2F100987.shtml&urlrefer=510dbdd8cad6f26f9d4e2bee7cbda859
发几个张辉的视频
希望喜欢张辉的戏迷能多帮忙建设下我们的张辉吧啊 看到当红小生张辉的张辉吧却没有几个戏迷,总感觉这心里凉凉的感觉啊!
希望喜欢张辉的戏迷能多帮忙建设下我们的张辉吧啊
从黄梅戏吧过来的新人报道 在黄梅戏吧待久了,发觉还就是有些歪风邪气的感觉呢!现在跟着水龙吟吧主希望能把我们的少爷吧建的比黄梅戏吧更好!
韩再芬唐杰忠黄梅小品<青山新翠>
中央电视台《焦点访谈》介绍3d版黄梅戏! http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fnews.cntv.cn%2Fchina%2F20120521%2F115461.shtml&urlrefer=a131976ae90115b869817a9a11a4a467
戏凤 黄梅戏表演-邓丽君 徐小凤
林子祥/甄妮 黄梅调《游龙戏凤》
洪湖水 浪打浪(黄梅调版)
1
下一页