查看: 550|回复: 8
关于一个函数公式的设置，请高手们帮忙，跪谢！
阅读权限20
在线时间 小时
请高手们帮我看一下这个附件中的公式链接如何设置，本人不知如何描述问题，请详见附件，谢谢！在线等结果。。
10:16 上传
点击文件名下载附件
34.83 KB, 下载次数: 20
阅读权限20
在线时间 小时
有人在吗？请问这个有可以解决的方法吗？高手告知
阅读权限95
在线时间 小时
xiangxia24531 发表于
有人在吗？请问这个有可以解决的方法吗？高手告知
多条件求最大值和最小值问题。
10:38 上传
点击文件名下载附件
35.49 KB, 下载次数: 16
阅读权限20
在线时间 小时
袁勇 发表于
多条件求最大值和最小值问题。
很感谢你在百忙中抽空为我解答，是我想要的答案，简单明了的公式，谢
阅读权限95
在线时间 小时
i4输入以下公式，右拖下拉即可，数组公式=IF(SUM(($B4=表二!$B$2:$B$363)*($A4=表二!$J$2:$J$363)),QUARTILE(IF(($B4=表二!$B$2:$B$363)*($A4=表二!$J$2:$J$363),表二!$A$2:$A$363),(COLUMN(A1)-1)*4),&&)复制代码
阅读权限70
在线时间 小时
最早一天=IFERROR(VLOOKUP(A4&B4,IF({1,0},表二!$J$2:$J$363&表二!$B$2:$B$363,表二!$A$2:$A$363),2,),&&)复制代码最后一天
=IF(MAX(IF((表二!$J$2:$J$363=A4)*(表二!$B$2:$B$363=B4),表二!$A$2:$A$363))=0,&&,MAX(IF((表二!$J$2:$J$363=A4)*(表二!$B$2:$B$363=B4),表二!$A$2:$A$363)))复制代码
均为数组公式，另，将单元格式设置为日期格式
10:42 上传
点击文件名下载附件
35.66 KB, 下载次数: 4
阅读权限20
在线时间 小时
鬼火6 发表于
最早一天最后一天
均为数组公式，另，将单元格式设置为日期格式
谢谢。。看着好复杂，我仔细看看，谢谢您抽空为我解答
阅读权限100
在线时间 小时
I4公式：=MIN(IF((表二!J$2:J$363=客户余款!A4)*(表二!B$2:B$363=客户余款!B4),表二!A$2:A$363))复制代码J4改成 max
有的找不到
阅读权限50
在线时间 小时
syz 发表于
i4输入以下公式，右拖下拉即可，数组公式
学习QUARTILE 函数。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师求帮忙写个设置系统时间的函数，谢谢了！
[问题点数：50分]
求帮忙写个设置系统时间的函数，谢谢了！
[问题点数：50分]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。一元数学函数图示器（参考设计如下图）谁会？急急！帮帮忙吧！谢谢了！
一元数学函数图示器（参考设计如下图）谁会？急急！帮帮忙吧！谢谢了！
软件设计基础（VB）课
& 一、 题目：一元数学函数图示器（参考设计如下图） && 二、目的与要求：1.目的： 培养学生综合利用Visual Basic语言进行程序设计的能力，主要是培养学生利用VB的图片框控件进行作图技能。2.基本要求：欲完成此设计题目，要求必须熟练使用和掌握PictureBox控件的各种属性（如forecolor、backcolor、currentX、currentY,DrawWidth等）和方法（如Cls、Print、Line、Pset,Scale等）①能够显示固定一元函数(例如示意图中的函数)的图形。②可以设置常用的显示参数，包括显示范围，坐标轴、曲线、显示区底色，及刻度文字及线宽等特性，显示设置的范例可以参考右图。③能够对图形进行缩放，并可以在显示区直接选取显示范围(窗口放大)，可以对图形进行平移观察，平移的步长可以设置，当显示范围改变后，标尺刻度和网格密度应该能自动调整，以适应新的显示范围。如右图所示。④支持鼠标点击图形上任意一点，显示出该处的x值和对应的函数值，可以用一个消息框来显示此信息(见右图)。⑤程序界面美观，支持多个函数的叠加显示。 & 3.创新要求：在基本要求达到后，进行创新设计，如进行任意一元函数(程序中直接输入函数)的图形显示，支持函数图形的打印(以打印机的分辨率进行打印,不是直接拷屏)。还可以实现一下窗口大小改变后程序自动调整图示区的范围等功能。三、设计方法和基本原理：1.问题描述：& 程序界面见上，功能描述参见基本要求的内容。2.问题的解决方案： &
①设计程序界面。因为用的是常用控件，界面设计没有什么难度，照样子拼好就可以了。②Picturebox控件中背景、曲线、网格轴的颜色选择。可以直接设置控件对应的属性来完成，因为要画不同类型的线，所以在一个过程中可能需要多次设置同一属性。& ③显示分辩率的实现。所谓的分辩率就是用多少条直线来逼近所画的曲线，越大画的越精确，越小画的越快，本程序建议限定在100-1000之间。④绘制曲线的实现。这也是本程序要实现的核心功能，主要包括的内容有：★ Picturebox控件中坐标系的初始化。然后利用Picturebox控件的Scale方法进行设置。图形区的坐标范围要有初始值，可以在form_load事件中设置各参数的初值。★ 绘制坐标轴及刻度网格线，并标上刻度值。坐标刻度（又称为网格）的显示可以采用每隔一定的间距画一条线来实现，刻度的文字标注同时进行，注意调整写字的位置，让字能写在刻度的居中位置，可以用类似下面的方法，其中TextWidth和TextHeight是求出给定文字在给定对象上的文字宽度和高度，只有得到此值才能将字写在准确位置。 &
For i = .l To .r Step st &
s = Trim(Str(i))
‘将要写的文字转换成字串并去掉空格 &
P0.CurrentX = i - P0.TextWidth(s) / 2
‘居中对齐方式 &
P0.CurrentY = .t ‘写在显示区的顶部 &
Next i★ 函数曲线主要是利用画直线的方法进行绘制，最左侧的点算出后，用Pset方法做出标记，以后每算出一个新的函数值，用Line-（x,y）画出一小段。直到画到显示范围的右侧。程序片段类下： & (说明：.l,.r是显示区间的左边和右边的x值，.res为显示分辨率,fx求函数值) &
Picture1.PSet (.l, fx(fun1, .l))
‘绘出初始点 &
For i = .l To .r Step (.r - .l) / .res
‘共.res段直线构成曲线 &
Picture1.Line -(i, fx(fun1, i))
‘画出一小段Next I⑤参数设置的实现 为了使变量公用，在模块中用Public词句声明变量及自定义类型,这样在设置窗口的form_Load事件中就可以直接取得参数值了。Private Sub Form_Load() &With Para &
txtL = .l:
txtPS = .ps * 100 &
txtCW = .cw:
txtAW = .aw &
BkColor.BackColor = .bc:
AxisColor.BackColor = .ac &
GridColor.BackColor = .gc:
Fun1Color.BackColor = .cc1End WithEnd Sub参数设置支持确定和取消，如果确定，将会重新按新的设置来显示，否则，保持原显示不变，代码类下：Private Sub cmdSettings_Click() &
DispSettings.Show vbModal &
If Para.ok Then DispFunEnd Sub参数设置的文本框处理较为简单，对于颜色的处理可以采用这样的方法(VB中的颜色可以存放在Long类型的变量中)，下面示例了网格颜色的设置方法，其它雷同，其中的CD1是一个公共对话框控件(Common Dialog Control) &
CD1.Color = GridColor.BackColor &
CD1.ShowColor &
Gri`Color.BackCklor = CD1.Color四、主要技术问题描述：设置图牆?的坐标范围用Scale方法，清除用Cls，作图用Line –(x,y)，写字用Print（这些都是图片对象现成的可用方法，改笔宽用DrawWidth属性，色彩用ForeColmr和BackColor，至于窗口放大（可以接受图片的MouseDown和MouseUp事件以确定用户选择的窗口范围(VB会将鼠标点击时的x,y座标报告给过程)，然后重新设置显示范围和坐标系，再重新计算绘图即可，缩放和平移都是更改显示范围然后重绘即可。 &
为了处理参数方便，可以自定义类似于下面的自定义数据类型Type Settings &
l As Double
cc1 As Long
'curve 1 color…End Type这样，象放大缩小这样的操作就可以按这样的方法来处理了：Dim Para as Settings‘在Form_Load和其它相关过程中已经正确的设置了Para中的各参数Private Sub cmdZoomOut_Click()With Para &
.l = .l * .zs:
.r = .r * .zs:
.t = .t * .zs:
.b = .b * .zsEnd WithDispFun ‘按新的参数显示图形End Sub
昵称: ys &时间:
昵称: WallesCai &时间:
昵称: zdingyun &时间:查看: 1793|回复: 5|关注: 0
用ode23求解ODE出错提示没有定义函数，请帮忙分析一下，谢谢
我新建一个ydot1.m文件 ，文件内容：
function ydot = eql(t,y)
ydot = cos(t);
然后在命令窗口中输入：
&&[t,y] = ode23('eql',[0 2*pi],2);
直接报错提示：
Error using feval
Undefined function 'eql' for input arguments of type 'double'.
Error in odearguments (line 88)
f0 = feval(ode,t0,y0,args{:});& &% ODE15I sets args{1} to yp0.
Error in ode23 (line 113)
[neq, tspan, ntspan, next, t0, tfinal, tdir, y0, f0, odeArgs, odeFcn, ...
提示没有定义 函数 eql ,&&但是我不是在ydot1.m中定义了么？&&请问这个怎么改啊？
这是《MATLAB揭秘》的例子吧？代码没错，你是不是没把函数的m文件放在工作目录。
这是《MATLAB揭秘》的例子吧？代码没错，你是不是没把函数的m文件放在工作目录。 ...
嗯， 是这个书上的， 我是放在C/userxxx/.. / My Documents / MATLAB 这个目录下啊， 应该就是工作目录吧？ 但是就是出这个错误啊， 怎么办呢？
|此回复为最佳答案
但这个错误提示一般就是这个原因，m文件要命名成eql.m，放在工作目录中
关注者： 269
本帖最后由 winner245 于
00:02 编辑
嗯， 是这个书上的， 我是放在C/userxxx/.. / My Documents / MATLAB 这个目录下啊， 应该就是工作目录吧 ...
你应该把子函数添加到 matlab 当前路径上。另外，子函数文件名最好和函数名相同，如果你使用了不同的文件名，那就应该以文件名调用，而不是用函数名。
另外，像这类简单的函数，可以直接用匿名函数实现，没有必要专门建立额外的子函数文件：
&& ode23(@(t,y) cos(t),[0,2*pi],2);
你应该把子函数添加到 matlab 当前路径上。另外，子函数文件名最好和函数名相同，如果你使用了不同的文件 ...
源文件名：ydot1.m
&& [t,y] = ode23(['ydot1',[0 2*pi],2); 就可以
或者 直接修改源文件名：eql.m
&& [ t,y] = ode23['eql',[0 2*pi],2); 也可以
或者直接按你的提示：
&& ode23(@(t,y) cos(t) ,[0 2*pi],2); 也可以，还能直接弹出绘制的图像
站长推荐 /2
Powered by