




已阅读5页,还剩20页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
第一章三、编程题第2题.设计由用户在文本框Text1中输入圆的半径,在文本框Text2和文本框Text3中分别显示圆的周长和面积程序。Private Sub Command1_Click() 计算按钮Text3.Text = 3.14159 * Text1.Text 2Text2.Text = 2 * 3.14159 * Text1.TextEnd SubPrivate Sub Command2_Click() 清除按钮Text1.Text = Text2.Text = Text3.Text = Text1.SetFocus 文本框获得焦点End SubPrivate Sub Command3_Click() 结束按钮EndEnd SubPrivate Sub Form_Load() 也可以在属性窗口设置以下几个属性Label1.Caption = 请输入圆半径计算圆周长和面积Label2.Caption = 输入圆半径Label3.Caption = 圆的周长是End Sub第3题.在文本框中输入一个字符串,对字符串进行字体的放大或缩小Private Sub Command1_Click() 放大按钮Text1.FontSize = 30Command1.Enabled = FalseCommand2.Enabled = TrueCommand3.Enabled = TrueEnd SubPrivate Sub Command2_Click() 缩小按钮Text1.FontSize = 6Command2.Enabled = FalseCommand3.Enabled = TrueCommand1.Enabled = TrueEnd SubPrivate Sub Command3_Click() 还原按钮Text1.FontSize = 9Command3.Enabled = FalseCommand1.Enabled = TrueCommand2.Enabled = TrueEnd Sub第5题.编一程序,单击“加边框”按钮,在标签框四周加上边框;单击“隐藏”按钮。使边框不可见;单击“移动”按钮,使边框从当前位置向右移动500Twip,向下移动600Twip。Private Sub Command1_Click() 加边框按钮Label1.Visible = TrueLabel1.BorderStyle = 1End SubPrivate Sub Command2_Click() 移动按钮Label1.Left = Label1.Left + 500Label1.Top = Label1.Top + 500Label1.Move Label1.Left+ 500, Label1.Top + 600 或者用Move方法进行移动也可。Label1.Visible = TrueEnd SubPrivate Sub Command3_Click() 隐藏按钮Label1.Visible = FalseEnd Sub第7题.在文本框中输入正方体的边长,计算正方体的体积,表面积和周长。Private Sub Text1_Change()Label5.Caption = Val(Text1.Text 3)Label6.Caption = 6 * Val(Text1.Text) 2Label7.Caption = 12 * Val(Text1.Text)End SubPrivate Sub Text1_LostFocus()Label5.Caption = Val(Text1.Text) 3Label6.Caption = 6 * Val(Text1.Text) 2Text2.Text = 12 * Val(Text1.Text)Label7.Caption = 12 * Val(Text1.Text)End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenLabel5.Caption = Val(Text1.Text) 3Label6.Caption = 6 * Val(Text1.Text) 2Text2.Text = 12 * Val(Text1.Text)Label7.Caption = 12 * Val(Text1.Text)Text1.SetFocusEnd IfEnd Sub第二章在窗体上使用Print方法显示图2.5所示的界面。然后修改界面和代码,在图形框中用Print方法显示相同的内容。Private Sub Form_Click() Form1.FontItalic = True Form1.Print Italic-Visual Basic Form1.FontName = 楷体_gb2312 Form1.Print 楷体-程序设计语言 Form1.FontName = 隶书 Form1.Print 隶书-程序设计语言 Form1.FontName = 黑体 Form1.Print 旋转-程序设计语言End Sub在图形框中输出内容的事件过程代码为:Private Sub Form_Click() picture1.FontItalic = True picture1.Print Italic-Visual Basic picture1.FontName = 楷体_gb2312 picture1.Print 楷体-程序设计语言 picture1.FontName = 隶书 picture1.Print 隶书-程序设计语言 picture1.FontName = 隶书 picture1.Print 旋转-程序设计语言End Sub4编程序,在图形框中输出指定范围内(范围由文本框输入)的3个随机整数和这三个随机整数和的平方根,平方根保留四位小数。运行界面如图2.7所示。Private Sub Command1_Click()a= Val(Text1) m为下界b= Val(Text2) n为上界以下c,d,e为产生的随机数c = Int(Rnd() * (b - a + 1) + a) rnd()能随机产生01之间小数(不包括1)。d = Int(Rnd() * (b - a + 1) + a) int()函数是取整函数,返回参数的整数部分值e = Int(Rnd() * (b - a + 1) + a)s = Sqr(c + d + e) sqr()函数是开平方函数Picture1.Print c, d, e 结果在图形框picture1中打印,逗号作为打印分隔符。Picture1.Print 三个数和的平方根=; Format(s, #.#) 分号分隔符为紧凑输出,format()函数设定输出表达式s的格式。End Sub Private Sub Command2_Click()Text1 = Text2 = Picture1.Cls 清除图形框中的显示结果End Sub Private Sub Command3_Click() 结束EndEnd Sub 6在文本框中输入一字符串,对字符串进行放大或缩小,运行界面如图2.9所示。提示:(1)单击“放大”按钮,将文本框中的字符串放大24倍,放大倍数通过随机函数产生,倍数表达式为:Int(Rnd * 3 + 2)。(2)为了使每次运行时产生不同的放大倍数,程序运行时先执行Randomize语句。(3)同样,单击“缩小”按钮,将文本框中的字符串缩小13倍,缩小的倍数也通过上述方式产生。(4)单击“还原”按钮,字体大小恢复成初始状态(字体为9磅),此时,“放大”、“缩小”按钮变成可操作状态。(5)不能连续进行放大或缩小操作。执行放大后,“放大”按钮呈暗淡色(不可操作),“缩小”、“还原”按钮有效。同样执行了缩小操作后,“缩小”按钮不可操作,而“放大”、“还原”按钮有效。Private Sub Command1_Click() Randomize 初始化随机数生成器,使之产生不同规律随机数 n = Int(Rnd * 3 + 2) 产生放大倍数(24倍)存入n变量中 Text1.FontSize = Text1.FontSize * n Text1的字号在原来基础上增大n倍 Command1.Enabled = False 当前按钮呈灰色,不可用 Command2.Enabled = True Command3.Enabled = TrueEnd Sub Private Sub Command2_Click() Randomize 初始化随机数生成器,使之产生不同规律随机数 n = Int(Rnd * 3 + 1) 产生缩小的倍数(13倍)存入n变量中 Text1.FontSize = Text1.FontSize n 字号为整数,所以选用整除运算符“” Command1.Enabled = True Command2.Enabled = False Command3.Enabled = TrueEnd Sub Private Sub Command3_Click() Text1.FontSize = 9 还原字号为9磅 Command1.Enabled = True Command2.Enabled = True Command3.Enabled = FalseEnd Sub 8利用Shell函数执行对应的应用程序,单击窗体上的“记事本”按钮图标,执行记事本应用程序;单击窗体上的“画图”按钮图标,执行画图应用程序;单击窗体上的“计算器”按钮图标,执行计算器应用程序。设计界面如图2.11所示。提示:(1)“记事本”、“画图”、“计算器” (NotePad.exe、Mspaint.exe、Calc.exe)是Windows的应用程序,可以通过“开始”菜单的“查找”命令,找到该文件。找到后可用快捷菜单的“属性”来显示该文件的路径和文件名,将其复制下来用于Shell函数中。(2)图标可以自行选择,也可以自已制作。“记事本”的图标可通过“开始”“程序”“附件” “画图”,单击鼠标右键,在快捷菜单的“属性”选择“更改图标”;通过按组合键“Alt+Print+Screen”复制到剪贴板;打开画图程序,粘贴剪贴板内容,截取所需的图标,以位图文件保存到磁盘;最后对命令按钮的Picture属性加入对应的图形文件。 有关shell()函数的使用参考实验书P16.Private Sub Command1_Click()i = Shell(C:windowssystem32notepad.exe, 1) End SubPrivate Sub Command2_Click()i = Shell(C:windowssystem32mspaint.exe, 1)End Sub Private Sub Command3_Click()i = Shell(C:windowssystem32calc.exe, 1)End Sub第三章.单击“除法”命令按钮,计算两个数的除法(取两位小数)、整除和求余。单击“清除”按钮,清除所有文本框的内容,并使焦点回到Text1文本框。单击“结束”按钮,结束程序运行。Private Sub Command1_Click() Dim m%, n% m = Val(Text1.Text) n = Val(Text2.Text)if n0 then Text3.Text = Format(m / n, 0.00) 用Format函数设置了除法结果保留2位小数 Text4.Text = m n Text5.Text = m Mod n 注意mod运算符左、右必须至少有一空格else msgbox(除数n不能为0,请重新输入!)endifEnd Sub Private Sub Command2_Click() Text1.Text = Text2 = Text3 = Text4 = Text5 = End Sub Private Sub Command3_Click() EndEnd Sub 4. 用InputBox函数,从键盘上输入圆半径,求出圆面积、球表面积和球体积。计算圆面积、球表面积、球体积的公式分别为:r2、4r2、4/3r3。运行界面如图3.12所示。Private Sub Command1_Click()Const pi = 3.14159 定义常量pir = InputBox(输入圆半径, 输入框, , 100, 100)s1 = pi * r 2s2 = 4 * pi * r 2v = 4 / 3 * pi * r 3Picture1.Print r 在图形框输出Picture2.Print s1Picture3.Print s2Picture4.Print vEnd Sub 6. 编一个华氏温度与摄氏温度之间的转换程序。用InputBox函数输入一个温度(把输入的温度赋予一个窗体级变量);当单击“转为华氏”按钮,则将摄氏温度转换成华氏温度;单击“转为摄氏”按钮,则将华氏温度转换成摄氏温度。转换公式为:F = 9 / 5 * C + 32 摄氏温度转换成华氏温度,F为华氏温度。C = 5 / 9 * (F - 32) 华氏温度转换成摄氏温度,C为摄氏温度。参考代码如下:Dim a As Single 定义窗体级模块变量a,作用域为整个窗体模块各个事件过程。Private Sub Form_Load() 在窗体装入时输入a值。a = InputBox(请输入温度 + Chr(13) + Chr(10) + 输入, 输入框, , 100, 100)End SubPrivate Sub Command1_Click() 单击Command1按钮为求摄氏温度 Text1.Text = 5 / 9 * (a - 32)End SubPrivate Sub Command2_Click() 单击Command2按钮为求华氏温度 Text2.Text = 9 / 5 * a + 32End Sub 8. 设计一个收款计算程序,用户输入商品的“单价”、“数量”和“折扣”后,单击“计算”按钮或按回车键显示应付款。Private Sub Command1_Click() Label5.Caption = Text1 * Text2 * (1 - Text3) 注意数据类型会自动转换为数值型End SubPrivate Sub Command2_Click() Text1.Text = Text2.Text = Text3.Text = Label5.Caption = End Sub第四章用InputBox函数输入三角形三边a、b、c,判断是否能构成三角形,能构成三角形,求出三角形的面积。否则用MsgBox显示“不能构成三角形”的信息。计算公式如下:P =( a + b + c )/ 2 S = sqr(p*(p-a)*(p-b)*(p-c)要求:对输入的数据用IsNumeric函数对三条边进行测试,若输入非数字字符,显示“输入错误!重新输入”。只有三边都是数字字符才转换成数值,计算三角形的面积(保留三位小数)。界面设计如图4.7所示。Private Sub Command1_Click()Private Sub Command1_Click()a = InputBox(a)Do While Not IsNumeric(a) MsgBox (输入错误,重新输入) a = InputBox(a)LoopText1 = aa = Val(a)b = InputBox(b) Do While Not IsNumeric(b) MsgBox (输入错误,重新输入) b = InputBox(b)LoopText2 = bb = Val(b)c = InputBox(c) Do While Not IsNumeric(c) MsgBox (输入错误,重新输入) c = InputBox(c)LoopText3 = cc = Val(c) If a + b c And Abs(a - b) c Then p = (a + b + c) / 2 s = Sqr(p * (p - a) * (p - b) * (p - c) Label5.Caption = Format(s, 0.000)ElseMsgBox 不能构成三角形, 20 Command2.Value = TrueEnd IfEnd SubPrivate Sub Command2_Click() Text1.Text = Text2.Text = Text3.Text = Label5.Caption = End Sub 2. 编一模拟袖珍计算器的完整程序,运行界面如图4.8所示。要求:(1)输入两个操作数和一个算术运算符,根据算术运算符决定所做的运算。(2)为了保证程序的正常运行,对输入的运算数和运算符需进行检验,如在规定范围以外(输入操作数非法、运算符非法或除数为零),利用MsgBox函数或过程显示出错误信息。(3)若输入错误,清除错的输入内容,利用SetFocus方法使焦点定位后再输入。(4)当窗体上有多个具有焦点属性的控件时,为了确定程序运行时,使每一次按Tab键时焦点按操作数、运算符、命令按钮的次序定位,可以对每个控件的TabIndex属性设置。(5)对多个文本框的输入数据用(LostFocus)进行测试,应防止出现争夺焦点。可以在测试过程中使用如下判断语句。 If Not IsNumeric(Text2) And Text2 Then 参考代码如下:Dim a, bPrivate Sub Command2_Click()Text1 = : Text2 = Text3 = : Text4 = End SubPrivate Sub Text1_lostfocus() If Not IsNumeric(Text1) Then MsgBox 操作数非法,重新输入!, 16 Text1 = Text1.SetFocus Else a = Val(Text1) End IfEnd SubPrivate Sub Text2_lostfocus() If Not IsNumeric(Text2) And Text2 Then MsgBox 操作数非法,重新输入!, 16 Text2 = Text2.SetFocus Else b = Val(Text2) End IfEnd SubPrivate Sub Command1_Click() p = Text3 Select Case p Case + Text4 = a + b Case - Text4 = a - b Case * Text4 = a * b Case / If b = 0 Then MsgBox 零为非法数,重新输入!, 16 Text2 = Text2.SetFocus Else b = Val(Text2) Text4 = a / b End If Case Else MsgBox 运算符有错,重新输入!, 16, 出错信息 Text3 = Text3.SetFocus End SelectEnd Sub 6. 编制程序,用InputBox函数输入学生三门功课的成绩M1、M2、M3,计算某个学生奖学金的等级。奖学金评定标准如下:一等奖:符合下列条件之一的可得一等奖。(1)平均分大于95分者。(2)有两门成绩是100分,且第三门功课成绩不低于80分者。二等奖:符合下列条件之一的可得二等奖。(1)平均分大于90分者。(2)有一门成绩是100分,且其他功课成绩不低于75分者。三等奖:各门功课成绩不低于70分者。符合条件者就高不就低,只能获得高的那一项奖学金,在窗体上显示获奖的等级。第一种方案:在窗体上画一图形框picture1,不排序直接判断Private Sub Picture1_Click()m1 = Val(InputBox(请输入第一门功课成绩, 输入框, , 100, 100)m2 = Val(InputBox(请输入第二门功课成绩, 输入框, , 100, 100)m3 = Val(InputBox(请输入第三门功课成绩, 输入框, , 100, 100)If (m1 + m2 + m3) / 3 95 Or (m1 = 100 And m2 = 100 And m3 = 80) Or (m1 = 100 And m3 = 100 And m2 = 80) Or (m2 = 100 And m3 = 100 And m1 = 80) ThenPicture1.Print 获得一等奖学金ElseIf (m1 + m2 + m3) / 3 90 Or (m1 = 100 And m2 = 75 And m3 = 75) Or (m2 = 100 And m1 = 75 And m3 = 75) Or (m3 = 100 And m1 = 75 And m2 75) Then Picture1.Print 获得二等奖学金 ElseIf m1 = 70 And m2 = 70 And m3 = 70 Then Picture1.Print 获得三等奖学金 Else Picture1.Print 什么都没有End IfEnd Sub第二种改进方案:在窗体上画一图形框输出结果,用一个命令按钮触发,先排序Private Sub Command1_Click() m1 = Val(InputBox(请输入第一门功课成绩) m2 = Val(InputBox(请输入第二门功课成绩) m3 = Val(InputBox(请输入第三门功课成绩) Picture1.Print 三门课的成绩:, m1, m2, m3 If m1 m2 Then t = m1: m1 = m2: m2 = t 先对m1,m2,m3从大到小排序 If m2 m3 Then t = m2: m2 = m3: m3 = t If m1 = 95 Or (m1 = 100 And m2 = 100 And m3 = 80) Then Picture1.Print 获得一等奖学金 ElseIf (m1 + m2 + m3) / 3 = 90 Or (m1 = 100 And m3 = 75) Then Picture1.Print 获得二等奖学金 ElseIf m3 = 70 Then Picture1.Print 获得三等奖学金 Else Picture1.Print 暂未获奖学金,继续努力! End IfEnd Sub 8用InputBox函数从键盘上任意输入3个实数X,Y,Z,在文本框中分两行显示这些数和其中间数(即其值大小居中者)。提示:在文本框中分行输出,首先将文本框的多行属性设置为True,然后用下列方法实现:text1.text=X & “ “ & Y & “ “ & Z & vbCrLf & 中间数。要求:用InNumeric函数对输入进行测试。若输入数据含有非数字字符,显示“不是数字字符,程序结束”。当输入是数字字符时,将其转换成数值,最后找出中间数。 方案一:画一命令按钮Command1触发事件,在窗体上打印,不作数字合法性检查。Private Sub Command1_Click()Dim a, b, c, mid1a = Val(InputBox(a=)b = Val(InputBox(b=)c = Val(InputBox(c=)If a = b And b = c Or a = b And b b And a = c Or a c Then mid1 = aElseIf c b And c a Or c a Then mid1 = cEnd IfPrint a, b, cPrint 中间数是:; mid1End Sub第二种改进方案:画一文本框输出结果,对输入数字进行合法性检验,用命令按钮command1触发,先对x,y,z排序,找中间数yDim x, y, z Private Sub Command1_Click()x = InputBox(请输入x的值)If Not IsNumeric(x) Then i = MsgBox(不是数字字符,程序结束, 53)end Else x = Val(x)End Ify = InputBox(请输入y的值)If Not IsNumeric(y) Theni = MsgBox(不是数字字符,程序结束, 53)end 输入非法,用end结束程序 Else y = Val(y)End Ifz = InputBox(请输入z的值)If Not IsNumeric(z) Theni = MsgBox(不是数字字符,程序结束, 53)end Else z = Val(z)End IfText1 = x & & y & & z & vbCrLf以下三行对 x,y,z先排序,找中间那个数If x y Then t = x: x = y: y = tIf y z Then t = y: y = z: z = tIf x y Then t = x: x = y: y = tText1 = Text1 & 中间的数是: & yEnd Sub第五章有一数列,它的头三项为0,0,1,以后的每个数都是其前三个数的和。编程在窗体上每行输出5个数,输出此数列,直到最后一个数超过1010为止。提示:设置三个变量表示数列中相邻的三项,输出每个新项后,用赋值的方法重新对三个变量赋值。每行输出5个数可以设置一个计输出项数的计数器,判断当每行输出5个数后换行输出。 Private Sub Form_Click()x = 0y = 0z = 1i = 3 用i变量计数,用于后面每输出5个换行Picture1.Print x, y, z,Do While m 1010m = x + y + z 每循环一次得到一个新数mx = yy = zz = m 以上三条赋值语句重新对x,y,z赋值,为后续求下一个新数m做准备。Picture1.Print m,i = i + 1 If Int(i / 5) = i / 5 Then 如果个数i是5的倍数则换行Picture1.PrintEnd IfLoopEnd Sub3用For循环和Do循环在文本框中每行输出一个1010000之间被3除余2、被5除余3、被7除余2的数,在图形框中输出其和及个数。提示:画出界面后,要设置text1的,MULTILINE为TRUE,SCROLLBARS属性为2或3.Private Sub Command1_Click() Dim i%, sum&, count% count = 0 sum = 0 For i = 10 To 10000 If i Mod 3 = 2 And i Mod 5 = 3 And i Mod 7 = 2 Then Text1 = Text1 & i & vbCrLf 一个数放一行,vbCrLf为换行符 count = count + 1 count计数变量+1 sum = sum + i 符合条件的i累加到sum中 End If Next i Picture1.Print count=; count Picture1.Print sum=; sumEnd Sub若要求文本框每行输出5个数,如何修改程序?Private Sub Command1_Click()Dim i%, sum&, count%count = 0sum = 0For i = 10 To 10000If i Mod 3 = 2 And i Mod 5 = 3 And i Mod 7 = 2 ThenText1 = Text1 & i & 用空格分隔各个数count = count + 1 count计数变量+1sum = sum + i 符合条件的i累加到sum中if int(count/5)=count/5 then text1=text1 & vbcrlf 如果是5的倍数则换行End IfNext iPicture1.Print count=; countPicture1.Print sum=; sumEnd Sub4编程计算由下列公式确定的S值,其中n是用户输入的正整数,n可由InputBox函数或文本框输入。注意选用合适的变量类型,界面用户自行设计。(1)S=1*1+2*2+3*3+n*n(2)S=2/1 + 3/2 + 5/3 + 8/5 + 13/8 + 21/13 + (3)S=1+(12)+(123)+ +(123n)(4)S=4(1 - 1/3 + 1/5 - 1/7 + 1/9 - (-1) (1/(2n - 1)(5)S=1 - 1/2 + 1/3 - 1/4 + + 1/99 - 1/100 + + 1/n(1)Private Sub Command1_Click()Dim S&, N%, K% S = 0 N = InputBox(输入一个正整数作为多项式的项数) For K = 1 To N S = S + K*K Next K Print S=1*1+2*2+n*2!; SEnd Sub (2)Private Sub Command1_Click() Dim S#, N%, K%, M%, L% S = 0 M = 2 L = 1 N = InputBox(输入多项式的项数) For K = 1 To N S = S + M / L t = M M = M + L L = t Next K Print S=2/1+3/2+5/3+8/5+13/8+21/13+; SEnd Sub(3)Private Sub Command1_Click() Dim S&, N%, K%, M%, L% S = 0 N = InputBox(输入一个正整数作为多项式的项数) M = 1 For K = 1 To N M = M * K S = S + M Next K Print S=1+(12)+(123)+(123N); SEnd Sub或者用二重循环实现,代码如下Private Sub Form_Click() Dim S&, N%, K%, M%, L% S = 0 N = InputBox(输入一个正整数作为多项式的项数) For K = 1 To N M = 1 For L = 1 To K M = M * L Next L S = S + M Next K Print S=1+(12)+(123)+(123N); SEnd Sub(4)Private Sub Form_Click() Dim S!, N% S = 0 N = InputBox(Inpunt N:) For i = 1 To N S = S + (-1) (i - 1) / (2 * i - 1) Next i Form4.Print S=1-1/2+1/3-1/4+1/99-1/100+(-1)n-1(1/n); 4 * SEnd Sub(5) Private Sub Form_Click() Dim S!, N% S = 0 For N = 1 To 100 S = S + (-1) (N + 1) / N 或 (-1) (1+n) / nNext N Form5.Print S=1-1/2+1/3-1/4+1/99-1/100+(-1)n-1(1/n); SEnd Sub 9. 求31000中所有素数(质数),素数除了1和该数本身能整除该数外,其它的数不能整除该数。Private Sub Command1_Click()For i = 3 To 1000 For j = 2 To i - 1 If i Mod j = 0 Then Exit For End If Next j If i = j Then Text1.Text = Text1.Text & i & vbCrLf End If Next i End Sub可以再改进一下:1)j取值可以更少些 ,到sqr(i)或i/22)可以做一个标识TAG,如果不是素数赋值falsePrivate Sub Command1_Click() Dim i As Integer, j As Integer, Tag As Boolean For i = 3 To 1000 Tag = True For j = 2 To i - 1 sqr(i)或i/2 If i Mod j = 0 Then Tag = False Next j If Tag Then Text1 = Text1 & i & vbCrLf Next iEnd Sub第六章三、编程题1用随机数函数产生100个20100之间的随机数整数,赋予A数组。以每行输出10个元素的紧凑格式在图形框中输出该数组,并在标签框中输出数组元素中的最大值、最小值和它们的平均值。方案一:Option base 1Private Sub Picture1_Click()Dim a(100) As IntegerRandomizes = 0big = 20: small = 100 数据范围在20100之间,假设的初始值要越假越好For i = 1 To 100a(i) = Int(100 - 20 + 1) * Rnd + 20)If big a(i) Then small = a(i)s = s + a(i)Picture1.Print a(i);If i / 10 = i 10 Then Picture1.PrintNext iLabel1.Caption = big & & sm
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 智慧城市安防建设新篇章-智能监控系统融资提案解读
- 教学流程与数字化时代教育的互动结合研讨会
- 抖音商户流量来源数据分析制度
- 抖音商户客服售后问题闭环管理制度
- 服装缝纫技能培训课件
- 天津市河西区第四中学2024-2025学年化学九上期末学业质量监测试题含解析
- 2024-2025学年重庆市江津区支坪中学九年级化学第一学期期末调研模拟试题含解析
- 公共卫生应急物资保障资金申请2025年预算报告
- 南京铁道职业技术学院《移动互联网技术》2023-2024学年第一学期期末试卷
- 大同煤炭职业技术学院《健美操(2)》2023-2024学年第一学期期末试卷
- 2025至2030中国无菌海绵市场行情监测与未来投资商机研究报告
- 《文物修复与保护基础》课件
- 外贸知识培训课件
- 《食品生产经营企业落实食品安全主体责任监督管理规定》解读与培训
- 2025年度风力发电场电力运维保障协议
- 企业法务管理及风险防范措施
- 七年级英语下册单词表2025
- JJF 1183-2025温度变送器校准规范
- 光伏 安装合同范本
- 上海黄浦老西门项目概念方案设计(260P)
- 金融服务不良体验投诉书范文
评论
0/150
提交评论