VB 如果你是初学编程,先用VB(Visual Basic)编个小程序,下载软件VB6.0,因为它好理解,易学,易懂,容易建立自信心。 安装完成VB6.0后,找到安装路径打开VB6.EXE,选择标准EXE: 简洁明了的窗体界面,右边是工程管理窗口,右边下方是属性窗口,可以通过视图显示。 你可以放一个"按钮控件"(commandbutton)和"文本框控件"(textbox): 通过属性窗口设置基本信息,caption属性就是控件上要显示的内容: "文本框控件"的属性窗口: 运行程序: 效果: 开始写代码,双击按钮进入程序代码窗口,写入代码时程序会有提示: 运行后,点击按钮: 你如果成功了,那么你就认识Visual Basic环境了。C# 再来看一下 Visual C#的环境,控件的数量、类型和用法有一些不同,Button控件和textbox控件基本相似 : 双击"按钮"进入代码编辑区后,发现有程序自动生成的代码,先不用去理解类库和命名空间,直接"干饭"即可,这里面代码结束时要加分号,否则就会报错。 看看运行结果: Visual Basic要比Visual C#简洁易懂,如果临时用选VB,如果长期发展选C#。 再来看一个实例,求圆和矩形的面积:Visual Basic 首先,摆控件: 这里一共放了三类控件,label控件、commandbutton控件和textbox控件,可以实现不同功能: 控件简介: label控件:能够显示静态文本信息。 commandbutton控件:触发编写的程序代码。 textbox控件:与用户交互,可以在文本框输入信息。 控件的属性设置: 这几类控件大同小异,都是通过属性窗口,可以对它们的位置、字体、大小、文本显示方式和显示内容进行设置,caption属性就是显示的文本内容信息。 控件布局设置: 在工具栏空白的位置右键选择窗体编辑器,工具栏上出现了设置布局的一些小图标,你可以利用这些图标对窗体上的各个控件进行布局的设计,可以同时选择多个控件,统一设定它们摆放的位置和对齐方式。 写代码: 双击"计算圆面积"按钮控件: Dim r, pi, s是对变量进行定义,你可以不用定义变量的类型,让系统自动根据其值分配,字符型、数字型是常用的。 r = Text1.Text,把输入的圆的半径送到变量r中存储。 pi为计算圆面积的常数,可以直接进行赋值。 s = pi * r * r表示圆面积的计算。 Label6.Caption = "圆的面积是:" & s,是将结果显示,你还可以用textbox控件实现显示结果信息。 矩形面积: 在关闭按钮中添加代码"end",实现的功能是关闭窗口: 运行效果: 输入圆的半径2.65后,点击"计算圆面积"按钮,在label控件显示了圆形面积的计算结果。 输入矩形的长和宽,点击"计算矩形面积"按钮,在label控件显示了矩形面积的计算结果。 美化: 将文本框的backcolor属性改颜色,再将label控件的backcolor属性改颜色,最后将窗体的caption属性改标题。 效果: 用Visual C#来实现: 设计界面布局, Visual C#的界面布局调整要比VB灵活得多,鼠标操作即可完成界面的设计。 属性窗口的设置: 分类灵活,便于你去找相应的属性位置: 代码: Visual C#需要声明具体的变量类型,这里面用到了double类型,双精度型的。 每一语句结尾要加上";",否则就会报错。 文本数字的转换Convert .ToDouble(文本) ,将输入到文本框中的文本转换成数字类型后才能参与计算。 label6.Text = "圆形的面积是:" + s ,直接可以采用加号变量的写法,在VB中要用到"&"符号连接。 运行: 结束的代码: Application .Exit() ,点击结束程序。 菜单控件Visual Basic环境下 添加一个新的窗体form2: 双击 form2窗体图标: 选择工具中的菜单编辑器: 在标题栏写上"文件": 继续如此添加: 单击"面积计算"子菜单,键入如下代码:Form1.Show 键入如下代码:Form1.Show 右键工程选属性,将启动对象设置为form2: 运行程序点击"面积计算": 其实你还可以做一个带图标的程序菜单,利用API函数将图标添加到菜单上。 Visual C#环境下 添加一个新的窗体form2: 在左侧的工具箱内找到MenuStrip控件后,双击自动进入到窗体: 直接在窗体上进行菜单标题的输入和更改, 完成后点击面积计算子菜单进入代码窗口,写入如下代码: Form1 frm1 = new Form1() :将Form1 窗体进行实例化,实例化为frm1,也就是给它起个正规名称,这样后面才能够识别它就是代表Form1 窗体 frm1.Show ():将实例化后的frm1进行显示,目的是显示Form1 窗体 将启动的窗体改成Form2,怎么改,双击右侧窗口的Program.cs后,将Application.Run(new Form1())改成Application.Run(new Form2())就OK了: 改后: 运行点击"面积计算": 弹出窗体: 再来看下面:Visual Basic环境 打开窗体Form2后,从工具栏中打开菜单编辑器后,在文件下插入三个子菜单项,并为它们起个名字 插入后,回到窗体当我们点击文件菜单项时,可以看到弹出了三个子菜单项,这就是刚才我们新插入的子菜单项: 在写代码之前,你需要在窗体上放置一个"对话框控件"控件,实现打开文件: 如果工具栏上找不到这个控件,点击"工程"菜单下的"部件"选中下面的选项即可: 添加代码: 运行程序点击打开: 如果想过滤掉一些文件,只看某个类型的文件,可以加一行代码: 只显示txt文件: Visual C#环境 在Visual C#环境下,同样在主菜单栏下插入三个子菜单: 加入对话框控件: 默认名是openFileDialog1: 加入代码,这里面用到了对话框的两个属性和一个方法,包括InitialDirectory 、 Filter 属性和 ShowDialog() 方法: 用途: InitialDirectory :设置初始路径 Filter :过滤文件类型 ShowDialog() :显示打开文件对话框 运行程序点击"打开"菜单 弹出相应对话框: 温馨提示 在Visual C#环境下,路径是用""来表示的,这和VB有区别,而它的注释块和 Visual Basic环境下也是不一样的,这里面注释块用了"//",这些语句同样在程序代码中不予执 读数据:Visual Basic环境 双击"打开"子菜单,加入代码: 运行程序,选择打开子菜单,并在弹出的对话框中,选择文本文件: 将文本框text2的几个属性修改一下 Scrollbars属性,该属性是滚动条的设置,你选择最后一项both让水平和垂直都出现滚动条: Multiline属性,改为true,表示可以接受多行文本内容,为false表示不接受多行文本: 做好这两个属性的设置后运行: 程序代码解释 If cd1.FileName = "" Then:如果没有选择文件,也就是文件名为空 Exit Sub:如果没有选择文件,则退出程序 Else:如果选择了文件 Text2.Text = "":text2文本框中的内容初始化为空 Text1.Text = cd1.FileName:text1文本框中的内容显示的是文件的路径 Open (cd1.FileName) For Input As #1:打开文件并读取内容 Do While Not EOF(1) :通过While循环来读取文件内容,直到文件结束 Line Input #1, str1:按行进行读取,将读取的内容赋值到字符串变量str1 Text2.Text = Text2.Text & str1:将文本内容的多行数据连接到一行,显示到text2文本框中 Loop:结束本次循环,进入下一个循环 End If:结束本次条件 End Sub:程序结束 这里面用到了Do…While循环语句,关于该语句的具体用法也是比较简单的,当文件没有到结尾的时候,程序就执行循环中的语句,如果文本结束了,则退出循环,EOF(1)表示文件中的文本已经到结尾了,前面加个Not EOF(1)表示没有内容没有到结尾 那么,如何按照文本已经有的格式显示呢? 程序这样修改一下: Text2.Text = Text2.Text & str1 & vbCrLf:加了换行功能 再运行程序,看一下效果,可以看到歌词内容是按照文本文件的原有格式进行显示的: 在Visual C#的环境下 要想读取外部文件信息内容,利用File类的OpenRead方法来实现: 双击"文件"菜单下的"打开"子菜单键入代码: 解释: FileStream fs = File .OpenRead(openFileDialog1.FileName) :以只读方式打开文件并实例化对象 using ( StreamReader sr = File .OpenText(openFileDialog1.FileName)) :创建StreamReader对象 string s = "" : 定义变量 s,并赋初始值为空,作用是存放每次循环读取的行数据 string t = "" : 定义变量 t,并赋初始值为空 ,存放所有读取的行数据,并以一定格式存放 while ((s =sr.ReadLine ())!= null ) :当读取文件内容不为空 时,则继续循环 t = t + s + "r " :变量t以一定格式存放文件内容,这里面 "r " 为转义字符,表示换行存储 textBox1.Text = t:将变量t存放的字符 显示 在 textBox1 文本框控件中 运行程序: 打开后,则将文件内容输出到textBox1 文本框中: 将信息写入到外部文件 将信息写入到打开的文件,这里面使用了StreamWriter类,看下面这段代码 using ( StreamWriter file = new StreamWriter (openFileDialog1.FileName, true )) :表示向文件里面追加内容 file.WriteLine(textBox1.Text):实现文本框的内容,追加到文件当中最末行 运行程序: 点击"文件"菜单下的"打开"子菜单: 打开文件,发现最末一行已经追加了你想要追加的信息,而这个信息正是通过你输入到窗体界面文本框中的信息所添加的,这样就实现了已有文件的写入功能: 温馨提示:内容较多,欢迎关注,点击收藏,方便查找