首页    新闻    小组    交易    人才    下载    博客    代码贴    在线编程    论坛
注册 | 登录
代码贴随便看看全站
# -*- coding:utf-8 -*-

import socket
from time import ctime, sleep
import threading


class ChatRoomPlus:
    def __init__(self):
        # 全局参数配置
        self.encoding = "utf-8"  # 使用的编码方式
        self.broadcastPort = 7788   # 广播端口
......................
阅读全部 | 静夜思 贴于 2021-04-06 20:29:42     hide bbsi
Option Explicit
' By音符,QQ:337855632 Time:2020-03-17
Class Window_Class
    Private PostMessage, SendMessage
    Public Function GetText(ByVal hWnd)
        Dim pszText
        pszText = Space(255)
        GetText = Left(pszText, Api.ECall("user32.dll", "GetWindowTextW", hWnd, pszText, Len(pszText)))
    End Function
    Public Function GetClass(ByVal hWnd)
        Dim pszText
        pszText = Space(255)
......................
阅读全部 | 刘达明 贴于 2021-04-01 19:16:13     hide bbsi
function String_Class() {
  this.slice = function (str, start, end) {
    var end = end || str.length;
    return str.slice(start, end)
  }
  this.substr = function (str, start, end) {
    var end = end || str.length;
    return str.substr(start, end)
  }
  this.getmid = function (str, lstr, rstr, start, mode) {
    // '1 不区分大小写
    // '2 先查右再左
......................
阅读全部 | angelfly 贴于 2021-03-25 21:35:59     hide bbsi
Option Explicit
' By音符,QQ:337855632 Time:2020-03-17
Class File_Class
    Private WritePrivateProfileString, GetPrivateProfileString
    Public Function ReadINI(ByVal ApplicationName, ByVal KeyName, ByVal IniPath, ByVal Default)
        Dim retstr
        retstr = Space(255)
        ReadINI = left(retstr, Api.ECall(GetPrivateProfileString, False, ApplicationName, KeyName, Default, retstr, 255, IniPath))
    End Function
    Public Function WriteINI(ByVal ApplicationName, ByVal KeyName, ByVal Str, ByVal IniPath)
        Call Api.ECall(WritePrivateProfileString, False, ApplicationName, KeyName, CStr(Str), IniPath)
    End Function
......................
阅读全部 | angelfly 贴于 2021-03-25 17:35:44     hide bbsi
l1 = list()
for n1 in range(11):
    for n2 in range(10):
        for n3 in range(10):
            for n4 in range(10):
                if n1 ** 3 + n2 ** 3 + n3 ** 3 + n4 ** 3 == n1 * 1000 + n2 * 100 + n3 * 10 + n4:
                    print(int(str(n1) + str(n2) + str(n3) + str(n4)))
阅读全部 | bccn121 贴于 2021-03-25 16:33:01     hide bbsi
Option Explicit
' By音符,QQ:337855632 Time:2020-03-17
Class Window_Class
    Private PostMessage, SendMessage
    Public Function GetText(ByVal hWnd)
        Dim pszText
        pszText = Space(255)
        GetText = Left(pszText, Api.ECall("user32.dll", "GetWindowTextW", hWnd, pszText, Len(pszText)))
    End Function
    Public Function GetClass(ByVal hWnd)
        Dim pszText
        pszText = Space(255)
......................
阅读全部 | angelfly 贴于 2021-03-25 16:30:36     hide bbsi
import pickle
import os

datafile = 'person.data'
line = '======================================='
message = '''
=======================================
Welcome bookmark:
    press 1 to show list
    press 2 to add pepole
    press 3 to edit pepole
    press 4 to delete pepole
......................
阅读全部 | metersbilly 贴于 2021-03-24 09:54:39     hide bbsi
import math
#dot=[[1,1],[3,2],[5,3],[4,1],[2,3],[1,4]]
dot=[[2,1],[4,8],[1,2],[3,6]]
def fang_cheng(dot):
    fc=[]
    l=len(dot)
    for i in range(l) :
      
      for j in range(i+1,l):
        
        a=dot[j][0]-dot[i][0]
        b=dot[i][1]-dot[j][1]
......................
阅读全部 | qunxingw 贴于 2021-03-23 11:54:53     hide bbsi
def float_(n):
  if n==0:
    return 0
  len=0
  s=n
  while(n>=1):
    n=n/10
    
    len=len+1
    t=n
  return s/(10**len-1) 

......................
阅读全部 | qunxingw 贴于 2021-03-15 00:13:21     hide bbsi
#include <stdio.h>
#include <stdlib.h>
#include <time.h>

int main(void)
{
clock_t c,l;
long n;
l=0L;

for(n=0;1;n++)
{
......................
阅读全部 | W192547975 贴于 2021-03-07 10:05:09     hide bbsi
1 2 3 4 5 6 7 8 9 10 下一页