- 博客(6)
- 收藏
- 关注
原创 vb输出1000到2000内能同时被17和37整除的数
一·实验目的实现1000到2000内所有能被17和37整除的数。二。实验内容打开vb6.0正式版之后,直接在代码窗口输入以下语言: Private Function judge(N As Integer) As Booleanjudge = (N Mod 17 = 0 And N Mod 37 = 0) End Function Private Sub Fo
2012-04-19 17:42:21 1976
原创 vb程序求出100以内素数的和
一·实验目的实现100以内所有素数的和。二·实验内容打开vb6.0正式版之后,在窗体上画出一个command按钮,点击command按钮,输入以下程序语言:Private Sub Command1_Click()Dim s As IntegerDim n As IntegerDim m As IntegerDim x As IntegerDim flag As
2012-04-19 17:33:30 8792
原创 vb判断生日是星期几
一·实验目的输入生日,让程序判断出你的生日是星期几。二·实验内容1·首先打开vb6·0正式版,在窗体上画出三个label框,分别写上年月日,在分别在后面留上三个text框,在在顶部画上一个label框,写上“请你输入你的生日,让程序判断出你的生日是星期几”再画出一个command按钮,再画出一个label框,让程序输出你的生日是星期几。2·编写程序语言,在通用字段输入以下语言:
2012-04-19 17:18:28 1661
原创 比较十个数的大小
一·实验目的实现十个数的大小比较,最终输出最大的一个数。二·实验内容在对象窗口划出一个command按钮,点击command按钮输入以下vb程序语言:Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim max As IntegerDim c As IntegerDim d As Inte
2012-04-25 22:25:15 900
原创 比较三个数的大小
一·实验目的 实现三个数的大小比较,比较出最大的一个数。二·实验内容 在对象窗口画出一个command按钮,点击command按钮,输入以下vb程序语言:Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim max As IntegerDim c As Integer a
2012-04-25 21:42:38 683
原创 比较两个数的大小
一·实验目的 实现两个数大小的比较,比较出较大的一个数。二·实验内容 在对象窗口划出一个command按钮,点击command按钮输入以下vb程序语言 Private Sub Command1_Click()Dim a As IntegerDim b As Integera = 78b = 489 If a > b Then
2012-04-25 21:09:03 451
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人