- 1、本文档共3页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VB程序设计期末复习纲要.doc
VB程序设计期末复习纲要
选择题(1*10)P46-47
填空题(2*10)P46-47
读程序题(5*2)
简答题
写出调用sub过程的两种语法格式。
答:(1)用call 语句调用 sub 过程。
语法格式为:call 过程名[(实际参数列表)]
(2)把过程名作为一个语句来使用
语法格式为:过程名[实际参数列表]
函数过程与sub 过程的主要区别是什么?
答:sub 过程和 function 过程最大的区别在于sub 过程不返回值,可以作为独立的基本语句调用。而function 过程要返回一个值,通常出现在表达式中。
试分别说出形参和实参的概念。
答:过程中定义过程时用到的参量叫形式参数,也叫形参,即在定义过程时,出现在过程中的变量名。
传递给过程的每个值成为实际参数,也叫实参,即在调用过程时,由调用语句传给过程的常量。
按值传递(ByVal)和按地址传递(ByRef)有什么不同?各自适用范围如何?
答:这两种参数传递方式的区别在于,一旦参数是变量时若使用ByVal?方式:启动 Visual Basic.NET 集成开发环境,并选择创建一个Visual Basic 的Windows应用程序。
b:设计应用程序所需的图形用户界面,并设置好用户界面中各对象的相关属性。
c:编写代码、保存文件。
d:运行和调试应用程序。
e:生成可执行文件。
设计题(20*2)
九九乘法表
Public Class Form1
Dim i , j As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click
For i=1 to 9
For j=1 to i
TextBox1.Text = j “x” i “=” i * j Space(5)
Next
End Sub
End Class
递归调用求1到100的和。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles Button1.Click
Dim N As Integer
N=100
Label1.Text=”i到”+Cstr(N)+“的和是:”+Cstr(recvsum(N))
End Sub
End Class
Module module1
Function recvsum(ByVal N As Integer)As Integer
If X1 Then
Recvsum=N+recvsum(N-1)
End If
End Function
End Module
将表格在form load中显示出来。
Imports System.Data.OleDb
Public Class Form1
Dim cn As New OleDbConnection
Dim da As OleDbDataAdapter
Dim ds As New DataSet
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load
cn.Connectionstring=”provider=Microsoft.jet.oledb.4.0;data source=e:\student.mdb”
db=New OleDbDataAdapter(“select * from ?学生””st”)
DataGridView1.DataSource=ds
DataGridView1.DataMember=”st”
End Sub
End Class
任意输入两位数,直到输入的数为66则停止输入。
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load
Randomize()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click
Dan()
If TextBox.Text=66 then
Button1.Enabled=false
Else
dan()
End If
End
文档评论(0)