![](https://img-blog.csdnimg.cn/20190918140012416.png?x-oss-process=image/resize,m_fixed,h_224,w_224)
VB2010实例
VB6.0代码升级2010的学习笔记,语法变法太大,先放下放,不更了。
ngbshzhn
数学教师一枚
展开
-
VB1010实例(4)圆形窗体
前台 代码 Imports System.Runtime.InteropServices '我的操作系统是win7,64位,long类型是64位 '需要设置为:编译--高级编译--目标CPU--x64 '单击变椭圆,双击还原 Public Class Form1 <DllImport("gdi32.dll", EntryPoint:="CreateEllipticRgn", ...原创 2020-03-21 11:04:45 · 407 阅读 · 0 评论 -
VB2010实例(1)_字符大小写转换
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label3.Text = "e.KeyChar:" Label4.Text = "e.KeyChar的值:"...原创 2020-01-18 22:22:33 · 538 阅读 · 0 评论 -
VB2010实例(2) _滚动字幕
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label1.Font = New Font("楷体", 28) Label1.Text = "左移,左移" ...原创 2020-01-18 22:37:31 · 331 阅读 · 0 评论 -
VB2010实例(3)_闪烁的窗体
Imports System.Runtime.InteropServices Public Class Form1 <DllImport("user32.dll")> _ Private Shared Function FlashWindow(ByVal hwnd As IntPtr, ByVal bInvert As Boolean) As Boolean ...原创 2020-01-20 20:09:29 · 166 阅读 · 0 评论