excel上vba编小程序
-
-
-
-
-
这个问题采用checkbox控件动态加载控件数组来完成要求让原本固定的checkbox每次打开都随机变动位置这个问题.只需改变checkbox.caption属性即可不用改变位置了.在查询按钮中,用什么语句判断比较好,If?while?case?这个问题.采用SELECTCASE语句判断checkbox.index属性.计数器加1
详情林小姐也是lyn 2018-09-18 17:25 0评论 1赞同
-
Private Sub Form_Click() Dim yn As VbMsgBoxStyle Do yn = MsgBox("确认", vb
详情Austin 2018-09-18 17:25 0评论 13赞同
-
用vb做出来的小程序,为什么我做的东西发到别人的电脑就不能用了?请各位大侠帮帮忙~~
用VB自带的Package&Deployment向导(当然用InstallShield更专业)选择你的工程点打包,按着向导一步一步的把你的程序做成安装程序这样发给别人,人家安装好就可以用了。
详情恨钢不成铁 2018-09-18 17:25 0评论 8赞同
-
privatesubform_load()fori=1to100if(i/2)<>fix(i/2)thenprintinextiendsub
详情Lola 2018-09-18 17:25 0评论 14赞同
-
-
-
-
-
帮你写了个宏,执行时,完全满足你的要求。第三次改了一下,还有什么问题,欢迎提出:Sub Zh()Dim S, i As Integer, K(), E As String, Sw As Integer, U As Stringd =&nbs
详情Suvi_0202 2018-09-18 17:24 0评论 8赞同
-
DimaAsInteger,bAsInteger,iAsInteger,nAsIntegerPrivateSubCommand1_click()a=Val(InputBox("请输入开始年份"))b=Val(InputBox("请输入结束年份"))Fori=aTobIfiMod4=0AndiMod100<>0Then
详情zqsg走一波 2018-09-18 17:24 0评论 18赞同
-
subgaofeiji(feijiasInteger)fori=1to5ifi=feijithenprint"飞机"&iendifnextendsubgaofeiji3
详情Nathan 2018-09-18 17:24 0评论 7赞同
-
在2007d Excel中昨天设计了个小程序,还能运行,今天一运行就出现个#NAME?我什么也没有做改动
不知道啥意思、、在哪出现个#NAME呢?
详情吴痕 2018-09-18 17:24 0评论 17赞同
-
-
-
PrivateSubCommand1_Click()DimiAsIntegerDimsumAsIntegersum=0Fori=2To100Step2sum=sum+iNextText1.Text=sumEndSub
详情古小星 2018-09-18 17:24 0评论 10赞同
-
-
用vb做出来的小程序,为什么我做的东西发到别人的电脑就不能用了?请各位大侠帮帮忙~~
您可以下载一个VBRUN在别人的电脑上装一下,这是一个VB的运行库,因为VB运行时并不是一个EXE文件就可以了,还得有许多连接文件的支持才行,如果您有非VB自带的控件使用,这个控件了得拷过去装上.
详情Valentina 2018-09-18 17:24 0评论 8赞同
-
vb6.0编制一个小程序计算基桩的力的传递,试了几个桩的参数都计算良好,但是遇到一个比较特殊的桩
Time等于多少?如果Time<23,F(23)是不会赋值的,当然死循环追问
详情Ruben 2018-09-18 17:24 0评论 12赞同
-
VBA编个小程序,要判断一个字段是否重复,如果重复的话,把这几个重复字段对应的另一个字段合并
'假设第一行为表头sub test() dim dic as object set dic=createobject("scripting.dictionary") arr=[a1].currentre
详情楚云潇雨 2018-09-18 17:24 0评论 11赞同
-
-
我写了个vb6的粘贴复制的小程序,可运行是老是出现实时错误,代码404
在Clipboard.SetTextTxtContent.SelText句前,补上clipboard.clear,不然会有许多莫名其妙的问题。
详情沧海一声笑 2018-09-18 17:24 0评论 20赞同
-
DimiAsInteger,nAsIntegerPrivateSubForm_Click()DimiAsInteger'定义i为整型变量Fori=1To3'i赋值1~3循环三次s=sum(i):Print"s=";s'进行一次sum()函数运算并输出"s="+结果Nexti'循环结束EndSu
详情曹阳 2018-09-18 17:24 0评论 8赞同
-
如何写一个小程序,先从Excel中获取数据,然后将获取到的数据转换成xml格式的数据并保存到xml文件里。
这个有很多方法实现啊,比如pythonexcel里面的vba也可以。自己去百度一下介绍方法;不过如果不懂编程的话,要学一段时间,建议找工作室做;当然我也可以完成,耗费时间。
详情雪先生 2018-09-18 17:24 0评论 8赞同
-
y=Text1.Text把这句话改成Text1.Text=y放到EndSelectEndSub中间可能就是你想要的结果了
详情阿尔法-Sco 2018-09-18 17:24 0评论 7赞同
-
用vb脚本语言编写一个小程序,程序实现功能如下:任意输入三个整数,使其按大到小的顺序输出。紧急!谢谢
PublicClassForm1PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimaAsIntegerDimbAsIntegerDimcAsIntegerDimmaxAs
详情百越 2018-09-18 17:24 0评论 4赞同
-
VB小程序, 当我在youku搜索栏输入要找的视频的时候,按enter或按搜索会出现下面图片的问题。
开始--运行输入regsvr32scrrun.dll就可以了。另外1。有些脚本需要微软的MSXML控件才能进入。当使用IE5以上版本的缺省安全模式时,会提示是否接受MSXML控件,如果接受,MSXML将自动安装到您的机器上(得等上几分钟)。如果自动安装不成功,可以自行下载和安装MSXML3.0。2。如果安装MSXML3后仍然出现'Automation服务器不能创建对象'错误
详情Sofia 2018-09-18 17:24 0评论 7赞同
-
保存一下代码为后缀名为vbs的文件双击,你也可以恶搞他:onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t60-c""说我是猪,不说我是猪就一分钟关你机,不信,试试···""",0,trued
详情亚当思密达 2018-09-18 17:24 0评论 18赞同
-
-
VB 报错,估计是vb6.0没有装好 运行其他的小程序都没有问题 我在网上下载的一个小程序, 一直都不能运行
也可能是数据驱动的问题。或者是数据源的问题
详情雨天 2018-09-18 17:24 0评论 19赞同
-
-
用vb.net 开发个数据库小程序,需要将oracle中的部分表查询结果,每三十分钟下载到ACCESS中,提供源码
这个你把具体的给我看下
详情在劫难逃 2018-09-18 17:24 0评论 4赞同
-
-
a=inputbox("请输入开始年份")b=inputbox("请输入结束年份")fori=atobif(imod4=0)and(imod400=0)thenprinti;"是闰年。"elseif(imod4=0)and(imod100<>0)thenprinti;&
详情Luke 2018-09-18 17:24 0评论 6赞同
-
病情分析:你好。锌是身体健康必需的营养物质,缺锌会有很多危害的。小孩子缺锌会导致免疫力降低,好动,注意力不集中,挑食,厌食,偏食,头发稀黄等。指导意见:孩子缺锌是可以通过食物来补充的。含锌丰富的食物如肉类中的猪肝、猪肾、瘦肉等;海产品中的鱼、紫菜、牡蛎、蛤蜊等;豆类食品中的黄豆、绿豆、蚕豆等;硬壳果类的是花生、核桃、栗子等,这个食物都可以多吃。另外,也是可以通过和钙加锌来补充的。祝你健康!病情分析:您好:尤其是婴幼儿缺锌容易厌食、
详情Hannah 2018-09-18 17:24 0评论 18赞同
-
DimLXAsLongDimLYAsLongDimMDAsBooleanPrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Me.PSet(X,Y)LX=XLY=YMD=TrueEndSubPrivateSub
详情吴静怡 2018-09-18 17:24 0评论 15赞同
-
-
-
IfAppppt.ActiveDocument.Shapes(1).Type=15Then'不是艺术字,就不进来操作SetAppppt=Wrd.ActiveDocument.Shapes(1)IfAppppt.TextEffect.FontName="黑体"Then'字体asp=asp+0.5
详情Brayden 2018-09-18 17:24 0评论 2赞同
-
想好好学习一下vba或者vb制作一些小程序,怎么样学习会更好更快,方便使用
可以先买本入门的书是,然后根据实例编写程序,再从网络中找相应的视频来学习一下,然后再自己解决一些简单的小问题,自己编编试一个。
详情榛子 2018-09-18 17:24 0评论 4赞同
-
急!!!VB程序设计 随便一个VB工程 小程序 别太难 也别太简单
其实这些都是非常简单的小程序,甚至只是调用了一个定时关机的DOS命令而已,一般通过结束某些进程就可以解决。本文谨给像我这样的菜鸟学习。对WIN系统熟悉的童鞋可以无视!第一个,调用dos关机命令实现定时关机。1、新建一个记事本;输入以下代码:shutdown-s-f-t600-c“系统正在执行定时关机”(其中600是时间,单位是秒,如果需要立刻关机可以写1。引号内的文字是弹出窗口的提示消息可以随意修改)2、把写好的记事本另存为.bat后缀,文件名自定!
详情Greyson 2018-09-18 17:23 0评论 1赞同
-
i&"x"&j&"="&i*j中i和&要有一个空格否则就会认为你把i标记为&类型的数据,其他得到也是如此,这点就是要注意!!
详情白皓 2018-09-18 17:23 0评论 18赞同
-
-
-
-
-
关键点应该是静态变量的应用:StaticjAsIntegerhttp://baike.baidu.com/view/675642.htmForm_Click通过循环调用三次Functionsum第一次i=n=1,j=2第二次j=2,i=n=2,sum(i)=j=2+2+1=5
详情木易杨 2018-09-18 17:23 0评论 13赞同
-
DimLXAsLongDimLYAsLongPrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Me.PSet(X,Y)LX=XLY=YEndSubPrivateSubForm_MouseUp(ButtonAsInteger,ShiftA
详情Julia 2018-09-18 17:23 0评论 1赞同
-
PrivateSubCommand1_Click()DimtempAsStringDimNumsAsIntegerDimInputStrAsStringInputStr="t345+abc12spc276www8t56?"Fori=1ToLen(InputStr)IfAsc(Mid
详情Dominic 2018-09-18 17:23 0评论 1赞同
-
Private Sub Command1_Click()Dim X As Single, X1 As SingleX = Val(Text1.Text)If X <= 0 Then MsgBox "请输入购
详情Ryder 2018-09-18 17:23 0评论 2赞同
-
我想用vb编一个小程序。即同时按下右键和s键相当于按下k。同时并不印象这三个键的单独使用。求代码。
这个你需要求助API高手来实现了。或者,简单点,用按键精灵编啊。
详情Erin院长 2018-09-18 17:23 0评论 20赞同
-
用vb.net 开发个数据库小程序,需要将oracle中的部分表查询结果,每三十分钟下载到ACCESS中,提供源码
初学者建议,采用ADO控件,容易上手些:1,用ADO控件连接数据库,返回数据记录集 用数个ADO控件分别连接oracle数据库和access.2,用Timer控件,实现时间间隔进行更新操作.
详情喜怒无常 2018-09-18 17:23 0评论 5赞同
-
浙江电大VB的作业,小程序开发,请人做。有人接标么?可以支付宝。
我这里正好有几个研究生学生是做软件开发的,我可以帮你。请先采纳,我之后私信发给你。寰泽教育很高兴为您解答。追问
详情庄晋 2018-09-18 17:23 0评论 3赞同
-
PrivateSubCommand1_Click()Fori=1To100k=1Forj=2Toi/2IfiModj=0Thenk=0NextjIfk=1ThenPrintiNextiEndSub
详情Ayden 2018-09-18 17:23 0评论 1赞同
-
改一个后缀名后(不需要VB和C语言),可以编写一段小程序,双击弹出警告框
没看明白你倒是是想改后缀名还是想要这么的一个可以弹对话框的程序
详情Wyatt 2018-09-18 17:23 0评论 12赞同
-
我没用数据库,简单的给你显示了一下添加部件MicrosoftChartControl6.0(OLEDB)在窗体上画控件MSChart1,加入如下代码PrivateSubForm_Load()'纵轴是根据数据变化而变化的WithMSChart1.chartType=VtChChartType2dLine'折线图.RowCou
详情Chase2 2018-09-18 17:23 0评论 20赞同
-
求助:用VB做的小程序怎么把右上角“关闭”的那个小红叉子隐藏掉啊??
PrivateDeclareFunctionGetSystemMenuLib"user32"(ByValhwndAsLong,ByValbRevertAsLong)AsLongPrivateDeclareFunctionDeleteMenuLib"user32"(ByValhMenuAsLong,ByValnPositionAsLong,ByValwFlagsAsLong)AsLong
详情Sierra 2018-09-18 17:23 0评论 2赞同
-
我编了一个vb小程序用来解方程组,可是点击启动后电脑并不解方程组,cpu使用率只有百分之1或2左右,为什么
IfFormat(x+y,"0.0")=2.2AndFormat(x-y,"0.0")=0.2Then
详情自作自受没人管 2018-09-18 17:22 0评论 2赞同
-
ImportsSystemImportsSystem.Collections.GenericImportsSystem.ComponentModelImportsSystem.DataImportsSystem.DrawingImportsSystem.TextImportsSystem.Windows.FormsImportsSystem.Data.OleDbImportsSystem.D
详情曹阳 2018-09-18 17:22 0评论 17赞同
-
怎么用vb编个随机抽取人名的小程序,做到不重复并能直接打印显示已抽到的人名
DimnAsIntegerDima()PrivateSubCommand1_Click()Ifn=0Then'第点击执行m=Val(Text1)ReDima(1Tom)Fori=1Tom'数组a元素1至mm数a(i)=i
详情Jaydon 2018-09-18 17:22 0评论 14赞同
-
我想用vb编一个小程序。即同时按下右键和s键相当于按下k。同时并不印象这三个键的单独使用。求代码。
1这个很简单,应该三个事件一起用,定义一个全局变量bRight标志是否按下鼠标右键。2mousedown事件代码ifbutton=2thenbright=true3mouseup事件代码bright=false4keypress事件代码ifbrightthenifkeyascii=vbkeysorkeyascii=vbkeySthensendkeys"k"
详情Semaj 2018-09-18 17:22 0评论 5赞同
-
-
求助:用VB做的小程序怎么把右上角“关闭”的那个小红叉子隐藏掉啊??
用钩子不如用无标题栏窗体要什么样的窗体栏都可以用图片得到效果好的窗体大多数都是无标题栏的比如QQ登陆窗体追问
详情安娜女王 2018-09-18 17:22 0评论 19赞同
-
我想用vb编一个小程序。即同时按下右键和s键相当于按下k。同时并不印象这三个键的单独使用。求代码。
同时终归是有先后的,先摁的那个键必须失效!
详情末初之至 2018-09-18 17:22 0评论 4赞同
-
PrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegerDimiAsIntegerDimsAsIntegera=Val(InputBox$("请输入开始年份:"))b=Val(InputBox$("请输入结束年份:"))
详情韩啸半步癫 2018-09-18 17:22 0评论 2赞同
-
-
1.你可以将那几个checkbox控件放入一个frame控件中,需要变动位置时调用frame控件的move方法即可2.如果只有两三种可能,if,case都可以;如果情况比较多,建议采用case语句
详情JessieJ 2018-09-18 17:22 0评论 13赞同
-
在2007d Excel中昨天设计了个小程序,还能运行,今天一运行就出现个#NAME?我什么也没有做改动
你看看是不是引用了其他数据库?或者重新写一下,关闭再试试……
详情Sierra 2018-09-18 17:22 0评论 2赞同
-
-
你建个宏,执行一下就行了。如下SubMacro1()DimnAsLongDimSXAsLongDimYWAsLongSX=0YW=0n=2DoWhileNotIsEmpty(Cells(n,1).Value)IfCells(n,1).Interior.ColorIndex=6AndCells(n,1).Interior.Pattern
详情Rebekka 2018-09-18 17:21 0评论 11赞同
-
我编了一个vb小程序用来解方程组,可是点击启动后电脑并不解方程组,cpu使用率只有百分之1或2左右,为什么
浮点数比较时不能这样比较,须设定一允许误差,在误差之内的就可认为相等有限的字长不能把小数精确的转化成2进制IfCSng(x+y)=2.2AndCSng(x-y)=0.2ThenText1.Text=xText2.Text=yEndIf这样就行了小余1的数都要这样比较楼上的把精度缩小到一位小数我这里是把精度缩小
详情南风 2018-09-18 17:21 0评论 6赞同
-
-
-
PrivateSubCommand1_Click()DimxAsIntegerDimyAsStringx=InputBox("数字(0-6)","输入","0")SelectCasexCasex=0y="sunday"Casex=1y="mond
详情恨钢不成铁 2018-09-18 17:21 0评论 5赞同
-
要是会VB,编VBA就简单很多。你的具体问题我没有看,只是想说一些基本的东西。EXCEL主要调用的是Sheet对象和Cell(或者说是Range)对象。例如,Sheet1中的单元格A2可以用Sheet1.cells(2,1)调用,也可以用Sheet1.Range("A2")进行调用。
详情Evelyn 2018-09-18 17:21 0评论 15赞同
-
-
VB 报错,估计是vb6.0没有装好 运行其他的小程序都没有问题 我在网上下载的一个小程序, 一直都不能运行
系统中缺少一个插件MSDATGRD.OCX这个文件在system32文件夹中网上下载一个这个文件放到系c:\windows\system32中
详情加一+1 2018-09-18 17:21 0评论 3赞同
-
你必须在窗体上放置一个Toolbar控件,如果控件箱里没有,就要在菜单的“工程-部件-控件”的“microsoftwindowscommoncontrols6.0”项前面打勾。之后右击添加的toolbar1,选择“属性”(Properties),在里面就可以添加和删除按键。如果要在按钮上显示图片的话,还得要有一个imagelist控件,具体操作可看相关控件帮助文件msdn。
详情周欣 2018-09-18 17:21 0评论 2赞同
-
这里有个源程序,你看一看http://www.yitax.com/myworks/24win/24winvb.zip其实自己也可以编的,不过是有点儿难度的。
详情一言堂 2018-09-18 17:21 0评论 14赞同
-
写一段C语言小程序,可以对EXCEl表格进行读写操作,就是说把EXCEL当作数据库,可以随时添加删除数据。
没可能的,虽然看着表格和数据库一样,但内部格式不是一回事。。。
详情lele 2018-09-18 17:21 0评论 17赞同
-
VB小程序, 当我在youku搜索栏输入要找的视频的时候,按enter或按搜索会出现下面图片的问题。
我出现过,只要在网页搜索,文件夹搜索都会出现程序出错,的情况,.我那次是中毒了,最近病毒比较猖狂,你是否也是中毒了.
详情Alan 2018-09-18 17:21 0评论 2赞同
-
-