关闭

[置顶] vb输出1000到2000内能同时被17和37整除的数

一·实验目的 实现1000到2000内所有能被17和37整除的数。 二。实验内容 打开vb6.0正式版之后,直接在代码窗口输入以下语言:   Private Function judge(N As Integer) As Boolean judge = (N Mod 17 = 0 And N Mod 37 = 0)   End Function   Private Sub Fo...
阅读(430) 评论(0)

[置顶] vb程序求出100以内素数的和

一·实验目的 实现100以内所有素数的和。 二·实验内容 打开vb6.0正式版之后,在窗体上画出一个command按钮,点击command按钮,输入以下程序语言: Private Sub Command1_Click() Dim s As Integer Dim n As Integer Dim m As Integer Dim x As Integer Dim flag As...
阅读(2991) 评论(0)

[置顶] vb判断生日是星期几

一·实验目的 输入生日,让程序判断出你的生日是星期几。 二·实验内容 1·首先打开vb6·0正式版,在窗体上画出三个label框,分别写上年月日,在分别在后面留上三个text框,在在顶部画上一个label框,写上“请你输入你的生日,让程序判断出你的生日是星期几”再画出一个command按钮,再画出一个label框,让程序输出你的生日是星期几。 2·编写程序语言,在通用字段输入以下语言:...
阅读(648) 评论(0)

[置顶] vb两位数相乘程序

一·实验目的      实现两位数相乘。实现两位数的逐一相乘,并实现加法和乘法的进位。例如:27乘以34,4乘以7等于28进2,各位保留下8,2乘以4等于8加上2等于10 ,进1。然后3乘以7等于21,进2,1加上0等于1,2乘以3等于6加上2等于8,加上1等于9结果为0918。 二·实验内容      首先打开vb6.0中文版,在窗体上画出三个label,前两个label分别写上n,m,第...
阅读(632) 评论(0)

随机生成10个数

一·实验目的 使用vb程序实现随机生成十个数。   二·实验内容 在vb的窗体上画出一个command按钮,单击command按钮,编写如下程序语言: Private Sub Command1_Click() Me.FontSize = 18 Dim a(10) As Integer Dim mystr As String   Dim printstr As String a...
阅读(213) 评论(0)

比较十个数的大小

一·实验目的 实现十个数的大小比较,最终输出最大的一个数。 二·实验内容 在对象窗口划出一个command按钮,点击command按钮输入以下vb程序语言: Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim max As Integer Dim c As Integer Dim d As Inte...
阅读(221) 评论(0)

比较三个数的大小

一·实验目的     实现三个数的大小比较,比较出最大的一个数。 二·实验内容    在对象窗口画出一个command按钮,点击command按钮,输入以下vb程序语言: Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim max As Integer Dim c As Integer    a...
阅读(176) 评论(0)

比较两个数的大小

一·实验目的      实现两个数大小的比较,比较出较大的一个数。 二·实验内容       在对象窗口划出一个command按钮,点击command按钮输入以下vb程序语言      Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = 78 b = 489   If a > b Then...
阅读(163) 评论(0)

vb显示各位数

一·实验目的 生成随机数。 二·实验内容 1.     建立窗体,画出三个label,分别写上:“请输入随机数下界”,“生成随机数上界”,“生成的随机数”。画出一个command按钮,输入“生成随机数”。画出三个text窗体。 2.     编写程序如下: Private sub command1_click() Dim m as integer Dim n as integer...
阅读(170) 评论(0)

vb生成随机数

一·实验目的 生成随机数。 二·实验内容 1.     建立窗体,画出三个label,分别写上:“请输入随机数下界”,“生成随机数上界”,“生成的随机数”。画出一个command按钮,输入“生成随机数”。画出三个text窗体。 2.     编写程序如下: Private sub command1_click() Dim m as integer Dim n as integer...
阅读(562) 评论(0)

vb实现大小写转换

一·实验目的 实现英文字母大小写转换。 二·实验内容 1.     建立窗体,再创提上画出一个Label,输入文字如下:“英文字母如下:”,再画出一个Text,再画出三个command按钮,分别输入以下文字“转大写”,“转小写”,“还原”。 2.     编写代码:在通用生命段中输入程序语言,如下:dim x as string 点击Text编写如下程序: Private sub...
阅读(914) 评论(0)

vb实现随机图形

一·实验目的    为了实现随机生成不同的图形,满足题目需要,实现vb语言程序的运作,最后画出那令人满意的随机的不同图形。 二·实验内容    在窗体上画一个commandbutton按钮,双击按钮编写程序语言,其语言如下: Private Sub Command1_Click() Show Me.Scale (0, 0)-(18, 8) Me.AutoRedraw = True...
阅读(200) 评论(0)

vb实现能动图形

一·实验目的   为了对vb语言的运用有更好的把握,同时能够运用vb语言实现不同图形随机的运动。 二·实验内容   首先,在form1上画出commandbutton,写上开始运动,在画一个闹钟timer1,再点击画图工具选择第三种类型画出一个小球。双击小球进行编程,语言如下; Dim g As Boolean Dim x As Long     再双击开始运动按钮,编写程序...
阅读(164) 评论(0)

vb实现能动图形

首先,在form1上画出commandbutton,写上开始运动,在画一个闹钟timer1,再点击画图工具选择第三种类型画出一个小球。双击小球进行编程,语言如下; Dim g As Boolean Dim x As Long 再双击开始运动按钮,编写程序语言,语言如下: Private Sub Command1_Click() Timer1.Enabled = True End Sub...
阅读(164) 评论(0)

程序设计的感想

今天,上了第一节课就是计算机,如果是上学期估计又得昏昏欲睡了,呵呵。。。不过今天确提起了我的兴趣,因为换了一个老师,而且都是南方人,亲切呀!还是说一下学习的感想吧,觉得程序设计挺难的,往往出现问题都在一些小细节,所以以后可得细心了。但现在我们还都是抄老师的程序,以后希望自己也能写程序。...
阅读(134) 评论(0)
17条 共2页1 2 下一页 尾页
    个人资料
    • 访问:11874次
    • 积分:252
    • 等级:
    • 排名:千里之外
    • 原创:15篇
    • 转载:1篇
    • 译文:1篇
    • 评论:0条
    文章分类
    文章存档