下载文档原格式
ppt中存在的问题和不足之处随着现代技术和网络的不断进步，PPT已经成为我们工作和生活中必不可少的工具之一。
PPT具有可视化、简洁易懂、信息传达速度快等优点，因此在商务演讲、教育培训等领域广泛应用，但是仍然存在一些问题和不足之处，下面就来谈一下具体的内容。
一、排版问题1.布局不合理：在制作PPT过程中，很多人往往为了追求美观而忽略了PPT的可读性和易理解性，从而导致PPT的布局不合理，文字、图片、图表等元素排版混乱，难以让听众明确地理解你的表达。
2.字号不统一：有些人在PPT中为了凸显某些重点，会进行字号调整，但不统一的字号会让观众对内容的把握和记忆产生负面影响。
3.颜色不协调：颜色是影响观众情绪和接受程度的一个重要因素，因此在制作PPT时要注意颜色的搭配，保持协调美感。
二、文字问题1.语言不够简洁：PPT中的文字应该简洁明了，避免过多的形容词或副词等繁琐却没有实际意义的修饰词。
2.排版不美观：PPT中的文字排版同样重要，过长的段落和过于小的字体都会影响观众的阅读体验。
3.字体选择不当：PPT文字的字体选择也极其重要，在主题不明确或不符合场合的情况下选择过于花俏或者鲜艳的字体会对阅读和演示过程造成干扰。
三、图片问题1.美工效果过强：PPT中的图片应该是为了辅助文字、解释内容或增强视觉效果而存在的，因此过度夸张或美工化的效果往往会分散听众对内容的注意力。
2.图片分辨率和质量不高：PPT中的图片不仅应该清晰可见，而且还要拍摄或制作效果不错，否则会对演示效果产生影响。
3.图片和文本不配合：PPT中的图片和文本应该紧密配合，而不是单独存在，否则会削弱PPT的传达信息性和演示效果。
四、使用过度动画效果1.效果太多：运用过多的动画效果会化解整个PPT的效果，到最后就会让观众跟不上内容的发展。
2.效果太花哨：运用过花哨的动画效果，很可能会让观众产生厌烦情绪，从而导致对PPT内容的不了解。
3.效果不合理：动画效果应该遵循自然的逻辑，并助于体现主题，避免出现不合理的情况，例如不恰当的动画效果可能会影响观众对讲者的印象。
安装MSDN：全部安装约需1G硬盘空间，建议：选择自定义安装。
1 4. 工具箱: 控件的容器
控件: 用于创建对象,每个控件都有其属性、事件和方法。三类控件内部控件: 默认状态下工具箱中显示的控件ActiveX控件: 存于.OCX文件中，包括各种版本的VB控件以及第三方厂家提供的控件，必要时可添加到工具箱中可插入对象: 将其他应用程序产品作为一个对象加入到工具箱中。如Excel工作表、公式等。
2 5. 工程资源管理器窗口工程: 每个应用程序可称为一个工程
每个工程可包括多种类型的文件文件类型:.Vbp .Frm .Bas .Cls .Ocx .Frx …
3工程文件.Vbp
窗体文件.Frm标准模块文件.Bas类模块文件.Cls……
4*【例4-5】鸡兔同笼。已知笼中鸡兔总头数为h，总脚数为f，问鸡兔各有多少只？
分析：设鸡有x只，兔有y只，则方程式如下：
x+y=h2x+4y=f解方程。解出求x和y的具体公式为：x=(4h-f) / 2y=(f-2h) / 2 5设计界面：Label5、Label6的BorderStyle属性设置为1Text1Text2
Command1Label5
Label6
6Private Sub Command1_Click()Dim h As Integer, f As Integer, x As Integer Dim y As Integer
' 输入h = Val(Text1.Text)
f = Val(Text2.Text)' 计算
x = (4 * h -f) / 2 y = (f -2 * h) / 2
' 输出Label5.Caption = Str(x)
Label6.Caption = Str(y)End Sub 7【例5-2】某运输公司对用户计算运费，距离越远，每公里运费越低，计算标准如下:距离＜250km 没有折扣250km≤距离＜500km 2%折扣500km≤距离＜1000km 5%折扣1000km≤距离＜2000km 8%折扣2000km≤距离＜3000km 10%折扣3000km≤距离15%折扣使用块结构条件语句，按以上标准计算运费
8分析：设每公里每吨货物的基本运费为Price，货物重为Weight，运输距离为Distance，折扣为Discount，则总运费Freight的计算公式为:Freight= Price * Weight * Distance * (1 -Discount) 9界面设计：Text1Text2Text3Label4
Command1
Private Sub Command1_Click()Price = Val(Text1.Text) ' 输入基本运费Weight = Val(Text2.Text) ' 输入货物重量distance = Val(Text3.Text) ' 输入运输距离' 根据不同的运输距离distance计算折扣
If distance < 250ThenDiscount = 0
ElseIf distance >= 250 And distance < 500Then
Discount = 0.02ElseIf distance >= 500 And distance < 1000Then
Discount = 0.0510 ElseIf distance >= 1000 And distance < 2000Then
Discount = 0.08ElseIf distance >= 2000 And distance < 3000Then
Discount = 0.1Else
Discount = 0.15
End If
' 计算总运费
Freight=Price*Weight*distance*(1 -Discount)
' 输出总运费
Label4.Caption = Format(Freight, "0.00")
End Sub
11
If distance < 250ThenDiscount = 0
ElseIf distance < 500Then
Discount = 0.02
ElseIf distance < 1000Then
Discount = 0.05
ElseIf distance < 2000Then
Discount = 0.08
ElseIf distance < 3000Then
Discount = 0.1
Else
Discount = 0.15
End If
12
本例条件语句可以简化为：在书写块结构条件语句时，可以将If语句、ElseIf子句、Else子句和End If语句左对齐，而各语句组向右缩进若干空格，以使程序结构更加清楚，便于阅读和查错。 13
【例5-3】用多分支选择语句实现：输入年份和月份，求该月的天数。
分析：当月份为1、3、5、7、8、10、12时，天数为31天；
当月份为4、6、9、11时，天数为30天；当月份为2时，如果是闰年则天数为29天，否则天数为28天。某年为闰年的条件是：年份能被4整除，但不能被100整除，或年份能被400整除。
14界面设计：Text1Text2Text3 15
代码设计：Private Sub Command1_Click()Dim Y As Integer, M As IntegerY = Val(Text1.Text) ' 输入年份M = Val(Text2.Text) ' 输入月份Select CaseMCase 1, 3, 5, 7, 8, 10, 12Text3.Text = 31Case 4, 6, 9, 11Text3.Text = 30
16Case 2' 如果月份为2If (Y Mod 4 = 0 And Y Mod 100 <> 0)_Or (Y Mod 400 = 0) ThenText3.Text = 29ElseText3.Text = 28End IfEnd SelectEnd Sub 累加分析:累加器(变量)初始化Sum=0重复执行: Sum=Sum+I (I=1,2,…,N) （循环体）
17
【例6-1】输入N的值，求1+2+3+4+…+NF0Sum ,1II>N?
I+1ISum+ISum
T
输入N
输出Sum流程图：
18设计界面：Text1Label3Command1
运行界面： 代码设计：Private Sub Command1_Click()Dim N As Integer, I As Integer, _Sum As IntegerN = Val(Text1.Text) ' 输入累加总项数Sum = 0' 设累加和初值为0For I = 1 To NSum = Sum + I' 循环体Next ILabel3.Caption = Sum ' 输出累加结果End Sub19
20【例6-7】编程序求：1+(1+2)+(1+2+3)+…+(1+2+3+…+n)，n由用户输入。设计界面：
Text1Text2 21
代码设计：Sum1 = 0For J = 1 To ISum1 = Sum1 + JNext J
Private Sub Form_Click()N = Val(Text1.Text)Sum = 0For I = 1 To N
求：Sum1=1+2+…+I
Sum = Sum + Sum1Next IText2.Text = SumEnd Sub
1、下列程序的执行结果为 11,25 N=1 S=0 While S ＜ 20 S = S+ N N = N + 2 Wend Print N；S
2、将上题循环体中的两条语句次序对调，即程序变成以下形式，则执行结果为9，24 N=1 S=0 While S ＜ 20 N=N+2 S=S+N Wend PrintN；S
