99问答网
所有问题
当前搜索:
vb程序设计经典案例
编写
VB程序
语言
设计
答:
Private Type dbrec Studno As String * 6 Studname As String * 8 English As Integer Math As Integer Computer As Integer End Type Private Sub Command1_Click()Dim myrec As dbrec h = FreeFile Open "c:\Score1.dat" For Random As h Len = Len(myrec)i = 1 D...
VB
题目
程序设计
答:
Private Sub Form_Click() Dim SUM As Integer For i = 100 To 999 If (i \ 100 = i \ 10 Mod 10) Or (i \ 10 Mod 10 = i Mod 10) Or (i \ 100 = i Mod 10) Then If Sqr(i) = Int(Sqr(i)) Then Print i; SUM = SUM + i End If End If ...
跪求
VB
课程
设计
高手
答:
马上交作业了求高手指点
VB
课程设计题目VB课程设计选题说明VB课程设计旨在提高学生的编程开发能力,通过集中训练能熟练掌握某些
程序设计
语言,增强动手实践能力,提高综合素质,为将来... 马上交作业了 求高手指点 VB课程设计题目 VB课程设计选题说明VB课程设计旨在提高学生的编程开发能力,通过集中训练能熟练掌握某些程序设计语言...
vb程序设计
论文
答:
VB程序设计
是一门理论性和实验性都很强的课程,对实验环节有较高的要求。要学好这门课,学生只有经过大量的上机实验,才能掌握程序设计的技能和方法。因此,在教学过程中要给学生留出足够的上机时间,让学生在实验中理解VB语言的基本概念,掌握基本的编程方法。结合学生的专业方向,精心选择合适的
案例
、设计型与研究型课题,...
急急急
VB
的
程序设计
答:
Private Sub Form_Click()Dim m As Integer, nMax As Integer, nMin As Integer m = InputBox("输入成绩(0≤成绩≤100),负数结束。")Print m nMax = m nMin = m Do While m >= 0 If m > nMax Then nMax = m If m < nMin Then nMin = m m = InputBox("输入成绩(0≤...
用
vb
写
程序
:“打开文件”“保存文件”“字体”“颜色”“结束”按钮,弹...
答:
建议在工程中添加CommonDialog 控件,CommonDialog 控件提供一组标准的操作对话框,进行诸如打开和保存文件,设置打印选项,以及选择颜色和字体等操作。通过运行 Windows 帮助引擎控件还能显示帮助。通过使用 CommonDialog 控件的 ShowOpen 和 ShowSave 方法可显示“打开”和“另存为”对话框。通过使用 Common...
...Basic(
VB
)的
程序
代码。下面是
设计
界面,求高人逐字逐句解释代码_百度...
答:
Private Sub cmdStart_Click()Dim i As Integer‘定义i为整形变量 For i = 0 To 4’i从0 到 4 进行5次循环 If option1(i).Value Then‘如果选中了第i+1注(单选框第一到第五注是option1(0) 到option1(4))Exit For’如果满足,退出for循环 End If‘结束判断 Next’for循环的结束...
VB
语言
程序设计
的作品目录
答:
第1章认识VisualBasic1.1VB概述1.1.1VB的发展过程1.1.2VB的特点1.1.3VB的启动和退出1.2对VB应用
程序设计
的初步认识1.2.1
设计VB
应用程序的步骤1.2.2第一个简单程序1.2.3第二个简单程序1.3对象和事件的基本概念1.3.1对象及其属性、方法和类1.3.2事件、事件过程及事件驱动1.4VB的集成...
VB程序设计
一般的四个步骤
答:
1、建立应用
程序
界面 2、设置对象的属性 3、编写应用程序的代码 4、保存和运行程序
VB
拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建Active X控件,用于高效生成类型安全和面向对象的应用程序。程序员可以轻松的使用VB提供的组件快速建立一...
VB设计程序
:设计程序,在窗体上建立3个命令按钮,单击后分别使窗体最大...
答:
Private Sub Command1_Click()Me.WindowState = 2 '最大化End SubPrivate Sub Command2_Click()Me.WindowState = 1 '最小化End SubPrivate Sub Command3_Click()Me.WindowState = 0 '还原End Sub
棣栭〉
<涓婁竴椤
5
6
7
8
10
11
12
9
13
14
涓嬩竴椤
灏鹃〉
其他人还搜