99问答网
所有问题
当前搜索:
vb程序设计经典案例
vb设计
一个计算功能的
程序
答:
vb
功能很强大,制作也方便,这里制作一个输入数字计算结果的
程序
。首先新建一个工程。打开后,输入三个标签,用来标识的,其实也可以不用,但是为了描述这里写上去。也可以文字进行剧中放置美观点。输入三个文本框,注意,这里是和标签对应的,上面是三个标签,这里还是输入三个文本框。然后输入四个按钮,...
做两个
VB程序
简单题目
答:
1.用
VB
编
程序设计
一个简易的计算器 代码:Dim num_1, num2, flagPrivate Sub Command1_Click(Index As Integer) Select Case Index Case 0 To 9 Label1.Caption = Label1.Caption + CStr(Command1(Index).Caption) Case 10 Label1.Caption = Label1.Caption + "." Case 1...
用
VB设计
一个蝴蝶飞动的
程序
答:
1、碰到窗体边缘时,图片会自动改变飞舞的方向(题意中要求的“返回”,只能是在一条线上来回移动,本
程序
实现蝴蝶出发位置随意,能在窗体内四处飞舞),而且头部也会跟着改变方向 2、窗体改变大小时,蝴蝶不会消失不见,会立即在新的窗体内继续飞舞 '建一个Picture1控件,在它的属性对话框内设置Appeara...
vb程序设计
题,请高手解答
答:
为了使大量的数据在输出时看得清楚,我们在运行窗体上设置了一个文本框,并把文本框的属性MultiLine设为True,Scorllbars设为2(带竖直滚动条)。
Vb程序
代码如下:Private Sub Form_Click()Dim a '定义了一个可变类型的数组 a = Array(1, 3, 5, 7, 9, 11)Dim b b = Array(2, 4, 6,...
用
VB设计
一个类似于Windows 操作系统附件中“记事本”功能的应用...
答:
步骤一:绘制界面。新建一个标准EXE工程,将其Caption属性改为“超级记事本”,点击Icon属性给它找个合适的Icon图标。单击菜单“工程”-“部件”,在弹出的“部件”对话框里找到Microsoft RichText Box 6.0和公共对话框Microsoft Common Dialog 6.0并选中它们,单击“确定”按钮。这时左边的工具栏上出现...
关于一个
VB程序设计
答:
程序
界面如上图所示:一个标签(名称为Label1),三个复选框(名称分别为Check1、Check2和Check3,Caption属性分别为红、绿和蓝)一个命令按钮(名称为Command1,Caption属性为结束),完成程序功能的代码如下:Dim red As IntegerDim green As IntegerDim blue As Integer Private Sub Check1_Click()If ...
vb程序设计
实例
答:
Private Sub Form_Activate()'1年期2.25%,2年期2.43%,3年期为2.70%,5年期为2.88%(不记复利)。今有X元,5年以后使用,共有如下6中存法:Const x1 As Double = 0.0225, x2 As Double = 0.0243, x3 As Double = 0.027, x5 As Double = 0.0288 Dim x As Double x = ...
VB
编写
程序
:
设计
一个程序,当单击窗体时,在窗体上显示任意一幅图片。怎样...
答:
首先添加一个窗体,在这个窗体上加一个文本框的控件,在这个文本框的单击事件中写如下的
程序
:Dim num, sum, it(1), n, t, hPrivate Sub Form_Click()File1.Refreshsum = 0List1.ClearFor i = 0 To File1.ListCount - 1t = Split(File1.List(i), ".")(UBound(Split(File1.List(i...
VB程序设计案例
教程目录
答:
VB程序设计案例
教程目录概览序 前言 模块一:VB应用案例1任务一:图书进销存管理系统概述 总体概述 - 2 数据库设计 - 4 系统结构与操作界面 - 7模块二:熟悉VB基础任务一:VB安装与启动 子任务1:安装与启动 - 13 子任务2:集成开发环境 - 17 子任务3:集成开发环境使用 - 24任务二:VB...
帮忙
设计
一个
VB程序
。
答:
Dim a() As String '保存姓名变量 Private Sub Command1_Click() '把TEXT文件内容导入工程 Dim i As Integer Open App.Path + "\姓名.txt" For Input As #1 Do While Not EOF(1)ReDim Preserve a(i)Input #1, a(i)Text1.Text = Text1.Text + a(i) + vbCrLf i = i + 1 Lo...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
vb项目开发案例
vb程序设计经典例题代码
VB程序设计例题
vb可以做什么程序
大一vb程序设计题库
vb程序设计案例教程
VB的编程步骤
vb经典程序100例
vb编写各种趣味小程序