()-----> 函数 -----> ^ -----> *  \  ------>  /  ------> Mod ----->  +  -
 
                                              c+d
  (c+d)/(a+b)                       ------------
                                               a+b
 
 
 
P*(1+R)^N                    P x (1+R)n

编写过程序的人都知道，随机散列是我们经常要实现的问题。
什么是随机散列？比方说，现在有一个数列1、2、3、4、5、6。我希望得到一个随机的打乱顺序的数列，例如：2，5，6，3，4，1。这个新的数列就是原数列的随机散列。
实际情况中，我们经常需要给定一个范围，就能得到一个随机散列。比方说：给定[2，7]，通过运算得到一个散列：6，4，5，7，2，3。
下面是实现随机散列的一个函数，用的是VB2005编写的。
'函数名：GetRndList
'作用：获得一个随机散列
'参数MinValue：随机散列的下限
'参数MaxValue：随机散列的上限
'参数Count：随机散列的个数
Public Function GetRndList( _
ByVal MinValue As Integer,  _
ByVal MaxValue As Integer,  _
ByVal Count As Integer
) As Integer()
 
If Count <= 0 OrElse Count > MaxValue - MinValue + 1 Then Return Nothing
 
Dim mBase() As Integer, mList() As Integer
Dim i As Integer, j As Integer, mR As New Random
ReDim mBase(Count - 1)
ReDim mList(MaxValue - MinValue)
 
For i = 0 To MaxValue - MinValue
mList(i) = i + MinValue
Next
 
For i = MaxValue - MinValue To MaxValue - MinValue - Count + 1 Step -1
j = mR.Next(i + 1)
Call SwapNumber(mList(i), mList(j))
Next
 
For i = 0 To Count - 1
mBase(i) = mList(MaxValue - MinValue - i)
Next
 
Return mBase
End Function

这是18年我第一次系统接触数据分析时，整理的技能树。现在看来，仍不过时。如果重新对其排序，SQL--Excel--Python/Linux  的学习顺序对于大多数人来说是合适的。研究生读的经管类专业，在系统学习数据分析技能之前，其实我接触过R，Matlab。当初就觉得R轻量好用，Matlab做仿真，符号运算，绘制函数曲线非常方便，没想过学习Python，后来出去实习，发现大多数公司的数据分析师都是用的Python，这才下定决心从R转到Python上来。后来，网上看到一句话，“Python作为一种工程语言，全国研究它的人很多，你遇到的问题大多数前辈们都遇到过并给了解决方案，这点对于入门者非常友好，而R语言的高质量回答你只有在国外论坛上才找的到满意解”。对此，深以为然，索性就开始学习Python。SQL作为数据分析师的必备技能，必须得优先安排。需要注意的是，SQL是泛指，包括Oracle、Mysql、SQLServer对标的标准SQL，也包括Hive的查询语言HQL以及基于Spark的sparkSQL。Excel是做离线数据分析及可视化的首选，且不说它好用，单是业务方也能跟着上这一点，我们就必须熟练掌握它。
书接上文，
求知鸟：Excel常用的数据分析技巧（1）
求知鸟：数据分析常用的excel函数（2）
求知鸟：Excel常用的数据分析技巧(3) 
11、如何快速定义名称？
Excel所有的对象都有名称，单元格默认是用行号和列标来指定，插入浮动类对象，如图表、图片、形状、控件等也不例外。单元格命名好方便我们写公式，做引用，浮动对象命名好，方便我们写代码调用。
场景：要快速为这些可见的对象的命名，最佳办法是什么？
方案1：选中你要命名的对象，例如单元格（区域）、形状、控件等，然后在左上角名称框内直接写名称，然后按下Enter键，即可命名成功。
方案2：对于浮动类的对象，除了方案1外，还可以点【页面布局】，然后【选择窗格】，然后就可以进行批量命名了！而且还能给每个对象设置显示、隐藏，在设计Dashboard时特别实用喔~
12、如何优雅的将日期在文本与时间类型中互转？
场景：直接设置单元格格式，并不能实现文本转日期！方法：需要使用数据--分列—默认分割符tap—日期—下一步！补充下excel中的时间函数：
13、直方图如何绘制&数据透视表划分区间
直方图绘制：
1、可以借助=frequency（手动设置区间统计频率）+（插入选项卡--柱形图--簇状柱形图）+（设置数据系列格式”对话框中单击右侧的系列选项--系列绘制在中系列重叠值设置为0%，分类间距设置为2%（个人喜好））
2、数据透视表：插入选项卡——数据透视表——放置的位置选择新工作表或现有工作表均可——把单价拖到行字段，产品类拖到值字段——然后在行标签中任一单元格点鼠标右键——组合——起始于0，终止于100，步长50——就可以统计出每个区间成绩的个数了。然后可以选用数据--数据分析--直方图--完成设置。
14、当你需要对比多条趋势线时，不妨采用迷你折线图
插入--迷你图--选择数据范围
15、当你觉得你熟练使用excel了，那你会Power Query 吗？
用作数据处理的大众化软件就是万人皆知的Excel了，Excel作为日常办公使用当然没有问题，但在大数据时代，它明显有点扛不住，微软也意识到了这一点，所以从Excel2010开始，推出了一个叫Power Query的插件，可以弥补Excel的不足，处理数据的能力边界大大提升，Excel2013也同样可以使用，现在还在用Excel2010和2013的同学可以从微软官网下载powerquery插件使用。
最后，请关注我的数据分析专栏（微信公众号：求知鸟）：
数据分析​zhuanlan.zhihu.com

VB讲课笔记07：控制结构

学习目标：掌握顺序结构，选择结构和循环结构，以及与三种基本结构相关的 VB 语句的用法，掌握结构化程序设计与面向对象程序设计中，程序的组织和控制方式，掌握 VB 编程的方法和步骤。
一、结构化设计概述
结构化程序设计＝数据结构＋算法
数据结构（数据结构）主要指数据的存贮组织方式，即采用何种数据类型来存贮程序中将要处理的数据。
算法（运算法则）是指计算机解决问题的方法和步骤。算法是程序设计的灵魂，没有算法，就不能进行程序设计。
（一）算法概述
1、算法的定义
        算法是在有限步骤内解决问题的方法和步骤。不同的问题有不同的求解算法，例如求二元一次方程的根与求 N ！，而同一个问题，可能存在多种方法，这时就要选择简单，运算步骤少，效率高的方法。

（ 1 ）有穷性：算法的执行步骤是有限的。
（ 2 ）确定性：每一操作步骤的内容和顺序有确切含义。
（ 3 ）有效性：每一步操作应当有效地执行，并得到确定的结果。
（ 4 ）有零个或多个输入：为数据获取信息。
（ 5 ）有一个或多个输出：没有输出的算法没有意义。

2、算法的描述
算法可以用自然语言、流程图、 N-S 图、伪代码和程序设计语言等来描述。用自然语言来描述算法，文字冗长，容易出现岐意。下面介绍用流程图，N-S 图来表示算法。

表示sum=1+2+3+ …+10的算法
1、传统流程图

2、N-S流程图

（二）VB程序控制结构
1、顺序结构
有一个入口和一个出口。按从上向下依的顺序执行各语句。

2、选择结构
程序发生分支，根据判断框内的条件是否被满足来选择执行一块还是执行 B 块。无论条件是否被满足，只能选择执行一或 B 中之一，不能执行完一块后又执行 B 块无论走哪条路径，都要经过 C 点，然后脱离本选择结构框。



3、循环结构
也叫“重复结构”，反复执行某段代码。
当型循环结构：当条件成立时，执行循环体。  
直到型循环结构：当条件成立，退出循环体。




4、三种结构的共同点
（ 1 ）只有一个入口；
（ 2 ）只有一个出口；
（ 3 ）结构内的每一部分都有机会被执行，对每一个虚线框都应有一条从入口到出口的路径，即没有死语句（永远执行不到的语句）；
（ 4 ）结构内没有死循环（不能终止的循环）；
由三种基本结构实现程序的组织和控制，可以描述任何复杂的问题在具体编程时，每种结构中都可以包含若干条语句。
二、顺序结构
顺序结构主要由赋值语句,输入、输出等语句组成，是三种基本结构中最简单的一种结构。在顺序结构的程序中，按各语句出现的顺序依次执行程序，程序中不出现分支情况。即要执行第 n 条语句，必须先执行第 n-1 条语句。
1、赋值语句
赋值语句是程序中最基本的语句。
（1）格式：[Let ]<变量名 > = <表达式 > 或	[<对象名 >. ]<属性名 > = <表达式 >
（2）功能：将赋值号右边表达式的值赋给左边的变量。
（3）赋值运算的优先级最低。在VB中，若有 a = b = 5 ，a = ？
（4）“表达式“可以是常量、变量、函数调用或 VB 中的各种表达式。
（5）赋值语句有计算的功能。执行赋值语句时，首先计算赋值号右边表达式的值，然后将此值赋给左边的变量或对象属性。
2、注释语句
格式 1 ：Rem <注释内容 >
格式 2 ：'注释内容
功能：为程序加上注释内容，便于理解程序。

3、暂停语句
Stop语句，暂停程序执行，并打开立即执行窗口。Stop可以放在程序的任何位置。当程序执行碰到停止语句，系统会暂停执行，同时打开立即执行窗口，以便跟踪程序。当程序调试完毕，生成可执行文件（. exe 文件）前，应删除所有停止语句。
4、结束语句
End语句，结束程序运行。结束语句能强行中止程序执行，释放所有变量，关闭所有数据文件。
5、With …End With命令 
（1）格式
	With 对象名
       	    [ 语句序列 ]
	End With
（2）功能    
    With语句可以对某个对象执行一系列语句，而不用重复指出对象名称。

三、选择结构
（一）If语句
If 语句是选择结构主要使用的语句。If 语句有四种形式：行If语句、块If语句、If嵌套、If延拓。

1、行 If 语句
（1）格式：If <条件 > Then < 语句 1>[ Else < 语句 2>]
（2）功能：如果条件成立，执行Then后面的语句，否则执行Else后面语句或下一条语句。

选择题真题操练

2、块If语句
（1）格式
	If <条件 > Then
 		< 语句组 1 >
	[ Else
		< 语句组 2 >]
	End If
（2）功能
当条件为“真”，执行语句组 1 ，否则执行语句组 2。
（3）说明
块结构增加了End If作为块的结束语句;
Then和Else后面必须断行。
案例：闰年判断




3、If嵌套结构
If < 条件 1> Then
	If < 条件 2> Then
		...
	End If
[Else
	...]
End If

4、If延拓结构
If < 条件 1>  Then
	<语句组 1>
ElseIf< 条件 2> Then
	<语句组 2>
ElseIf< 条件 3> Then
	<语句组 3>
	...
[Else
	[语句组 N+1]
End If
选择题真题演练

教学案例：判定成绩等级
（1）设计用户界面

（2）编写事件处理代码


（3）运行程序，测试效果




3、IIf 函数
（1）格式
	IIf （条件表达式，值 1 ，值 2 ）
（2）功能
    由条件表达式的值是否被满足来决定返回值 1 还是返回值 2 。
（3）用法
	变量名 =IIf（条件表达式，值1，值2）
        若条件成立，将值 1 赋给变量，条件不成立，将值 2 赋给变量。


4、Choose函数
（1）Choose函数的格式
	Choose(索引表达式，选择项目 1[, 选择项目 2,... [,选择项目 n]])
（2）Choose函数的功能
    根据索引表达式的值，从可选项目列表中选择并返回一个值。
（3）Choose函数的用法
    变量名 =Choose(表达式，选项 1 ，选项 2 ，…)
    若表达式的值为 1 ，将选项 1 的值赋给变量，若为 2 ，将选项 2 的值赋给变量…。













5、情况测试结构
（1）格式
        Selete Case <测试表达式 >
       	      Case <测试值 1>
          		<语句组 1>
               Case <测试值 2>
          		<语句组 2>
        		……
　　    	Case < 测试值 n>
          		<语句组 n>
        	[Case Else
          		< 语句组 n+1>]
          End Select
（2）功能
    测试指定表达式的值。若表达式的值与某一Case给出的测试值一致，执行Case语句下面的语句组，执行完后跳过End Select语句，执行下一个语句。
（3）说明
“测试表达式”可以是数值表达式或字符串表达式。“ 测试值” 必须与测试表达式的类型相同。当测试表达式的值与某个测试值相同时，执行该Case分支的语句。该语句与If延拓结构相似，对多个能满足的值，只执行第一个Case下面的语句序列。
（4）测试值三种情况
	① 常量 1[ ，常量 2] …	表示某个值
	② 常量 1	To 常量 2	表示范围
	③ Is 表达式			表示条件

案例：利用情况测试结构判定成绩等级




这个程序有一个小Bug，你能找出来吗？

选择题真题演练
四、循环结构
在指定条件下重复执行的一组语句的程序控制结构称为循环结构，多次重复执行的一组语句叫循环体。在 VB 中每一种循环控制方式都涉及三个方面的内容：循环初始条件、循环继续条件及循环的控制、循环体的算法。
1、While …Wend循环语句（当型循环）
（1）格式
      While < 循环条件 >
		   [ 循环体 ]
	Wend
（2）功能
    当条件满足时执行循环体，条件不满足则不执行循环。

2、Do-Loop循环
（1）Do While格式（前测试当型循环）
        Do While < 循环条件 >
   		 < 循环体 > 
    		[ Exit Do ]        
	Loop

（2）Do Until格式（前测试直到型循环）
        Do Until < 循环条件 >
		< 循环体 > 
    		[ Exit Do ]        
	Loop

（3）Loop While格式（后测试当型循环）
        Do 
   		< 循环体 > 
    		[Exit Do ]        
	Loop While < 循环条件 >

（4）Loop Until格式（后测试直到型循环）
        Do 
		< 循环体 > 
    		[ Exit Do ]        
	Loop Until < 循环条件 >

3、For...Next循环（计数循环）
（1）格式
	For  X = a To b [Step c]
		[ …… ]
		[ Exit For ]
		[ …… ]
      Next [ X ]
（2）功能
    以指定次数来重复执行循环体。 

说明：当型循环是条件满足时执行循环，条件不满足时结束循环；直到型循环相反，条件不满足时执行循环，条件满足时结束循环。前测试循环可以一次循环也不执行，而后测试循环至少要执行一次循环。

案例1：利用各种循环格式计算1+2+……+100。
（1）创建工程，更名为“利用各种循环进行等差数列求和”，添加五个按钮，设置名称和标题属性

（2）编写【利用While Wend循环求和】按钮单击事件处理代码

（3）编写【利用Do While循环求和】按钮单击事件处理代码

（4）编写【利用Do Until循环求和】按钮单击事件处理代码

（5）编写【利用Loop While循环求和】按钮单击事件处理代码

（6）编写【利用Loop Until循环求和】按钮单击事件处理代码

（7）运行程序，测试效果






4、循环嵌套
在一个循环结构的循环体中包含另外一个循环结构，称为循环嵌套（或称多重循环）。
（1）内外循环不能相交。循环嵌套时，内层循环的结束语句必须放在外层循环的结束语句之前。下表中列出了循环嵌套正确和不正确的几种情况。
（2）循环嵌套中，每个循环的循环控制变量是唯一的。
（3）当程序中For…Next和Goto语句同时存在时，只能从内层循环转到外层循环，不能从外转向内。

案例1：打印九九表
（1）创建工程，更名为“打印九九表”，添加一个按钮，设置名称与标题属性
（2）编写【打印】按钮单击事件处理代码

（3）运行程序，单击【打印】按钮

案例2：百钱买百鸡问题
我国古代数学家张丘建在《算经》一书中曾提出过著名的“百钱买百鸡”问题，该问题叙述如下：鸡翁一，值钱五；鸡母一，值钱三；鸡雏三，值钱一；百钱买百鸡，则翁、母、雏各几何？

翻译过来，意思是公鸡一个五块钱，母鸡一个三块钱，小鸡三个一块钱，现在要用一百块钱买一百只鸡，问公鸡、母鸡、小鸡各多少只？
（1）创建工程，更名为“求解百钱买鸡问题”

（2）编写【求解】按钮单击事件处理代码

（3）运行程序，单击【求解】按钮

案例3：打印100以内的全部素数。

选择题真题演练



第1次循环，i=6，Arr(6)=6-3=3
第2次循环，i=7，Arr(7)=7-3=4
第3次循环，i=8，Arr(8)=8-3=5
第4次循环，i=9，Arr(9)=9-3=6
第5次循环，i=10，Arr(10)=10-3=7
Arr(6) + Arr(Arr(6) + Arr(10))=3+Arr(3+7)=3+Arr(10)=3+7=10

单击命令按钮Command1，输入2355270224，输出结果是（    ）。
本题涉及到循环、数组、字符串截取等知识点。
输入2355270224，则x="2355270224"
Len(x)=10，for循环要进行10次循环。
第1次循环，k=1，b=Mid(x,1,1)="2"，a(2+1)=a(2+1)+1，那么a(3)=a(3)+1=0+1=1
没有必要傻傻地这样循环下去，应该理解这次循环究竟干了什么事情。截取的数字是2，那么a(3)就要累加1，那么我们看看整个输入的字符串里包含了多少个“2”，结果发现有4个2，因此，最后a(3)应该是4。我们浏览一下四个选项，发现第三个数组元素为4的只有选项A，因此我们很容易得到正确的选择。