sub

有两种调用方式，在使用之前都将控件“ElementHost”添加到 Form 中： 方式一： 直接声明wpf中控件（使用 Windows.Controls） Public Class Form1 Dim txt As Windows.Controls.TextBox = New Windows.Controls.TextBox() Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load txt.SpellCheck.IsEnabled = True ElementHost1.Child = txt End Sub End Class 方式二： 首先新建一个 ”User Control“， 之后，如下编辑“UserControl1.xaml”中的内容： <Grid> <TextBox x:Name="textBox" Foreground="Black" FontSize="24" Margin="0"></TextBox> <TextBox SpellCheck.IsEnabled="True" /> </Grid> 最后，修改”Form1.vb“代码如下： Public Class Form1 Private uc As UserControl1 = New UserControl1

get_shell 学会第一步nc CGfbs IDA反汇编得到伪代码： int __cdecl main(int argc, const char **argv, const char **envp) { int v4; // [esp-82h] [ebp-82h] int v5; // [esp-7Eh] [ebp-7Eh] __int16 v6; // [esp-7Ah] [ebp-7Ah] int v7; // [esp-78h] [ebp-78h] unsigned int v8; // [esp-14h] [ebp-14h] ​ v8 = __readgsdword(0x14u); setbuf(stdin, 0); setbuf(stdout, 0); setbuf(stderr, 0); v4 = 0; v5 = 0; v6 = 0; memset(&v7, 0, 0x64u); puts("please tell me your name:"); read(0, &v4, 0xAu); puts("leave your message please:"); fgets((char *)&v7, 100, stdin); printf("hello %s", &v4); puts("your message is:"); printf((const char *)

变量 Sub 加法变量() i = Cells(2, 2) Cells(i, 9) = Cells(i, 5) + Cells(i, 7) '利用变量来控制 End Sub 计算半径，面积和体积 Sub 求面积和体积() Radius = Cells(4, 3) r = Radius Square = 4 * r * r * 3 Cells(4, 4) = Square volume = 4 / 3 * r * r * r * 3 Cells(4, 5) = volume '大小写不敏感 End Sub 常量 Option Explicit '强制申明，变量只能用一次 Sub 求面积和体积() Dim Radius, r, square, volume Const pi = 3.14 '申明常量，不允许变动 Radius = Cells(4, 3) r = Radius square = 4 * r * r * pi Cells(4, 4) = square volume = 4 / 3 * r * r * r * pi Cells(4, 5) = volume '大小写不敏感 End Sub 来源： CSDN 作者： 高开低走。 链接： https://blog.csdn.net/qq_43568982/article/details/103738118

官网文档地址： https://docs.python.org/3/library/stdtypes.html#string-methods 官网 公号：软测小生ruancexiaosheng 文档里的所有String的方法都在下面，基于 Python 3.X 版本，截止日期是2017/10/12日，之后的可能会有更新。花了一天的时间学习并记录了一下 4.7.1. String Methods str. capitalize()　--> String　　　返回字符串，其首字母大写，其余部分小写 1>>> str = "TEST" 2>>> str1= "test" 3>>> print(str + "-->" + str.capitalize() +'\n' + "-->" + str + str1.capitalize()) 4 TEST-->Test 5 TEST-->Test str. casefold ( )　--> String 　　　 字符串转换成小写，用于不区分大小写的字符串比较 1>>> str = "TESTtest" 2>>> print(str.casefold()) 3 testtest str. center (width [, fillchar ] )　-->String　　　 指定 长度 (此处是 长度 并不是索引值) 填充字符 1>>> str =

RE re1 下载得到exe文件，运行： 使用exeinfo分析，发现是32位无壳的exe， 拖入IDA，f5反编译： int __cdecl main(int argc, const char **argv, const char **envp) { int v3; // eax __int128 v5; // [esp+0h] [ebp-44h] __int64 v6; // [esp+10h] [ebp-34h] int v7; // [esp+18h] [ebp-2Ch] __int16 v8; // [esp+1Ch] [ebp-28h] char v9; // [esp+20h] [ebp-24h] ​ _mm_storeu_si128((__m128i *)&v5, _mm_loadu_si128((const __m128i *)&xmmword_413E34)); v7 = 0; v6 = qword_413E44; v8 = 0; printf(&byte_413E4C); printf(&byte_413E60); printf(&byte_413E80); scanf("%s", &v9); v3 = strcmp((const char *)&v5, &v9); if ( v3 ) v3 = -(v3 < 0) | 1; if ( v3 ) printf

控制台代码 Module Module1 Sub Main() Dim objCar As New Car objCar.Color = "Red" '颜色 Console.WriteLine("My car is this color:" & objCar.Color) '原速度 Console.WriteLine("The car's speed is " & objCar.Speed & ".") '加速了 objCar.Accelerate(5) If objCar.IsMoving = True Then Console.WriteLine("The car is moving.") Else Console.WriteLine("The car is Stopped") End If '减速了 objCar.Accelerate(-5) If objCar.IsMoving = True Then Console.WriteLine("The car is moving.") Else Console.WriteLine("The car is Stopped") End If '当前车速 Console.WriteLine("The car's speed is " & objCar.Speed & " now.") '小汽车有几个门呢？ Console

modern php笔记---php (性状) 一、总结 一句话总结： trait是和继承一个层次的东西 一个类use MyTrait;后，trait中的方法覆盖父类方法，当前类中的方法覆盖trait方法 1、为什么使用性状？ 让两个无关的php类具有类似的行为 2、命名空间导入和性状导入的区别？ 导入位置：命名空间和性状都使用use 关键字导入，可是导入的位置有所不同，命名空间、类、接口、函数 和常量在类的定义外导入，而性状在类的定义体内导入。这个区别虽然小，但很重要。 3、trait实现的原理？ trait中的方法覆盖父类方法：从基类继承的成员会被trait插入的成员覆盖，优先顺序是来自当前类的成员覆盖了trait方法，而trait方法则覆盖了被继承的方法。 4、trait实例？ trait使用的话直接use MyTrait;即可 一个类use MyTrait;后，trait中的方法覆盖父类方法，当前类中的方法覆盖trait方法 <?php trait MyTrait { public function name() { echo 'trait'; } } class Base { public function name() { echo 'base'; } } class Sub extends Base { use MyTrait; } echo (new Sub())-

for语句 Sub toRMB() Dim rate, i If Cells(7, 6) = "USD" Then '做一个简单的if判断 rate = Cells(8, 6) For i = 11 To 20 Step 1 '步长为1可省略，若是20 to 11，则step -1 Cells(i, 6) = Cells(i, 6) * rate Next i '保持良好的代码风格，利用tab键缩进 Cells(7, 6) = "RMB" End If End Sub Option Explicit Sub 做加法() Dim i As Integer For i = 2 To 28 Step 1 Cells(i, 6) = Cells(i, 2) + Cells(i, 4) Next i End Sub if语句 Option Explicit Sub calculate() Dim score Dim i As Integer score = 0 For i = 4 To 6 Step 1 score = Cells(i, 6) + score '简单求和 Next i score = score / 3 Cells(7, 6) = score 'if-elseif判断，elseif是一个整体 If score >= 90 Then Cells(8, 6) = "A"

<sup>用来标记作为上标的字符，表示幂的数学概念。<sub>用来标记为下标的字符，常用在脚注或化学式中。 <!DOCTYPE html> <!-- To change this license header, choose License Headers in Project Properties. To change this template file, choose Tools | Templates and open the template in the editor. --> <html> <head> <title>上标和下标</title> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> </head> <body> <div>化学方程式</div> <p>2²</p> <p>2Mg+O₂点燃2MgO</p> <p>3Fe+2O₂点燃Fe₃O₄</p> <p>4Al+3O₂点燃2Al₂O₃</p> </html> 　　 来源： https://www

前言 机房的小难点之一就是组合查询，刚开始完全没有思路，看了看他人的博客，就感觉豁然开朗其实是很简单的，流程图一画出来就简单多了，剩下的就是代码设计。 定义函数，使text属性中字符与数据库相对应 Public Function Field ( i As String ) As String '定义函数，使text属性中的字符与数据库相对应 Select Case i Case "卡号" Field = "cardno" Case "学号" Field = "studentno" Case "姓名" Field = "studentname" Case "性别" Field = "sex" Case "系别" Field = "depart" Case "年级" Field = "grade" Case "班级" Field = "class" Case "与" Field = "and" Case "或" Field = "or" End Select End Function 组合查询代码 Private Sub cmdContent_Click ( ) Dim txtSQL , Msgtext As String Dim mrc_stu As ADODB . Recordset txtSQL = "select * from student_info where" If