-
-
8本次吧规的修订继承上次吧规草案的大部分内容及精神,依据本吧的实际情况,进行修改并重新发布。 ———————————————— 吧规导航 2L预留作公告处,禁水 3L吧规 4L吧友注意事项 5L加精标准 6L附录1 7L以后不定时发布信息
-
1看最近在各个吧里晒浏览器的很多,所以把一些浏览器必须的功能,又很难百度到的,跟大家分享一下~一般只说方法,具体代码自己写吧 1、最头疼的 默认浏览器设置,当初百度搜遍了,问问也没人回答,最后自己检索其他浏览器修改注册表的位置才有所发现。(扯疼了一个周才弄明白,但是其他浏览器会修改很多项不解) 总结出方法: 在XP下修改注册表:(Cell为自己设计的名字~) [HKEY_CLASSES_ROOT\http\shell] @="Cell.Http" [HKEY_CLASSES_ROOT\https\shell] @
-
10本帖收集磊博士新闻联播生成器的各种反馈问题 声明:本软件仅供娱乐,请勿用于其他行为,否则后果自负,与本人无关 磊博士软件,打造自主品牌
-
0
-
25噢霍霍霍霍!目测要在这里写小说了 OK照相完再写! 此贴不删!
-
1/* 网上看到别人发的关于汉诺塔问题非递归算法,每次都看得有点晕,今天又看了一次,终于明白了其实现原理 传统的递归方法效率极其低下,时间和空间复杂度均呈几何级数增长,当问题规模达到20时,计算时间很漫长,更不用谈30以后的了, 所以,寻找一种非递归方法就很有必要了。 下面是笔者刚刚完成的c++算法 */ #include<iostream> #include<math.h> using namespace std; char pan[3]={'A','B','C'};//三根柱子 int zhuzi[3];//三根柱子的状态 int num;//盘子数 int bu;/
-
1使用控件有:Winsock控件,CommandButton控件,TextBox控件 编程步骤如下: 1.首先声明变量 DimstrCommandAsString DimstrWebPageAsString 2.把如下代码加到Command1的Command1_Click事件: PrivateSubCommand1_Click() Winsock1.RemoteHost="202.103.176.81"'设置连接的网址 Winsock1.RemotePort=80'设置要连接的远程端口号 Winsock1.Connect'返回与远程计算机的连接。 EndSub 3.把如下代码加到Winsock1的Connect事件: PrivateSubWinsock1_Connect()'当一个Connect操作完成时发生 OnErrorResumeNext strWebPage="http://www.vbeden.
-
1#include<windows.h> #include<stdio.h> //回调函数声明 LRESULT CALLBACK WndProc(HWND hwnd,UINT uMsg,WPARAM wParam,LPARAM lParam); int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,LPSTR lpCmdLine, int nCmdShow ) {WNDCLASS wndclass;//定义一个窗体类 wndclass.style=CS_HREDRAW | CS_VREDRAW;// 窗口类型,水平重画和垂直重画 wndclass.lpfnWndProc=WndProc;//定义窗口处理函数 wndclass.cbClsExtra=0;//窗口类无扩展 wndclass.cbWndExtra=0;//窗口实例无扩展 wndclass.hInstance=hInstance;//当前实例句柄 wndclass.hIcon=LoadIcon(NULL,IDI_APPL
-
139
-
2DoEvents System.Windows.Forms.Application.DoEvents() Command1.BackColor = vbRed Command1.BackColor = System.Drawing.Color.Red Command1.BackColor = System.Drawing.Color.FromARGB(&H80C0FF) ComboBox1.AddItem "one" ComboBox1.Items.Add("one") Command1.BackColor = &H80C0FF Command1.BackColor = System.Drawing.ColorTranslator.FromOle(&H80C0FF&) Form1.Caption = "Sample" Form1.DefInstance.Text = "Sample" Form1.Top Form1.DefInstance.Top MsgBox "message", vbInformation, "title" MsgBox("message", MsgB
-
22Function GetWebSourceCode(site As String) As String Dim httpposturl As New System.Uri(site) Dim reqp As HttpWebRequest = WebRequest.Create(url) WebRequest.Create(url) reqp.Method = "GET" reqp.Referer = "http://www.baidu.com" reqp.Timeout = 10000 reqp.Accept = "*/*" reqp.UserAgent = "Mozilla/4.0 (compatible; MSIE 9.0; Windows NT 6.1)" reqp.CookieContainer = New CookieContainer() Dim resp As HttpWebResponse = reqp.GetResponse() Dim reader As New StreamReader(resp.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312")) Dim respHTML As String = reader.ReadToEnd resp.Close Return respHTML