vb实现隐藏和显示

excel自定义名称隐藏和显示方法

有时，在excel自定义名称之后，单击名称管理器查看，就是找不到excel自定义名称。 如果遇到无法查看excel自定义名称，可以借用下面代码试试。

方法是，按ALT+F11，打开VBE编辑器，插入——模块，复制下面代码，然后按F5键运行。 如果工作薄中有自定义名称就会在名称管理器显示出来，再次运行可以隐藏所有自定义名称。如果没有会提示本工作簿没有定义名称。 Sub excel自定义名称显示和隐藏() On Error GoTo ERR1 Dim nm As Name Dim bVisible As Boolean With ThisWorkbook

If .Names.Count > 0 Then

If .Names(1).Visible = False Then bVisible = True

For Each nm In .Names nm.Visible = bVisible Next nm

如何显示隐藏文件夹

如何显示隐藏文件夹？(正常情况和中病毒的情况)

在Windows系统中，真实存在的文件远远比我们看到的多，因为有很多系统文件是被隐藏起来的，有时候我们需要调用、修改这些隐藏文件，那么该如何让这些隐藏文件显示呢？

在正常情况下，直接修改windows系统设置即可：

工具/文件夹选项/查看/选中“显示隐藏的文件,文件夹,驱动器”即可！ 可很多朋友按照此操作后，仍不能成功显示隐藏文件，这一般是中了病毒，病毒更改了注册表信息造成的！这时将注册表信息更改过来即可！

运行RegEdit

HKEY_LOCAL_MACHINE | Software |Microsoft | windows | CurrentVersion | explorer | Advanced | Folder | Hidden | SHOWALL，将CheckedValue键值修改为1

但可能依然没有用，隐藏文件还是没有显示，这是因为病毒在修改注册表达到隐藏文件目的之后，把本来有效的DWORD值CheckedValue删除掉，新建了一个无效的字符串值CheckedValue，并且把键值改为0！

方法：删除此CheckedValue键值，单击右键 新建Dword值，命名为Check

ubuntu显示或者隐藏grub选择菜单

ubuntu 12.04。

在安装windows后安装的ubuntu双系统，在启动时候都会固定先显示grub选择菜单，可以选择不同版本的ubuntu的kernel来启动

但是对于单纯的ubuntu系统，在启动后却不会显示相应的菜单来让选择。

参照网络上搜索的资料，可以有以下方式来显示grub菜单（同理相信看完也了解如何隐藏了撒？？？）：

1. 启动时候一直按住shift键

以前的Ubuntu版本，启动grub的时候，有一个grub loading，press ESC to get the menu的提示，所以按ESC就可以看到grub界面

现在的Ubuntu没有了，现在的做法是，启动的时候按住shift键，就可以看到grub界面了。 （接下来就修改启动参数，加入single，然后按ctrl+x启动，就能看到一个ncurse的界面，选择drop to root prompt，就可以得到一个root的terminal然后就可以重新设置root口令了）

2. 修改grub文件来完成

1.sudo gedit /etc/default/grub

修改如下：

GRUB_HIDDEN_TIMEOUT=0

#GRUB_HIDDEN_T

进程隐藏与进程保护（SSDT Hook 实现）（二）

文章目录：

1. 引子 – Demo 实现效果： 2. 进程隐藏与进程保护概念： 3. SSDT Hook 框架搭建： 4. Ring0 实现进程隐藏： 5. Ring0 实现进程保护：

6. 隐藏进程列表和保护进程列表的维护： 7. 小结：

1. 引子 – Demo 实现效果：

上一篇《进程隐藏与进程保护(SSDT Hook 实现)(一)》呢把 SSDT 说得差不多了， 博文地址：

http://www.cnblogs.com/BoyXiao/archive/2011/09/03/2164574.html

不过呢，那也只是些理论的东西，看不到什么实物，估计说来说去把人说晕了后，也没什么感觉， 而这一篇博文的话，给出点新意的，让人头脑清醒点的 ~ 所以先给个 Demo（示范） 出来吧 ~

(不好意思，本着不喝倒怎出得了好文章这个理由，所以今天又喝多了点，文章有疏忽之处还请见谅 ~顺便在这里跟朋友们分享一下哈，晚上于这个时间点，比如 2 点的时候啊，喝点小酒， 听点曲子，你会精神振奋，头脑更加清醒，思路也会很清晰，尤其是写起程序来那是唰唰的来の ~ )我擦，我试试~

VB实现贪吃蛇小游戏

——比较适合VB初学者，属原创作品

图1

图2

图3

如图1所示，布置控件，其中有4个timer控件，1个picture控件（底图），4个command控件（上下左右），10个label控件。

其他功能都在程序里实现，其中贪吃蛇都是由点来组成的，初学者主要学习一下timer控件的应用，还有贪吃蛇拐弯怎么实现的。图2、图3是游戏视图。

主程序：

Public a, b, f As Double: Public i, j, c, d, e, g, h, z As Integer Dim aa(100) As Double: Dim bb(100) As Double

Private Sub Form_Load()

a = 100: b = 300: c = 4 'a、b定义第一个点（红点）位置，c能控制蓝点数量 g = 2000: h = 2000

Timer1.Interval = (200 - z * 30) '定义每个定时器间隔时间 0.2S Timer2.Interval = (200 - z * 30) Timer3.Interval = (200 - z * 30) Timer4.Interva

VB实现贪吃蛇小游戏

——比较适合VB初学者，属原创作品

图1

图2

图3

如图1所示，布置控件，其中有4个timer控件，1个picture控件（底图），4个command控件（上下左右），10个label控件。

其他功能都在程序里实现，其中贪吃蛇都是由点来组成的，初学者主要学习一下timer控件的应用，还有贪吃蛇拐弯怎么实现的。图2、图3是游戏视图。

主程序：

Public a, b, f As Double: Public i, j, c, d, e, g, h, z As Integer Dim aa(100) As Double: Dim bb(100) As Double

Private Sub Form_Load()

a = 100: b = 300: c = 4 'a、b定义第一个点（红点）位置，c能控制蓝点数量 g = 2000: h = 2000

Timer1.Interval = (200 - z * 30) '定义每个定时器间隔时间 0.2S Timer2.Interval = (200 - z * 30) Timer3.Interval = (200 - z * 30) Timer4.Interva

VB实现贪吃蛇小游戏

——比较适合VB初学者，属原创作品

图1

图2

图3

如图1所示，布置控件，其中有4个timer控件，1个picture控件（底图），4个command控件（上下左右），10个label控件。

其他功能都在程序里实现，其中贪吃蛇都是由点来组成的，初学者主要学习一下timer控件的应用，还有贪吃蛇拐弯怎么实现的。图2、图3是游戏视图。

主程序：

Public a, b, f As Double: Public i, j, c, d, e, g, h, z As Integer Dim aa(100) As Double: Dim bb(100) As Double

Private Sub Form_Load()

a = 100: b = 300: c = 4 'a、b定义第一个点（红点）位置，c能控制蓝点数量 g = 2000: h = 2000

Timer1.Interval = (200 - z * 30) '定义每个定时器间隔时间 0.2S Timer2.Interval = (200 - z * 30) Timer3.Interval = (200 - z * 30) Timer4.Interva

DataGridView单元格合并VB.NET实现

已封装成类，调用方便。 效果如下：

Public Class Form1

Private cmb As CmbDatagridbiew

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load '测试数据

DataGridView1.ColumnCount = 6 DataGridView1.Columns(0).Name = \ DataGridView1.Columns(1).Name = \ DataGridView1.Columns(2).Name = \ DataGridView1.Columns(3).Name = \ DataGridView1.Columns(4).Name = \ DataGridView1.Columns(5).Name = \

Dim row As String() = New String() {\,

郑州大学

硕士学位论文

信息隐藏技术的研究和应用

姓名：黄园园

申请学位级别：硕士

专业：计算数学

指导教师：柳朝阳

201203

摘要

摘要

网络计算机技术和多媒体技术的蓬勃发展为更广泛的传播信息提供了更多的便利条件，在方便我们发展使用的同时也对信息及其传递的安全性提出了巨大的挑战。而信息隐藏技术本身是网络信息安全的一项重要技术，它俨然已经成为国内外众多学者研究关注的热点。我们所讲的信息隐藏就是把秘密信息隐藏在公开的信息载体之中，并通过公开载体的传播从而来隐秘传递所隐藏的信息。本文首先介绍了信息隐藏技术的发展历史以及当今信息技术是如何发展的，又对信息隐藏技术研究的目的及意义进行了深刻的阐述，使读者了解了信息隐藏是怎样发生发展的。又详细介绍了信息隐藏技术的各方面情况，包括其原理、模型、分类、特性、对信息隐藏技术的评价、信息隐藏技术的应用，在最后又对信息隐藏技术的两种算法做了详细介绍，使得对信息隐藏技术本身有了更进一步的了解。本文还介绍了信息隐藏中的一些攻击检测方法，对其中一些检测技术进行了详细阐述，包括信息隐藏技术中常用的两种攻击算法ＲＳ攻击算法以及卡方攻击算法。后对其中空域算法中的ＬＳＢ算法进行了详细分析，对其在ｍａｔｌａｂ平台上进行了仿真实验，其中包括对文字

DataGridView单元格合并VB.NET实现

已封装成类，调用方便。 效果如下：

Public Class Form1

Private cmb As CmbDatagridbiew

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load '测试数据

DataGridView1.ColumnCount = 6 DataGridView1.Columns(0).Name = \ DataGridView1.Columns(1).Name = \ DataGridView1.Columns(2).Name = \ DataGridView1.Columns(3).Name = \ DataGridView1.Columns(4).Name = \ DataGridView1.Columns(5).Name = \

Dim row As String() = New String() {\,