大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这个简单,我以前用VB6就写过一个类似的程序。 不过这个程序需要提供命令行参数哟。
创新互联建站专注于山阳企业网站建设,成都响应式网站建设公司,商城网站开发。山阳网站建设公司,为山阳等地区提供建站服务。全流程按需设计,专业设计,全程项目跟踪,创新互联建站专业和态度为您提供的服务
就算用VB.NET编写,也必须要有接收这个命令行参数的,不然无法实现显示文件或文件夹路径。
下面是注册表文件的内容,你也可以用程序来写入注册表。
*表示所有文件,你可以随便修改。
最后面的%1,表示当前文件或文件夹
REGEDIT4
[HKEY_CLASSES_ROOT\*\shell\显示名称]
[HKEY_CLASSES_ROOT\*\shell\显示名称\command]
@="D:\\绿色软件\\编程\\VB\\显示名称\\显示名称.exe %1"
动态生成的控件:
Private Sub UserControl1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim myPicture = New System.Windows.Forms.PictureBox()
Me.Panel3.Controls.Add(myPicture)
myPicture.Size = New System.Drawing.Size(115, 160)
myPicture.TabStop = False
myPicture.Name = "p"
myPicture.Cursor = Cursors.Hand
AddHandler myPicture.Click, AddressOf mypic_Click '添加事件
End Sub
处理事件的过程:
Private Sub mypic_Click() 'ByVal id As String
Dim bookInfo As New BookInfo
bookInfo.Show()
Me.Parent.Enabled = False
通常都是设置一个字母,也就是Alt+某个字母。如图
菜单字母
常见事件有鼠的标单击、双击、移动;
有键盘的键按下、键松开、按键;
有窗体加载、窗体卸载等等。