源码释录3-1 市场诊断-设置界面及源码.pdfVIP

源码释录3-1 市场诊断-设置界面及源码 注释： 本软件所说的市场诊断是指对市场生命周期的诊断。主要包括[计算销售增长]、[普查生命 周期]和 [警示市场异常]三种功能。 点击[市场诊断]按钮即弹出“市场诊断设置”窗口，其中显示了各种参数的默认值，你可以 改变任意 一个设置。点击[确认修改]保存它，则此后窗口上会显示已改变的值。你也可以点击[放弃修改] 不保存 已做的改变，则以后弹出窗口仍显示原来的设置。但是，不管是否保存，系统都会按当前显示 的设置执行任意一种功能。 点击[恢复默认]即将全部设置恢复到安装本软件是的初始默认状态。点击[注释]则显示如 何进行设 置的具体说明，这里不再赘述。 源码： Dim XSZF As String * 1 修设置否（Y/N） 点选市场 Private Sub CombTS_Click() Select Case CombTS.Text Case 用户市场 Me.CombFW.List(0) = 筛选用户 Me.CombFW.List(1) = 全部用户 Me.CombFW.Text = 筛选用户 Case 产品市场 Me.CombFW.List(0) = 筛选产品 Me.CombFW.List(1) = 全部产品 Me.CombFW.Text = 筛选产品 Case 地区市场 Me.CombFW.List(0) = 筛选地区 Me.CombFW.List(1) = 全部地区 Me.CombFW.Text = 筛选地区 Case 行业市场 Me.CombFW.List(0) = 筛选行业 Me.CombFW.List(1) = 全部行业 Me.CombFW.Text = 筛选行业 End Select End Sub 点击按钮 Private Sub ComdZD_Click(Index As Integer) Dim I As Integer Select Case Index Case 0 MsgBox (为使诊断更贴近企业自身情况，需做如下设置： + Chr(10) + Chr(13) + _ １.选择参与计算的“数据年限”，其值可=“数据加工”的设置年限，+ Chr(10) + Chr(13) + _ 默认为３年；还要选择“计算普查提示类别”和“诊断范围”，分别+ Chr(10) + Chr(13) + _ 默认“用户市场”和“筛选用户”。 + Chr(10) + Chr(13) + _ ２.为普查市场生命周期需选择“计算方法”，其中“平均法”是依各年+ Chr(10) + Chr(13) + _ 和各季同期增长率的平均值判断各类市场生命周期的所处阶段；“从+ Chr(10) + Chr(13) + _ 众法”是依各年和各季同期增长率处于哪个阶段的值最多就确认哪个 + Chr(10) + Chr(13) + _ 阶段，默认的是“平均法”。 + Chr(10) + Chr(13) + _ ３.选市场生命周期各阶段销售增长率的上下限：“引入”上限和“成 + Chr(10) + Chr(13) + _ 熟”下限为0.08～0.30默认0.1；“引入”下限和“衰退”上限为0 + Chr(10) + Chr(13) + _ ～0.09默认0；“成长”下限和“成熟”上限为8～15默认10；“成 + Chr(10) + Chr(13) + _ 长”上限和“衰退”下限分别为正负无限大（设置中未显示）。+Chr(10) + Chr(13) + _ ４.为扑捉新的商机或发掘潜在危机，需依据本企业的营销情况，判定并+ Chr(10) + Chr(13) + _ 选择回头客户通常的重复购货周期，默认“年度重购期”。+Chr(10) + Chr(13) + _