周口市规划建设局网站,黑河seo,企业名录app哪个好,南昌网站seo费用一 基础概念
1.1变量
变量的定义格式#xff1a;Dim | Private | Static | Public 变量名 As 数据类型Dim | Private | Static | Public #xff1a; 就是我之前所说的权限的意思。As 数据类型 #xff1a;这个是可选项#xff0c;你可以为这个变量设置数据类型。Dim num…一 基础概念
1.1变量
变量的定义格式Dim | Private | Static | Public 变量名 As 数据类型Dim | Private | Static | Public 就是我之前所说的权限的意思。As 数据类型 这个是可选项你可以为这个变量设置数据类型。Dim num As integer如果某变量在很多过程中都会用到可将其声明为全局变量否则直接生命在过程中过程结束会自动释放空间声明在模块中局部变量 全局变量
1.1.1运算符
加号“”可实现想加或相连接如果两个值都是字符串则表示相连在VB中就提供了两种连接用的字符串运算符 “”、“”
例如 “VB”“编程入门” 就等同于“VB编程入门”
“VB”“编程入门” 就等同于“VB编程入门”
说明 在字符串数据后面使用“” 时应该在运算符和字符串之间加一个空格 “A” “B” 二不是A“B”
原因是应为”“也是整型的类型说明符如果没有空格的话程序运行的时候系统就会默认为他只是一个 类型说明符单个的类型说明符赤裸的出现在代码中就会报错。
1.1.2类型转换
CType(X) [格式] PCBool(X) ’ 将X转换为布尔Boolean类型 PCByte(X) ’ 将X转换为字节Byte类型 PCCur(X) ’ 将X转换为金额Currency类型 PCDate(X) ’ 将X转换为日期Date类型 PCDbl(X) ’ 将X转换为双精度Double类型 PCInt(X) ’ 将X转换为整型Integer类型 PCLng(X) ’ 将X转换为长整型Long类型 PCSng(X) ’ 将X转换为单精度Single类型 PCStr(X) ’ 将X转换为字符串String类型 PCvar(X) ’ 将X转换为变体型Variant类型 PCVErr(X) ’ 将X转换为Error值默认textBox中内容为String类型如果直接相加起到的是链接的作用用Cint转换数据类型后才能起到相加的作用。 1.2控制结构
1.2.1选择语句
Selcet case 测试表达式
case 表达式1语句
case 表达式2语句
case 表达式3语句
case else语句
end select先计算测试表达式的值然后用这个值去跟case 后面的值进行匹配如果匹配成功就执行下面的语句如果上面的case都不成功就执行case else下面的语句然后结束
dim a as integer
a 2
select case a
case 1print 1
case 2print 2
case elseprint 没有
end select1.2.2 for循环结构
for a 3 to 10 就是第一次放3个他每次会比前一次1个 放到一次放10个就停止for a 1 to 10 2 2是步长这个的意思比较特别他第一次放1个每次会比前一次多放两个直到放到一次性放进去十个或者超出去为止for a100 to10 step -1
总结
for start to end
语句
next start
定义一个数start 每次会 1 加到end或者超过end的值就停止每1一次就会执行 “语句”
语句就是每次都要做的动作
例子1 求 1加到5
dim a,sum
sum 0
for a 1 to 5sum sum a
next a例子2:求5
dim a,sum
sum 1
for a 1 to 5sum sum * a
next a例子3输出5次你好
dim a
for a 1 to 5print 你好
next a1.2.3多重循环
打印矩阵
dim row ,col
for row 1 to 5for col 1 to 5print *next colprint
next row打印结果
*****
*****
*****
*****
*****1.3一维数组
ReDim 语句 可以使用 ReDim 语句来更改某个已声明数组的一个或多个维度的大小。 如果数组较大并且你不再需要它的某些元素ReDim可通过减少数组大小来释放内存。 另一方面如果数组需要更多元素也可使用 ReDim 进行添加。
ReDim 语句仅供数组使用。 它对标量仅包含单个值的变量、集合或结构无效。 请注意如果将变量声明为 Array 类型则 ReDim 语句将没有足够的类型信息来创建新数组。
定义格式Dim array(20) as 数据类型
dim i
dim arry(50) as integer
for i 0 to 49arry(i) iSystem.Console.WriteLine(Arry(i)) 输出数组元素
next i
这样就为arry0 赋值为 0
arry1 赋值为 1Array.Length 获取 Array 的所有维度中的元素总数。 定义数组Dim Arry(10) As IntegerFor i 0 To Arry.Length - 1Arry(i) iSystem.Console.WriteLine(Arry(i))Next以下示例演示如何在其空格处拆分字符串。 Dim testString As String Look at these! Returns an array containing Look, at, and these!.Dim testArray() As String Split(testString)For i 0 To testArray.Length - 1System.Console.WriteLine(testArray(i))Next1.4多维数组
第一种复制方式 Dim array2d(,) As String {{zero, 0}, {one, 1},{two, 2}, {three, 3},{four, 4}, {five, 5}}ShowArrayInfo(array2d)第二种赋值方式 二维数组Dim ArrayT(2, 3) As String 三行两列ArrayT(0, 0) 姓名ArrayT(0, 1) 电话ArrayT(0, 2) 生日ArrayT(1, 0) 老王ArrayT(1, 1) 115ArrayT(1, 2) 1月2日For n 0 To 1For m 0 To 2Console.WriteLine(ArrayT(n, m))NextNext1.5类与对象
1.5.1类对象
工具箱中每一个控件按钮都代表一个类将其添加到窗体上就建立了相应的对象。对象具有类定义的公共属性方法和事件。设置属性方法1可以在属性窗口设置2也可以在程序运行中更改对象的属性。对象名.属性名属性值Command1.caption“确定” 设置命令按钮的标题Test1.text“VB程序设计” 设置文本框的内容注释选中行与取消注释 对象变量 在使用对象模型的属性、方法和事件之前必须创建一个对包含所需属性、方法和事件的类的引用。可以先声明一个局部对象变量以存储该对象引用然后把对象引用赋给该局部变量。 声明对象变量的方法和声明其他类型的变量基本上一样。有三种声明对象变量的方法 (1) Dim myObject As 库名.类名 此方法指向类的类型库但没有给该变量赋予任何类的实例。此时变量myObject被赋值为Nothing。若要用这种方式引用类就必须利用“引用”对话框向工程添加一个对类模块的引用。若要将类的实例引用赋予该变量必须在使用该变量之前用Set语句赋值。如 Set myObject库名.类名 (2) Dim myObject As New 库名.类名 此方法将类的新实例引用赋给Object变量。同样要用这种方式引用类必须先利用“引用”对话框向工程添加一个对类模块的引用。 (3) Dim myObject As Object 此方法将myObject变量声明为一般的Object数据类型这在不能预先知道要创建的对象的数据类型时十分有用。此时Object变量被赋值为Nothing。若要将对象引用赋值给该变量必须使用CreateObject函数或GetObject函数。 可以用Private或Public语句替换Dim语句且对象变量的作用域规则和其他类型的变量一样。 声明对象变量可以显著地简化代码且加快代码的执行速度。
1.5.2方法的调用
对象名.方法名参数Forml.Cls 消除窗体Forml上的内容Forml.Print “VB” 在窗体上显示VB
1.5.3子程序
应用程序设计的主要工作就是为对象编写事件过程的代码。事件过程的框架形式Sub 对象名_事件参数…过程代码End Sub Button1点击事件点击后文本框显示hello. 我们自己写的事件过程需要被调用才能起作用。 -无参事件 有参事件 - 在Button事件中被调用Call 子程序名称。 - Call语句将控制转移到 Function、Sub 或动态链接库 (DLL) 过程。
[ Call ] procedureName [ (argumentList) ]组成部分说明argumentList必需。 要调用的过程的名称。procedureName可选。 变量或表达式的列表它们表示在调用过程时传递给过程的参数。 多个参数之间用逗号分隔。 如果包含 argumentList则必须用括号括起来。
1.无参数
Sub TestCall()Call (Sub() Console.Write(Hello))()Call New TheClass().ShowText()类的调用
End SubClass TheClassPublic Sub ShowText()Console.Write( World)End Sub
End ClassPrivate Sub Label1_BackColorChanged(sender As Object, e As EventArgs) Handles Label1.BackColorChangedMsgBox(lable1背景颜色被改变了)Call 子程序名称End SubPrivate Sub 子程序名称Dim a As Integer 5MsgBox(a)End Sub2.有参数 1默认是按值传递即ByVal可以省略, 2按地址传递: ByRef
Public Class Form1Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickButton1.Text 确认Label1.BackColor Color.RedEnd SubPrivate Sub Label1_BackColorChanged(sender As Object, e As EventArgs) Handles Label1.BackColorChangedMsgBox(lable1背景颜色被改变了)Call 子程序名称5End SubPrivate Sub 子程序名称ByVal 参数名 As IntegerDim a As Integer 参数名MsgBox(a)End Sub
End Class3可选参数option必须赋值调用函数时如果没有赋值给可选参数位置使用其初始赋值。并且可选参数必须位于最后即其他参数之后。 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickButton1.Text 确认Label1.BackColor Color.RedDim B As Integer 函数名12, 3MsgBox(B)End SubPrivate Function 函数名1ByVal 参数1 As Integer ByRef 参数2 As Integer, Optional A As Integer 3MsgBox(A)Return 参数1 参数2End Function1.5.4函数定义 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickButton1.Text 确认Label1.BackColor Color.RedCall 函数名1调用函数End Sub定义函数与子程序类似Private Function 函数名1As As IntegerMsgBox(12345)End Function1.5.5 Sub 与 Function 在VB程序设计中的区别
- Private Sub 与 Function 在VB程序设计中的区别
function是函数sub是子程序都可以传递参数但函数有返回值子程序没有function 可以用自身名字返回一个值sub 需定义别的变量用传址方式传回值。
- Sub 过程与Function 过程的区别
1 Sub 过程定义时无需定义返回值类型而Function 过程一般需要用“As 数据类型” 定义函数返回值类型。 2 Sub 过程中没有对过程名赋值的语句而Function 过程中一定有对函数名赋值的语句。 3 调用过程调用 Sub 过程与 Function 过程不同。调用 Sub 过程的是一个独立的语句而调用函数过程只是表达式的一部分。Sub 过程还有一点与函数不一样它不会用名字返回一个值。但是与 Function过程一样Sub 过程也可以修改传递给它们的任何变量的值。
-调用 Sub 过程有两种方法
以下两个语句都调用了名为 MyProc 的 Sub 过程。 Call MyProc (FirstArgument, SecondArgument) MyProc FirstArgument, SecondArgument 注意当使用 Call 语法时参数必须在括号内。若省略 Call 关键字则也必须省略参数两边的括号
1.6对象的通用属性
设置属性方法1可以在属性窗口设置2也可以在程序运行中更改对象的属性。对象名.属性名属性值Name属性对象名称例如Form1Command1,Text1,Label1等名称作为对象的标识在程序中引用。Caption属性对象的标题决定标题上显示的文本。Height,Width属性对象的高度宽度。TopLeft属性对象的位置对于窗体来说表示窗体距离屏幕顶边左边的举例。对于对象来说表示对象距离窗体…Enabled属性可用性决定对象是否是否可用属性值为true表示可用False表示不可用呈灰色。Visible属性可见性。决定程序运行时对象是否可见。属性值为true表示对象可见False表示隐藏。ForeColor,BackColor:设置前景色后景色。Default属性当一个命令按钮属性的Default属性时ture时此按钮是窗体 的默认按钮当用户按下回车键不管当前输入焦点在哪个控件上都相当于点击了该按钮。Label中的AutoSize属性设置为ture后外框自动适应文字大小。设置完ture后不可再通过size手动更改宽与高的数值 窗体form中的ControBox属性控制窗体form窗体的右上角三个按钮是否显示。 ShowInTaskbar为true时使运行后的窗体显示在任务栏。
1.7窗体对象常用事件
事件是指对象能够识别并做出反应的外部刺激 。窗体事件过程的语法Private Sub Form_事件名…End Sub
1.7.1Load事件
这是窗体加载事件也就是说在窗体启动的同时就执行这个事件里的代码。 比如说你窗体上添加了一个文本框(Text)控件。你在Form_load中加入一下代码 Private Sub Form_Load() Text1.text“Visual Basic” End sub
那么你启动程序后窗体中文本框上便是Visual Basic。 因为它先执行了form_load事件中的代码。
1.7.2Click事件和弹窗MsgBox函数
Click事件是鼠标点击事件此事件无参数。语法结构Private Sub form_Click()虽然无参数但括号不可省略。MsgBox函数输出括号内容弹窗的作用。
Public Class Form1Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickLabel1.Text 你好End SubPrivate Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.ClickButton2.Text 123Button2.BackColor Color.AquamarineButton1.BackColor Color.Aquamarine 可以改变其他控价属性MsgBox(Label1.Text) 当点击Button2时出现弹窗并显示Label1中的内容End Sub
End Class1.7.3点击按钮出现新窗体
创建窗体Form1Form2在Form1中添加按钮Button1进入代码编辑页面 Private Sub Button1_Click() Form2.Show end Sub1.7.4什么是控件提示 将鼠标放在控件上按F1会调出帮助文档 控件Button.自动提示中扳手代表属性紫色正方体代表自带的方法。 控件提示是说明控件、页面或标签的简洁短句。当鼠标指针在一个控件上停留片刻而不单击时就会出现控件提示。控件提示和工具提示非常相似。 选定所需控件。选择“属性”窗口中的 ControlTipText 属性。 也可以通过编写代码来设置 ControlTipText 属性的值。 1.7.5向工具箱添加新控件
请在“工具箱”中的任意控件的图标上或任意页面的空白区域上单击鼠标右键。单击快捷菜单中的“附加控件”命令。从“可以使用的控件”列表中选择新的控件。单击“确定”按钮。
1.7.6sstab控件实现多页面操作
常用属性 2.通过设置tabs属性值添加一个tab后不在同一行 解决办法sstab属性卡里有一个属性TabsPerRow 返回或者设置在每一行出现的选项卡号。比如你有4个TAB页这里设置4那么4个TAB页就都在一行显示了。 解决后
