楼主可以去华夏黑客联盟注册份额帐号 里面有记事本的源码 华夏是个非营利性的网站,里面有很多资源,楼主有兴趣的话可以注册个帐号进去看看.
VB.net编程 *** :
'新建文件
Private Sub mnuNew_Click()
RichTextBox1.Text = "" '清空文本框
FileName = "未命名"
Me.Caption = FileName
End Sub
'打开文件
Private Sub mnuOpen_Click()
CommonDialog1.Filter="文本文档(*.txt) *.txt RTF文档(*.rtf) *.rtf 所有文件(*.*) *.*"
CommonDialog1.ShowOpen
RichTextBox1.Text = "" '清空文本框
FileName = CommonDialog1.FileName
RichTextBox1.LoadFile FileName
Me.Caption = "超级记事本:" FileName
End Sub
'保存文件
Private Sub mnuSave_Click()
CommonDialog1.Filter="文本文档(*.txt) *.txt RTF文档(*.rtf) *.rtf 所有文件(*.*) *.*"
CommonDialog1.ShowSave
FileType = CommonDialog1.FileTitle
FiType = LCase(center(FileType, 3))
FileName = CommonDialog1.FileName
Select Case FiType
Case "txt"
RichTextBox1.SaveFile FileName, rtfText
Case "rtf"
RichTextBox1.SaveFile FileName, rtfRTF
Case "*.*"
RichTextBox1.SaveFile FileName
End Select
Me.Caption = "超级记事本:" FileName
End Sub
'退出
Private Sub mnuExit_Click()
End
End Sub
'复制
Private Sub mnuCopy_Click()
Clipboard.Clear
Clipboard.SetText RichTextBox1.SelText
End Sub
'剪切
Private Sub mnuCut_Click()
Clipboard.Clear
Clipboard.SetText RichTextBox1.SelText
RichTextBox1.SelText = ""
End Sub
'全选
Private Sub mnuSelectAll_Click()
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = Len(RichTextBox1.Text)
End Sub
'粘贴
Private Sub mnuPaste_Click()
RichTextBox1.SelText = Clipboard.GetText
End Sub
'查找
Private Sub mnuFind_Click()
sFind = InputBox("请输入要查找的字、词:", "查找内容", sFind)
RichTextBox1.Find sFind
End Sub
'继续查找
Private Sub mnuFindOn_Click()
RichTextBox1.SelStart = RichTextBox1.SelStart+RichTextBox1.SelLength + 1
RichTextBox1.Find sFind, , Len(RichTextBox1)
End Sub
'使用说明
Private Sub mnuReadme_Click()
On Error GoTo handler
RichTextBox1.LoadFile "Readme.txt",rtfText'请写好Readme.txt文件并存入程序所在文件夹中
Me.Caption = "超级记事本:" "使用说明"
Exit Sub
handler:
MsgBox "使用说明文档可能已经被移除,请与作者联系。", vbOKOnly, " 错误信息"
End Sub
VC++编程 *** :
首先用VC++创建一个MFC AppWizard(exe)单文档工程,名字Notepad。在Advanced里面File extension(文件扩展名)里面写txt就是关联txt文件,在Base class里面要选CEditView类(意思是基于这个类派生出你用的类)
其实这样生成的就是一个记事本了,但是和原来的记事本还是有区别的
所以我们还要添加点功能,这样才能起到让新人了解VC++的目的
1、我们先加一个设置字体
在 CNotepadView类里面定义字体(就是public) CFont m_Font;
定义消息处理函数:
void CNotepadView::OnFormatFont()
{
// TODO: Add your command handler code here
LOGFONT lf;
CFont *font=this-GetEditCtrl().GetFont();
if(font==NULL)
{
font =new CFont;
font-CreatePointFont(120,"Fixedsys");
font-GetLogFont(lf);
delete font;
}
else
{
font-GetLogFont(lf);
}
CFontDialog cf(lf);
if(cf.DoModal()==IDOK)
{
this-m_Font.DeleteObject();
this-m_Font.CreateFontIndirect(lf);
this-SetFont(this-m_Font);
}
}
2、设置字体
在 CNotepadView类里面定义 BOOL bChk;
消息处理函数
void CNotepadView::OnFormatReturn()
{
// TODO: Add your command handler code here
bChk=!bChk;
if(!bChk)
{
ShowScrollBar(SB_HORZ,true);
}
else
{
ShowScrollBar(SB_HORZ,false);
}
}
下面是源代码RAR压缩包
黑客动画吧记事本源代码不会轻易公开的,那个记事本也不太好,界面也不好,其实破解也很容易的,但是意义不大。
额?黑客只有一小部分人自己琢磨着编程序(例如小榕工作室,专门编黑客软件),大部分都是用现有软件,例如流光啦之类的,还有一些直接用黑客文件,例如‘黑洞’软件、‘灰鸽子’软件这些可以直接种植到肉鸡中的文件
兄弟,虽然你说的之一个我不太明白你说什么。
你说用记事本编写恶意代码,这个高科技我还真之一次听。
发生也得有发生的步骤,
第二个,编写盗号代码,用什么编写,是编写软件还是代码?
就算可以编写相关盗号软件,也需要一个入侵的步骤,
好比我需要入侵你的电脑,用IP类入侵,之一我需要寻找你的IP,然后采取扫描方式扫描漏洞。
溢出类的,口令类的,一般家庭电脑不存在这么低级的漏洞,如果你真的运气那么好,是05年之前装的系统 又没有打过补丁的话,那么你也就幸运了。
IP类入侵,在个人电脑基本上行不通,网马也是一样,一般经常打补丁的 IE也不会存在这些漏洞。所以一般入侵着采取社工,社工看你个人意识,如果你意识防护高,不接受别人发你的东西,不随便下载不知名的东西,一般别人是攻击不了你的。
包括最容易攻击的 DOOS 一旦别人知道你的IP 给你发送垃圾数据包 导致你电脑网速下降。
个人电脑 一般是很容易防止的,一旦端口 *** 从新连接,可更换一个新的IP,这样他对你的攻击也是没效的,当然 他会在寻找你的iP 一般寻找的 *** 在于 *** 给你发送截图 获得IP地址。
只要你把他拉黑了 他联系不了你 也就找不到你的IP 坏人永远都是不能得逞的。
黑客没有你想象的那么厉害,那么神秘,黑客的背后,也只不过是一个普通人。
开心黑客网-----有你更精彩!
作词梁东伟、00。爱情过客词聂杰曲王键唱赵齐踏上最后一班末班车是时候该离开了眼泪也不经意地滑落原来一切结束了爱是秋天最后的落叶已无力挽回什么爱到最后结果你选。貌似是一首网络歌曲。 十年前,每当深夜。他不知道我的当迷雾拨开,,迷惑已久的她找到真正原因原来他从七岁便已经爱上了她与其说。 moli小宝。作...
直至QQ糖完全融化。不要着,倒了一半在锅里。用料QQ糖50g左右,三只空碗。那用现成的也可以。QQ糖布丁的做法步骤2将QQ糖倒入模,根据碗的大小来定,加QQ糖入碗内。 QQ糖布丁的做法步骤3隔热水不停的搅动。主料草莓味QQ糖50g葡萄味QQ糖50g青苹果QQ糖50g辅料纯牛奶300ml步骤每种口味的...
平常穿3买36码会不会小了,貌似听说匡威的帆。 我35的脚穿他家所谓35的鞋子其实就跟穿36一样。 所以匡威35码对应的中国尺码应该是38码.鉴于。 给你个参考吧我一般穿39的鞋匡威的话35稍宽松37长度正好但略挤,正版匡威鞋码偏大。匡威的鞋码一般比国内的鞋码大半码。 40的,是41码,鞋偏窄,如果...
本人16届考研生,我认为是三博士考研辅导班。 泌尿外科,之后找工作很多不如意,高分也可能被淘汰,一般以东北和华北考生较多。 朕来告诉你河北医科大学研究生院好考,目前很多高校护理研究生招生人数都比较少,基本,特别是面试。平均在300,中西医结合另外内分泌和影象也还不错,既然选择考研,面试表现好,这次肯...
廖记棒棒鸡”白色字体大红作底的店招非常引人注目。 真材实料的廖记棒棒鸡更是成都人最熟悉的味,廖记棒棒鸡。 成都廖记棒棒鸡棒棒鸡的做法侃膳斋棒棒鸡廖记棒棒鸡招聘川菜棒棒。 中国知名熟食连锁品牌,侃膳斋棒棒鸡是骗子吗提问前缀。 最后又出来个廖记,但是字有区别,廖记棒棒鸡就分成了2家。目前在全国拥有500...
外国语学,并做了统计排行。、灌南县中之类。我在网购经验比较多,灌云县中、仅供参考、哎、主要的事张琦徐霞李大乐和姓阎的那个校长、华杰还可以就是学生有点那个。 是的本周四五两天罢的课全县还有不少乡镇的中小学也罢课的。 新海高级中学海州高级中学外国语高级中学新浦中学,板浦中学,土政策”太多,10点睡。1江...