精华内容
下载资源
问答
  • vb各种程序设计实例

    2011-04-21 18:16:46
    内有20个vb小程序 源代码俄罗斯方块 五子棋 打地鼠 拼图 黑白棋 等等。。。非常齐全。。。
  • 作业-VB小程序设计

    2015-07-14 16:43:14
    作业-VB小程序设计
  • 大量VB小程序源码,快速上手vb,大家一起学习,共同进步
  • VB小程序案例集合

    2011-11-24 14:42:15
    没事情自己随便捣弄。捣弄。 VB程序开发案例
  • vb窗体程序设计实例

    千次阅读 2015-01-03 20:03:00
    End '退出程序 End Sub Private Sub Form_Load() '窗体1加载事件代码 Form2.Show '窗体2显示 Form1.Show 1 '窗体1为模式窗体,即始终位于窗体2前面 End Sub 窗体2代码 窗体2窗体名称Form2,文本框...

    实现功能

    用户密码验证登录,按键识别。

    窗体1:两个标签,两个文本框,两个按钮。窗体2:一个文本框


    窗体1代码
    窗口名称Form1,标签1,2分别为Lbl1,Lbl2,确定,取消按钮为,cmd1,cmd2,用户名文本框和密码文本框为txt1,txt2
    Private Sub Cmd1_Click() '确定按钮鼠标单击事件代码
     If txt1.Text = "user" Then '若用户名文本框输入正确
        Txt2.SetFocus '密码文本框激活
     ElseIf txt1.Text <> "user" Then '若用户名文本框输入不正确
         MsgBox "请输入正确的用户名!", vbOKOnly + vbInformation, "注意" '显示警告窗口
     End If
     If Txt2.Text = "123456" Then '若密码文本框输入正确
       Form1.Hide '窗体1隐藏
       Form2.Show '窗体2显示
    ElseIf Txt2.Text <> "123456" Then '若密码文本框输入不正确
       MsgBox "请输入正确的密码!", vbOKOnly + vbInformation, "注意" '显示警告窗口
     End If
    End Sub
    Private Sub Cmd2_Click() '取消按钮鼠标单击事件代码
      End '退出程序
    End Sub
    Private Sub Form_Load() '窗体1加载事件代码
      Form2.Show '窗体2显示
      Form1.Show 1 '窗体1为模式窗体,即始终位于窗体2前面
    End Sub
    
    
    窗体2代码

    窗体2窗体名称Form2,文本框名称Txt
    Private Sub Form_Click() '窗体2的鼠标单击事件代码
      Form2.BackColor = RGB(0, 255, 0) '将窗体2的背景色设置为绿色
    End Sub
    
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '窗体2的KeyDown事件代码
      Dim ShiftDown, AltDown, CtrlDown '定义变量
      Dim Txt As String '定义变量
      ShiftDown = (Shift And vbShiftMask) > 0 '
      AltDown = (Shift And vbAltMask) > 0 '
      CtrlDown = (Shift And vbCtrlMask) > 0 '
      If KeyCode >= 48 And KeyCode <= 105 Then '设置键代码范围以显示字母和数字
         If ShiftDown And AltDown And CtrlDown Then '若Shift、Alt、Ctrl键被同时按下
            Txt = "Shif+Alt+Ctrl" '为Txt赋值
         ElseIf ShiftDown And AltDown Then '若Shift、Alt键被同时按下
            Txt = "Shif+Alt" '为Txt赋值
         ElseIf ShiftDown And CtrlDown Then '若Shift、Ctrl键被同时按下
            Txt = "Shif+Ctrl" '为Txt赋值
         ElseIf CtrltDown And AltDown Then '若Alt、Ctrl键被同时按下
            Txt = "Ctrl+Alt" '为Txt赋值
         ElseIf ShiftDown Then '若Shift键被同时按下
            Txt = "Shif" '为Txt赋值
         ElseIf AltDown Then '若Alt键被同时按下
            Txt = "Alt" '为Txt赋值
         ElseIf CtrlDown Then '若Ctrl键被同时按下
            Txt = "Ctrl" '为Txt赋值
         ElseIf Shift = 0 Then '若三键均未被按下
            Txt = "" '为Txt赋值
         End If
         Txt = Txt + Chr(KeyCode) '为Txt赋值为键代码对应的字符
         txt1.Text = "您按下了" + Txt '显示用户按下的键
      End If
    End Sub
    
    Private Sub Form_Load() '窗体2装载事件代码
    Form2.KeyPreview = True '允许窗体响应键盘事件
    txt1.Text = "" '设置标签的属性
    End Sub
    
    Private Sub Form_Resize() '窗体Resize事件代码
      txt1.Move Form1.Width / 2 - 800, Form1.Height / 2 - 400, 1600, 400 '设置标签的位置
    End Sub






















    展开全文
  • 程序示例2:VB版的Hello World 程序示例3:计算圆面积 第一节 测绘程序设计的意义 随着计算机技术和测绘科技的不断发展,计算机技术在现代测绘科学中的应用也越来越广泛,已经深人到从理论研究到生产应用的各个...
    展开全文
  • 100个VB精彩小程序源码实例
  • 如何用VB6.0版编写一个变色的程序?在窗体添加一个标签,一个计时器控件,Private Sub Form_Load() Timer1.Enabled = True ...用VB编写的应用程序,实用一点,但不需要太长实用例子,吸引学生兴趣。Private Sub ...

    如何用VB6.0版编写一个变色的程序?

    在窗体添加一个标签,一个计时器控件,Private Sub Form_Load() Timer1.Enabled = True Timer1.Interval = 1000 Label1.Caption = "字体随机变色" End Sub Private Sub .

    用VB编写的应用程序,实用一点,但不需要太长实用小例子,吸引学生兴趣。

    Private Sub mianji() Dim a As Single, b As Single, c As Single a = Val(InputBox("请输入三角形的边a:", "输入")) b = Val(InputBox("请输入三角形的边b:", "输入.

    学校要交至少10个VB程序,所以跪求10个简单程序,不胜感激!邮箱:。

    第一个 text1="哎,现在的人啊." 第二个 label1.cpation="能学到什么呢?" 第三个 me.caption="作业还要别人做..." 第四个 print "这个样子不是在欺骗自己么" 第.

    打开vb,选择新建抄工程,标准exe,点击运行启动,就看见一个窗袭体。这就是最简单的vb程序。然后点击运行百结束,视图,度代码窗口,粘贴如下代码:Private Sub .

    例如解方程的

    我写了一个解一元二次方程的小程序,您可以参考一下 Private Sub Form_Load() a = InputBox("a=", "请输入二次项的系数") b = InputBox("b=", "请输入一次项的.

    我想用vb写一个非常简单的程序,只要能在窗体中,输入自变量x,然后一按.

    do x=int(rnd*10) y=int(rnd*10) do if x*y=val(tres) then 'tres为你要输入结果的东东 出题.enable=true exit do else 出题.enable=false msgbox "计算错误,从新写吧" end if .

    像桌面飘雪 给个做法+代码 或者教程

    VB制作奇形怪状的窗体 普通的窗体都是方方的,使用API函数可以做出一些奇怪的形状。比如,窗体是圆角矩形,在中间挖一个椭圆形的洞。先要理解一个重要的概念:区.

    在桌面上,鼠标左键双击程序,在打开的VB6主界面上,左边是工具菜单栏,单击标签按钮,在Form1窗口上,绘制出一Label1,然后在其属性窗口上改个名字,如.

    详细一点不要太复杂

    给你写了个隔5秒改变一次窗体背景颜色的程序,即容易懂又好玩.Option Explicit '要求变量声明,根据个人习惯,建议最好使用 Dim i As Integer '定义i为全局变量 Private .

    一个小实验,就是做一个小程序,能够统计输入的文章(中英文,符号)的字。

    帮助~~宇~~来解答 这是专为你写的一个小程序,希望能对你用帮助! 这里只能提供按钮事件的源码,整个工程源码打包请到: http://www.exfsoft.com/upload/file/q.

    一个很简单的小程序 串口输入一个数据X(010%为不及格 否则及格 那位高手。

    Private Sub Command1_Click() Dim x, k x = InputBox("请输入一个数据<0~~100%>:") If x < 0 Or x > 1 Then k = MsgBox("请输入有效数据!", vbExclamation) .

    这个VB小程序不需要任何显示界面,双击运行----复制25.txt 内容到剪贴板---结。

    vb6代码如下,添加模块,工程--属性--启动对象选择sub main Sub main() Open "c:\temp\25.txt" For Input As #1 Clipboard.Clear Clipboard.SetText StrConv(InputB(LOF(1).

    要好玩的,有趣的。谁有呀?

    整人的小程序,会弹出对话框提示:快说我是猪,不输入的话会在1分钟之内自动关机,输入的话,当让会被笑话啦,呵呵 将以下文字粘贴到记事本上后将后缀名改为:.

    怎样 使几张图片 在程序中动起来 ,按下"command1"键 使图片停止

    form1上放置Command1,Timer1,Picture1(装入一个图片) Dim MoveStep As Integer Private Sub Command1_Click() Timer1.Enabled = False End Sub Private Sub Form_.

    100RMB有偿聘请哦~ 有意者联系1284343. 就是很简单的一个小程序,网址更。

    Private Sub Command1_Click() Label1.Caption = "欢迎来到精彩的VB世界" End Sub Private Sub Form_Load() End Sub============ 需要控件 Label Label的名字是.

    编写程序,要求程序运行时单击“生成”按钮在窗体中输出指定范围内的(范。

    Private Sub Command1_Click() '生成 Randomize a = Int(Text1.Text) b = Int(Text2.Text) Print "三个随机数为" For i = 1 To 3 x = Int(20 + Rnd * (b - a + 1)) Print x, s = s + .

    新做了两个EXE 一个运行后 另外一个EXE也运行 但另外那个EXE隐藏了 但进。

    api showwindow() 如果这两个程序都是你写的,自己在formload中form2.show()就可以了 Private Declare Function FindWindow Lib "user32.dll" Alias ".

    清空回收站代码 Private Declare Function SHEmptyRecycleBin Lib "shell32.dll" Alias "SHEmptyRecycleBinA" _(ByVal hwnd As Long, ByVal pszRootPath As String, .

    想写一个vb的小程序,但是不懂,请各位高手帮忙一下,再此先谢过了,具体。

    Const str = "abcdef" '你所说的6个字符 Dim s As Long '设置一个变量s Private Sub Command1_Click() Text3.Text = Mid(str, (s - 3) Mod Len(str) + 1, 1) '按你的要求显示 .

    找到好的程序要考试了阿

    Private Sub Command1_Click() Dim b(1 To 10) As Single Dim a, a1, a2 As Integer For i = 1 To 10 b(i) = InputBox("请输入一个数:") If b(i) > 0 Then a = a + 1 If b(i) < 0 .

    展开全文
  • VB实用小程序实例源码集,考察的技术要点比较多,比如涉及到了窗体界面设计、数据库、字符处理、鼠标特效_动画光标、系统菜单_图形菜单、系统设置_回收站、系统时钟、窗体_切换控制、文件阅读_读取txt等内容,每一个...
  • 100个VB精彩小程序源码实例打包.rar
  • vb小程序的开发实例和简单介绍,希望大家能够利用上!
  • 40个vb小程序

    2014-03-21 13:33:30
    自己开发的vb小程序源代码和窗口,你可以进行修改和学习
  • vb小程序程序示例 适用于初学 简单数据库因应用
  • VB实例-扫雷小程序

    2013-04-16 09:18:07
    VB实例-扫雷小程序源码 安装VB后打开后缀为VBP的文件即可!
  • 此试验用于熟悉相关的vb操作,以及课余的一个小小的娱乐
  • vb小程序

    2007-10-01 23:43:16
    vb cheng xu shi li 实例
  • 下面是编为大家收集的vb程序设计论文,希望能够帮助到大家。Visual Basic(简称VB)是目前使用最广泛的一种程序设计语言,是在Basic语言的基础上发展起来的,它继承了Basic语言简单易用的优点,结合了可视化界面的...

    vb程序设计论文

    在社会的各个领域,大家都跟论文打过交道吧,论文的类型很多,包括学年论文、毕业论文、学位论文、科技论文、成果论文等。如何写一篇有思想、有文采的论文呢?下面是小编为大家收集的vb程序设计论文,希望能够帮助到大家。

    262f710c59fbc3b2706f5fd665a84ee3.png

    Visual Basic(简称VB)是目前使用最广泛的一种程序设计语言,是在Basic语言的基础上发展起来的,它继承了Basic语言简单易用的优点,结合了可视化界面的设计方法,采用面向对象、事件驱动的编程机制,把Windows编程复杂性进行巧妙封装,使开发Windows环境下的各种应用软件变得更为容易。因此,目前国内很多高校都选择将《VB程序设计》这门课程作为理工科专业的一门基础课程。程序设计具有知识结构严谨、逻辑性强的特点,学生学习起来比较困难,教学效果也不尽如人意。如何提高本课程的教学质量和教学效果,是每位授课教师都会关注的课题。

    1教学中存在的问题

    就VB程序设计这门课程的教学现状而言,通常采用的还是以课本原有知识体系为脉络的传统讲授法,教学内容大多以线性方式展开,同时结合上机实践操作来巩固和熟悉课堂上所讲的每一章节的知识点。经过教学实践证明,这种教学模式能够让学生掌握Visual Basic的较多的理论知识,也可以阅读程序代码,但是让学生自己解决一些问题的时候,通常都会束手无策。经过分析总结出此课程在教学中存在的问题:

    一是教学内容与教学目标不一致。VB程序设计课程的教学目标是培养学生程序设计的基本知识、思维方式以及基本的操作技能,而教师在实际授课时,大多单纯依照教材讲授理论基础知识,授课基本上是以语言自身的知识体系为脉络展开,过分注重语句、语法和结构的讲解,忽视对学生分析与解决问题能力的引导,不能很好的将编程环境、程序设计语言、算法、数据结构以及程序设计思想关联起来形成体系化教学。[1]导致学生只学会了语法概念而不会使用,能够读懂某一条语句,却无法理解一段代码的含义。

    二是实验内容过于简单。上机实验大多都是属于基础与验证型实验,偏重于VB语言的基本语法和结构的练习,能够帮助学生更好的理解和掌握这些语法知识,但无法培养学生编程能力和解决实际问题的能力。实验内容普遍都是知识点案例,针对的是具体的一个或多个知识点,没有依托完整的实践项目,使学生对知识点的学习感到枯燥无味,而且很容易遗忘。

    三是学生缺乏计算机的思维方式。学生在接触这门课程之前通常没有任何基础,学生普遍缺乏相应的知识背景和算法思想,对程序设计的思维方式还不适应,分析和解决问题的能力处于一个较低的水平。在学习过程中经常会出现这种情况,教师对程序进行分析讲解时学生能够听懂理解,代码也能够读懂,但是让学生自己编写时,就无处下手,久而久之学生对编程充满畏惧感,对学习本门课程缺乏兴趣。

    如何改变目前教学中存在的问题,让学生能够更好地掌握VB语言,掌握程序设计的基本方法?需要对课程的教学进行改革和创新。

    2课程教学改革

    2.1拓展教学内容

    本课程主要培养学生的程序设计思维方式和实际编程能力,而不是单纯的程序设计语言,因此必须打破固有的以“语法”和“结构”为中心的传统教学理念,以突出能力培养为主轴,围绕能力培养组织教学内容。教学内容的选择不能仅仅局限在一本教材上,要突破教材局限,将程序设计中所需要的众多知识点加以整合,包括VB语言的语法结构、可视化编程方法、常用的算法、数据结构以及程序的调试等,形成新的知识体系。在这里算法是程序设计的核心,而语言只是一种工具,在授课的过程中,特别是讲解实例时,需要剥开语言这层外壳,让学生掌握其中的精粹——算法,也就是如何利用计算机来解决某一具体问题。

    当然,这并不是说语言不重要,语言是程序设计的工具,如果不掌握语言,程序设计就无从谈起。教材上的语法描述非常细致、系统,但大量的语法规则会使初学者感觉枯燥,这非常影响学生的学习兴趣。根据二八定律,在任何一组东西中,只有20%是最重要的,事实上VB语言也是如此,最常用、最重要的知识点并不是很多。因此在讲述语法时,只需提供给学生最基本的语法知识,其余的细枝末节可以由学生自学。

    2.2优化教学方法和教学策略

    在程序设计的教学中,传统讲课方式的缺陷已众所周知,因为这是一种以教师为主、学生为辅的一种授课形式,讲课中教师是积极的而学生是消极的,很难把学生吸引到学习进程之中。但这不是意味着要把这种授课方式抛弃,讲课是把大量知识传递给学生的一种常用模式,尤其在本课程的教学中,学生缺乏普遍缺乏知识背景,大量的理论知识需要传递给学生,这就需要教师进行详细地讲解。在讲解时应该采用多种策略,比如在讲述抽象概念时最好与实践相关联,或者与学生已有的知识联系起来,这样比较容易理解。在提到函数和数据类型的时候,可以跟学生比较熟悉的Excel中的.相关概念关联起来。在讲述面向对象的概念时,可以拿Windows操作系统作为例子,它就是依照面向对象的思想编制而成的,在桌面上的每个图标,可以理解成一个对象,当需要启动某个对象时,只需用鼠标点击它(消息驱动)。[2]不仅如此,在不同的情境下还需要灵活运用多种教学方法,如问题法、引导法、任务驱动和实例教学法等,这样有助于让学生从消极的学习者转变为积极的学习者。

    2.3完善实验教学体系

    VB程序设计是一门理论性和实验性都很强的课程,对实验环节有较高的要求。要学好这门课,学生只有经过大量的上机实验,才能掌握程序设计的技能和方法。因此,在教学过程中要给学生留出足够的上机时间,让学生在实验中理解VB语言的基本概念,掌握基本的编程方法。结合学生的专业方向,精心选择合适的案例、设计型与研究型课题,构建有助于培养学生动手能力和程序设计思维方式的实验教学平台。整个实验环节分为三个层次设计,基础验证型、设计开发型和研究创新型实验,每次实验课有多个基础验证型实验,帮助学生掌握相应的语法知识和算法设计,每一章精选1~2个设计开发型实验,与学生分析讨论解题思路,引导学生独立解决问题,培养学生的上机调试能力。学生以小组为单位,选择一个与其专业相关的研究题目,要求学生逐步完成研究分析与报告,写出个人的心得体会,并在学期末给出一定的时间完成课题。

    2.4创建项目实例库

    充分利用网络资源,搜集各类完整的VB程序实例,从中选取典型的、有实际意义的实例,作为程序设计的模板提供给学生。大多数学生基本上是初次接触计算机程序设计,习惯采用数学思维方式来分析问题,还没有真正掌握计算机编程的基本思路。在实验过程中,遇到一个新的题目,学生往往不知道从何下手,思路不清晰,此时就可以从项目实例库找出对应的实例,通过借鉴或修改相应的模板得到结果。“熟读唐诗三百首,不会做诗也会吟”,经常阅读这些实例,能够拓展学生的视野,促进学生对于程序设计思想的理解与认识,提高学生的编程能力。

    在具体实施上,整理出40~50个典型项目实例,将它们分为五大类:基础类、算法类、图形类、文本类和应用类,供学生自主学习,另外从中选取6~8个典型的项目实例,要求学生必须理解掌握,这些实例基本上包含了这门课程的知识要点,理解了这些实例,对于课程的知识结构会有一个全面的了解。其中,学生最喜欢也最有兴趣的实例就是弹球游戏,通过对弹球游戏程序代码的阅读分析,学生能够更好地掌握定时器控件和控件坐标等相关的知识,学生也很有兴趣地去改写程序代码,以获得类似的动画效果,可见好的实例能够激发学生的求知欲望,提高学生的学习积极性,培养学生分析问题和解决问题的能力。

    3结束语

    VB程序设计课程对于理论知识和实际操作均有较高要求,教学时需要综合运用多种教学方法和教学策略,充分调动学生的学习积极性和主动性,将教学重点放在算法的分析和编程的训练上,注重实验教学环节,加强对学生程序设计思维方式和实际编程能力的培养,提高课程的教学效果。

    【vb程序设计论文】相关文章:

    展开全文
  • VB工具栏设计案例.zip

    2020-05-21 16:30:29
    程序以一个简单的案例,来介绍了VB中工具栏的设计方法,以及ImageList控件的使用方法。如何动态的设置ImageList图片大小,添加图片,为Toolbar绑定ImageLIst,添加按钮,添加占位符,设置占位符宽度等等。属于一起...
  • vb小程序 增删改查

    2010-10-13 11:05:03
    VB小程序 操作数据库增删查 适用于刚学习的哥们
  • 电子书-vb.net程序设计教程

    热门讨论 2011-09-21 15:58:44
    辑器、管理统计图、动画设计及小型图案自动生成系统设计等4 个应用程序实例,可作为学 生综合设计练习或实训参考。本书所提供的程序实例简明易读,所有程序均在Visual Basic .NET 环境下上机通过。
  • vb经典小程序100例

    热门讨论 2010-05-03 21:19:45
    vb经典小程序。适合vb初级学者。结合vb的基础空间编写的小程序
  • VB----经典小程序设计-俄罗斯方块
  • vb 游戏编程序实例

    2008-11-07 16:24:50
    VB编写的游戏的程序,有详细的讲解. 可以用来学习提高自己的VB编程能力.
  • vb.net精彩程序实例

    2011-09-03 23:49:52
    程序名称 欢迎进入 ...大写转换 换算时间 判断是否退休 书名 圆和球体的计算 自由落体 ASCII码 计算公式 计算日期 求三角形面积 数制转换 查找和替换 倒序的字符 加班补贴 显示成绩单 运行应用程序
  • 几个vb课程设计案例,源代码,3个小程序
  • 幸运52小游戏VB小程序

    2009-06-18 19:21:32
    这是我自己写的一个小程序源程序,很不错哦!
  • VB.net程序源码120实例(VS2013),多多学习,多多参考。

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 27,751
精华内容 11,100
关键字:

vb小程序设计实例