下载此文档

实验三实验报告.doc

文档分类：高等教育 | 页数：约3页举报非法文档有奖

1/3

下载提示

1.该资料是网友上传的，本站提供全文预览，预览什么样，下载就什么样。
2.下载该文档所得收入归上传者、原创者。
3.下载的文档，不会出现我们的网址水印。

同意并开始全文预览

(约 1-6 秒)

1/3 下载此文档

文档列表 文档介绍

实验三实验报告
1
程序源代码如下：
Dim a As Integer, b As Integer
Private Sub Command1_Click()
a = InputBox("输入", "a=", "")
b = InputBox("输入另一个数", "b=", "")
End Sub
Private Sub Command2_Click()
If a > b Then
Print a
Else
Print b
End If
End Sub
程序运行界面如下：
2
程序源代码如下：
Private Sub Command1_Click()
i = InputBox("输入一个三位数", "标题", "")
= i
a = i Mod 10
b = i \ 10 Mod 10
c = i \ 100
= a & b & c
End Sub
程序运行界面如下：
3
程序源代码如下：
程序运行界面如下：

实验三实验报告来自淘豆网m.daumloan.com转载请标明出处.