正文
vb.net课程实验报告的简单介绍
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
学习VB的感受和体会
我在业余时间喜欢编一些小程序,打发一下寂寞空虚无聊的时间.生活太单调了,也许正是因为此我才喜欢上了VB,虽说学习VB的时间不长,可我从中受益非浅.总结一下它给我带来了以下几个方面的好处:
1、充实生活。业余时间到处游手好闲的身影不见了，没事我肯定一动不动的坐在电脑面前摆弄VB。是啊，想想以前，真是一无是处，一会找A砍大山，一会找B吹牛皮，一会就傻傻的坐在小板登上两眼无光，似是厌倦了红尘。现在生活有了寄托，是VB给了我无穷的快乐，让我乐此不疲。
2、武装头脑。VB是一门计算机编程语言，也算是一项知识含量较高的东东吧（自认为）。我呢，以前有一定的英语基础，呵呵，大专毕业，英语算是过了三级了。VB语言容易上手，采用的是可视化程序设计。自学了三年多，到现在会单独开发数据库管理系统了。根据单位实际，我设计了基层管理系统、理论考核系统。基层管理系统虽然还没有在部门推广，可是在我们单位已经用上了，就这我已经知足了。至于理论考核系统，由于单位电脑不够集中，从而夭折。不过，我用集线器连接了3台电脑测试了N次，都没有问题，随机抽题，在线打分公布等功能都能完美实现。啊，这些个人作品我会保存好的，毕竟是学习成果嘛。通过日积月累，感觉脑袋的知识越来越丰富，编程经验及技巧也多了许多。总之，学了就是好，相信以后回到社会这个大熔炉里后也会派上用场的。
3、锻炼意志。编程可不是一项轻松的活，尤其是一个人开发制作软件时，那工作量就多了。没有一定的坐功、细心程度及耐性那是绝对做不到的。有时，把程序做完了需要调试运行，但是就是不能达到自已设计的效果和目的，那你得戴上放大镜找啊找啊，也许就是因为一个符号或一个字母，你就得花上个几个小时，半天，甚至更长。越是这样越不要灰心，应该放松心态，一点一滴的去查。只要有一颗永不退缩的心，我相信你一定能找到问题所在，最后一定能见到你开心的笑容，也一定能找到成功者的感觉。
4、赢得虚荣。是人都有一颗虚荣心，都希望能得到别人的尊重、肯定、赞美。像我吧，在单位，懂电脑，会编程，会做软件。就这点，单位的领导还蛮喜欢我的。一提到我，“你看人家小杨，电脑精通，还会设计软件，不错的小伙啊！”如果在夸你，你听到了会是什么感受啊，怎一个“美”字了得。
5、增加收入。这个不需我多说了吧，会做软件，卖了就有钱啊。呵呵，我的水平还不到，时机也不成熟，目前还没有收入。
相关问答
Q1: 计算机程序设计基础的实验报告怎么写
1
实验要求
:
1.
实验前按实验报告格式要求，写出预实验报告，注意留出记录结果的空间。
2.
认真实验
,
注意记录
3.
撰写实验报告
.
按时上交
.
实验报告格式vb.net课程实验报告：
实验
*
***** ***** *****
一、
实验目的
照抄实验指导的内容。
二、
实验步骤和内容
包括vb.net课程实验报告：
1
．实验题目要求。
2
．源程序清单
3
．预期结果
3
．上机执行或调试结果vb.net课程实验报告：包括原始数据、相应的运行结果和必要的说明
三、
实验体会
调试中遇到的问题及解决办法vb.net课程实验报告；若最终未完成调试，要试着分析原因；调试程
序的心得与体会；其vb.net课程实验报告他算法的存在与实践；对课程及实验的建议等。
Q2: 用vb.net实现网络通信
用 vb.net socket通信
Dim th As Threading.Thread
2 Dim tcpl As System.Net.Sockets.TcpListener
3
4 Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
5 th = New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf MyListen))
6 th.Start()
7 End Sub
8
9 Public Sub SendMessage()Sub SendMessage(ByVal IP As String, ByVal SendMsg As String)
10 Try
11 If IP "" Then
12 Dim tcpc As New System.Net.Sockets.TcpClient(IP, 5656)
13 Dim tcpStream As Net.Sockets.NetworkStream = tcpc.GetStream
14 Dim reqStream As New IO.StreamWriter(tcpStream)
15 reqStream.Write(SendMsg)
16 reqStream.Flush()
17 tcpStream.Close()
18 tcpc.Close()
19 End If
20 Catch ex As Exception
21 MsgBox(ex.Message.ToString)
22 End Try
23 End Sub
24 Private Sub MyListen()Sub MyListen()
25 Try
26 Dim ipAddress As System.Net.IPAddress = System.Net.Dns.Resolve(System.Net.Dns.GetHostName).AddressList(0)
27 tcpl = New System.Net.Sockets.TcpListener(ipAddress, 5656)
28 tcpl.Start()
29 While True
30 Dim s As System.Net.Sockets.Socket = tcpl.AcceptSocket()
31 Dim MyBuffer(1024) As Byte
32 Dim i As Integer
33 i = s.Receive(MyBuffer)
34 If i 0 Then
35 Dim lstrRec As String
36 Dim j As Integer
37 For j = 0 To i - 1
38 TextBox1.Text += Chr(MyBuffer(j)) ","
39 Next
40 End If
41 End While
42 Catch ex As Exception
43 MsgBox(ex.Message.ToString)
44 End Try
45 End Sub
46
47 Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
48 SendMessage("192.168.0.61", TextBox2.Text)
49 End Sub
Q3: VB.net实例
1 生成txt文件。
DimSaveFileDialog1AsNewSaveFileDialog() '创建一个保存对话框
SaveFileDialog1.Filter ="txt files (*.txt)|*.txt" '设置扩展名
IfSaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OKThen '如果确定保存
My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename, Textbox1.Text,False) '保存文本,False表示不追加文本，直接覆盖其内容
EndIf
原文链接：
关于vb.net课程实验报告和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。
