99问答网
所有问题
当前搜索:
vb简单程序代码
用
VB
怎样制作
简单程序
?
答:
1. 用VB新建一个标准EXE程序 2. 用 Lable 、TextBox 和 CommandButton 控件在窗体中设计界面如下:3. 双击“抽取”按钮,并在
代码
窗口中修改代码如下:Private Sub Command1_Click()Dim v1 As Long, v2 As Long, v3 As Long v1 = Val(Text1)v2 = Val(Text2)v3 = Int(Rnd(1) * (v2...
用
VB
编写一个计算器
程序
的
代码
答:
1、创建控件组的方法首先创建一个命令按钮,调整其大小(觉得合适就行),名称为Command1,Caption 属性为数字 0 ;然后进行“复制”和“粘贴”,当选择“粘贴”时,出现对话框提示已有一个同名控件,询问是否创建控件组,选择“是”后,即创建了一个名为“Command”的控件组。这时,第一个按钮的Index...
VB
编写
简单
的计算器
程序
答:
01 打开
VB
,新建一个EXE文件。02 画上四个方框,表示运算法则(即加减乘除四项),3个文本控件表示数,一个标签控件为“=”。并对控件进行命名。03 然后进行
代码
编写。双击对应的按钮控件,进入代码编写界面。Text3.Text
求用
VB
做一个记事本的
简单程序
答:
Dim fileno As Integer '定义文件号变量 Dim f_name As String '定义文件名变量 Dim s, s1 As String '定义字符串变量,用来读取文件内容 '定义过程openfile,用来实现打开文件的功能,供其他
代码
调用 '避免代码的重复编写 Sub openfile()'利用对话框控件设置“打开”对话框中可以选择的文件类型 cd1...
VB
编写一个
简单程序
,要求:单击命令按钮来显示或隐藏标签,具体点的解答...
答:
请按以下步骤操作:打开
vb
新建一个工程,保存好 窗体上画一个一个命令按钮command1(命令按钮标题“隐藏”),一个标签label1,标签最好打几个字 双击命令按钮进入
代码
编辑器 写如下代码:if command1.caption='隐藏' then label1.visible=false command1.caption='显示'else label1.visible=true comma...
VB
实现水仙花数的
程序代码
?
答:
VB实现水仙花数的
程序代码
如下:PrivateSubCommand_Click()Fornum=100To999 a=numMod10 b=num\10Mod10 c=num\100 Ifa^3+b^3+c^3=numThenPrintnum Nextnum EndSub 实现具体步骤如下:1.启动
VB程序
,新建一个标准的exe项目,如下图。2.在窗体上绘制命令按钮(名称:命令),双击命令按钮以进入代码...
vb
编写hello world
程序
答:
vb
编写hello world
程序
可以参考下面的
代码
:Private Sub Form_Load()MsgBox ("Hello World")End Sub 在窗体上单击即可运行程序。
用
vb
编写一个
简单
动画
程序
,实现以下功能1) 红色小球自动从图片框的左侧...
答:
控件:picture1,image1(存放红色球图片)
代码
:Private Sub Form_Load()Timer1.Interval = 100 End SubPrivate Sub Timer1_Timer()Image1.Left = Image1.Left + 100 If Image1.Left >= Picture1.Width Then Image1.Left = 0 End If End Sub ...
用
VB
编写一个
简单
公式
程序
答:
界面如上图所示, 其中公式用OLE 控件绘制,将该控件绘制到窗体中,点击右键,插入对象,选择microsoft 公式3 ,即可编辑。
代码
如下:Private Sub Command1_Click()Dim x, n As Integer Dim p, q As Single If (Val(Text1.Text) >= 0) And (Val(Text1.Text) >= 0) Then n = Val(Text...
跪求
VB
红黄绿灯
程序代码
,越
简单
越好!
答:
添加Shape1控件数组3个0-2,(先在工具箱添加一个Shape,然后复制,再粘帖2次,这样就有一组3个的控件数组),再加2个timer控件timer1和timer2,属性默认就可以,在load过程设置,
代码
如下,已测试 Option Explicit Dim X, Y As Integer Private Sub Form_Load()Dim I As Integer For I = 0 ...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
vb语言编程实例
VB代码怎么写
vb编写各种趣味小程序
vb初学者编程代码大全
vb程序设计代码大全
vb程序设计经典例题代码
vb编程入门案例
basic编程代码大全
vb编程代码大全