vb.net 技术
suming000
这个作者很懒,什么都没留下…
展开
-
vb.NET 最小化在右下角显示小图标
在需要最小化显示的窗体的 SizeChanged 事件中加入如下代码: Private Sub F_Client_SizeChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.SizeChanged If Me.WindowState = FormWindo原创 2012-02-15 15:52:48 · 1380 阅读 · 0 评论 -
vb.net 怎么找到 自定义控件 中的控件
自定义控件 发内置代码 自定义控件.FindControl("ID") as Label原创 2017-03-29 21:23:17 · 1674 阅读 · 0 评论 -
vb.net ImageList转为ICON的方法
以下就是转换的方法Bitmap bmp=new Bitmap(Me.imglst1.Images(0));Icon icon=Icon.FromHandle(bmp.GetHicon());原创 2017-03-29 21:22:52 · 1059 阅读 · 0 评论 -
vb.NET 关于进度条控件使用
现在窗体里面拖放一个进度条控件 ProgressBar,加入以下代码: ProgressBar1.Minimum = min '設定最小範圍,一般從0開始 ProgressBar1.Maximum = max '設定最大範圍 ProgressBar1.Step = 1024 '每完成一個動作,增加的值原创 2017-03-29 21:22:12 · 4033 阅读 · 0 评论 -
vb.net 关于一些窗体show时定位
以下就是关于ContextMenuStrip(右击窗体)show出来的位置 Dim control As New Control(Nothing, control.MousePosition.X, control.MousePosition.Y, 1, 1) control.Visible = True原创 2017-03-29 21:21:47 · 532 阅读 · 0 评论 -
vb.net 点击panel拖动功能的实现
首先在窗体类中写入以下公共代码 Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Boolean原创 2017-03-29 21:21:26 · 1568 阅读 · 0 评论 -
vb.net treeview 鼠标点击节点时文字颜色,背景的改变
首先将TreeView 的DrawMode改为OwnerDrawText,然后再DrawMode事件中写下如下语句: Private Sub treeView1_DrawNode(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DrawTreeNodeEventArgs) Handles treeView1.D原创 2017-03-29 21:20:58 · 1677 阅读 · 0 评论 -
vb.net TextBox 失去焦点和获得焦点
创建一个TextBox,id=tBox, 获得焦点就是tBox.Focus(),失去焦点的方法没有找到,只是找到了失去焦点的事件 : Private Sub tBox_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tBox.Leave End Sub原创 2017-03-29 21:20:34 · 7980 阅读 · 0 评论 -
关于VB.net 开机启动程序功能
其实就是把运用程序的启动项(*.exe)写入到注册表里面。具体的步骤就是在页面上拖放一个CheckBox 控件,然后在CheckedChanged的事件中写入一下代码---------------------------------------coding--------------------------------------------------- Private原创 2017-03-29 21:20:21 · 3442 阅读 · 0 评论 -
VB.net 关于程序单实例问题的解决方法
就是在登陆窗体后台代码(或者说是程序的第一运行窗体后台代码)-----------------------------coding----------------------------------------------- 'For single instance Public Function CheckNimsRunning() A原创 2017-03-29 21:19:57 · 379 阅读 · 0 评论 -
关于VB.net 中的正则表达式(实例)
今天研究了一下关于VB.net 中的正则表达式下面代码的功能就是使得TextBox输入框中只能输入“数字和26个英文字母”(代码必须放在TextBox的KeyPress的事件里面)-----------------------------coding--------------------------------------- Dim a As New Regex("^[A原创 2017-03-29 21:19:26 · 11069 阅读 · 1 评论 -
vb.net 关于给Button设置快捷键功能
在窗体的KeyDown的时间中输入以下代码---------------------------------coding--------------------------------If e.KeyCode = Keys.F1 Then Call btnAdd_Click(sender, e) ‘ID为btnAdd的单原创 2017-03-29 21:18:49 · 3967 阅读 · 0 评论 -
vb.net 中点出 记事本、计算器、日期等的语句
只需要把以下语句放入到按钮点击事件中即可实现以下为点击出现日期和时间:System.Diagnostics.Process.Start("timedate.cpl")以下为点击出现记事本: System.Diagnostics.Process.Start("notepad.exe")以下为点击出现 计算器System.Diagnostics.Pr原创 2017-03-29 21:18:20 · 370 阅读 · 0 评论 -
VB.net 中的app.config文件的配置(连接sqlserver)
最近研究了一下VB.net 中的app.config文件的配置,发现和C#里面的配置文件是一样的,具体的例子如下:在DAL的数据库连接类(DBHelper)中加入 ------------------------coding------------------------Imports SystemImports System.Collections.Generic原创 2017-03-29 21:15:52 · 4501 阅读 · 0 评论 -
vb.net 文件接收时 对于同名文件的验证(扫描选择路径下所有的文件)
代码如下 (一般在button的onclick事件中) Dim fb As New FolderBrowserDialog If fb.ShowDialog = Windows.Forms.DialogResult.OK Then For Each flsN As String In Directory.GetFiles(fb.Se原创 2017-03-29 21:23:40 · 494 阅读 · 0 评论