概述
http://jingyan.baidu.com/article/76a7e409dac152fc3b6e1590.html?allowHTTP=1
工具/原料
-
《Microsoft Visual Studio 2010》
百度经验:jingyan.baidu.com
方法/步骤
-
运行“Microsoft Visual Studio 2010”,在“vs”的窗口弹出后,在“菜单栏”中鼠标左键单击“文件(F)”,然后在弹出来的“菜单”中鼠标左键单击第一个—“新建项目(p)”。
步骤阅读步骤阅读 -
根据第一步,会有一个标题是“新建项目”的窗口,鼠标左键单击左边编辑栏中的 “Visual Basic”,然后在窗口中间新出来的编辑框中鼠标左键单击 “Windowa 窗体应用程序”,再鼠标左键单击一个标题为“确定”的按钮。
步骤阅读 -
根据第二步,会有一个编程窗口弹出,然后鼠标左键单击一下菜单栏中的“视图(v)”,在弹出的菜单中鼠标左键单击“工具箱(x)”,然后在工具箱中鼠标左键单击工具箱中的标题为“Timer”的控件,再在名为“Form1”的窗口中鼠标左键单击,时钟控件就上了。
步骤阅读步骤阅读 -
根据第三步,鼠标左键双击标题为“Form1”的窗口,会出现代码编辑的页面,写代码我在图片中更详细,文本太麻烦。。。。。。。望谅解!
步骤阅读步骤阅读 -
代码:
Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(112) = -32767 Then 'F1热键值为 -32767,为什么是负数呢?因为它原本
Me.Text = "You‘re very good !"
End If
End Sub
End Class
-
-----------------------------------------------------------------
注释:
ME为标题为“Form1”的窗口,
Text为“标题”的意思,
Me.Text="1"意思为“指定窗口的标题为1”。
-----------------------------------------------------------------
“Timer1”是时钟的“代号”,
“Start()”是“代码”,意思为启动,
“Timer1.Start()”是“时钟启动”的意思。
因为vs里的vb中的时钟,他的周期都已经设置好了,所以直接启动时钟,没有这个启动时钟的代码,时钟是不会有用的。
-----------------------------------------------------------------
IF意思为“如果”,
Then意思为“那么”,
End if意思为“反之”
GetAsyncKeyState()是用来检测刚刚按下的键值的
【 If GetAsyncKeyState(112) = -32767 Then 'F1热键值为 -32767,为什么是负数呢?因为它原本便是其他进制,所以转进制之后就成负数了
Me.Text = "You‘re very good !"
End If 】
译:如果按下的键值等于“-32767”,那么父窗口的标题为“You’re very good!”,反之不做反应。
vs2010-vb 教程 按钮与编辑框
http://jingyan.baidu.com/article/2d5afd69f6abb885a2e28e92.html?allowHTTP=1
vs2010-vb 教程 :
主要介绍VS2010的两种控件—按钮、编辑框;通过判断编辑框中文本可以做出一些反应“事件”。
百度经验:jingyan.baidu.com
工具/原料
-
《Microsoft Visual Studio 2010》
百度经验:jingyan.baidu.com
方法/步骤
-
启动运行“Microsoft Visual Studio 2010”。
-
完成第一步后,在弹出的窗口的菜单栏中找第一个,标题为“文件(F)”的菜单,并且鼠标左键单击;
在新弹出的菜单框中鼠标左键单击第一个,标题为“新建项目(p)”的菜单;
之后会弹出一个标题为“新建项目”的窗口,在这个窗口左边的选择框中鼠标左键单击标题为“Visual Basic”的项,再在窗口中间新出的列表中鼠标左键单击标题为“Windows 窗体应用程序”的项,最后鼠标左键单击标题为“确定”的按钮。
步骤阅读 -
完成第一步与第二步后,会出现一个默认标题为“Form1.vb[设计]*”的窗口设计框,它是在窗口中,你现在要在窗口菜单栏中鼠标左键单击第三个,标题为“视图(V)”的菜单;
接着在弹出的菜单框中鼠标左键单击第十个,标题为“工具箱(X)”项;
之后再标题为“工具箱”的窗口或在左侧的列表中鼠标左键先单击一个标题为“Button”的按钮控件,然后将鼠标移动到一个标题默认为“Form1”的窗口处,鼠标左键再单击一下,控件就上了,编辑框控件—“Textbox”也是如此。
步骤阅读步骤阅读步骤阅读 -
完成后在前三步之后,鼠标左键双击标题为“Form1”的窗口(注意点击在无控件处);
然后会弹出一个标题默认为“Form1.vb*”的代码编辑框,然后在我上传图片中的指定位置输入代码,在默认为“Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load”下输入代码;
完成后鼠标左键单击标题默认为“Form1.vb[设计]*”的窗口设计框,再鼠标左键双击标题为“Button1”的按钮,再次回到代码编辑框后,在我上传图片中的指定位置输入代码,在默认为“ Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click”下输入代码。
步骤阅读步骤阅读 -
输入的代码完成后:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Text = "请输入正确密码:"
Button1.Text = "确定"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "OOO000" Then
MsgBox("Good!", 0, "信息")
End If
TextBox1.Text = ""
End Sub
End Class
步骤阅读 -
代码解释:
ME指“父窗口”
Text指“标题”
ME.text=“1”指“父窗口的标题为文本1”
Button1指“按钮1”
Button1.text=“1”指“按钮1的标题为文本1”
If指“如果”
Then指“那么”
End Sub指“之后”
【If TextBox1.Text = "OOO000" Then
MsgBox("Good!", 0, "信息")
End If
TextBox1.Text = ""】指:如果文本编辑框1的编辑内容为“OOO000”的话,那么就弹出标题为“信息”,内容为“Good!”的“0”式信息框,之后(无论文本编辑框1的编辑内容是否为“OOO000”)文本编辑框1的编辑内容为空。
“”=零个字符
-
效果展示。。。。。。
================================
根据这个经验,你可以创新出更多优秀的程序!
步骤阅读END
百度经验:jingyan.baidu.com
方法/步骤2 视频介绍
-
视频观看,若视频不清晰,可以选择百度云盘下载。
END
百度经验:jingyan.baidu.com
方法/步骤3 百度云盘下载
-
在网页上输入下载地址,然后按回车键访问。
下载地址:http://pan.baidu.com/s/1jG5SfCq
-
然后鼠标左键单击一个标题中有“下载”的按钮即可下载。
下载地址:http://pan.baidu.com/s/1jG5SfCq
END
最后
以上就是傲娇铃铛为你收集整理的vb.net VS2010编程的全部内容,希望文章能够帮你解决vb.net VS2010编程所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。
发表评论 取消回复