精华内容
下载资源
问答
  • As 后面出现类型关键字加方括号的转义,并且这个转义类型没有在前面定义过时: A)标准的 CLR 类型会自动解释为原始的类型(当作方括号不存在)。 B)而 VB.Net 的特有类型会报错。

    看到帖子《Dim s1 As [String]和Dim s1 As String之间什么区别》的提问,专门做了测试,总结如下。

    一、本来用方括号转义名称是为了类似下面这样的用法:
    1)把关键字作为类型。
    2)把关键字作为变量。

    Module Module1
    
        Private Enum [String]
            ASCII
            Unicode
        End Enum
    
        Dim s As [String] = [String].Unicode
    
        Dim [As] As Integer = 0
    
    End Module


    二、当 As 后面出现类型关键字加方括号的转义,并且这个转义类型没有在前面定义过时:
    A)标准的 CLR 类型会自动解释为原始的类型(当作方括号不存在)。
    B)而 VB.Net 的特有类型会报错。

    根据《数据类型摘要 (Visual Basic)》,把基本类型都转义了一下,测试代码如下:

    Module Module2
    
        Dim a As [Char]
        Dim b1 As [DateTime], b2 As [Date]
        Dim c As [Decimal]
        Dim d As [Double]
        Dim e1 As [Int32], e2 As [Integer]
        Dim f1 As [Int64], f2 As [Long]
        Dim g As [Object]
        Dim h As [SByte]
        Dim g1 As [Int16], g2 As [Short]
        Dim i As [Single]
        Dim j As [String]
        Dim k1 As [UInt32], k2 As [UInteger]
        Dim l1 As [UInt64], l2 As [ULong]
        Dim m1 As [UInt16], m2 As [UShort]
    
    End Module

    在 Visual Studio .Net (截图)中可以看到编译错误

    展开全文
  • VBdim与set的区别

    千次阅读 2019-01-05 10:36:51
    1.dim是作用于变量 声明变量并分配存储空间 2.set作用于对象 将对象引用赋给变量或属性 例子: dim A as collection set A=new collection 等效于 dim A as new collection ...

    1.dim是作用于变量 声明变量并分配存储空间
    2.set作用于对象 将对象引用赋给变量或属性
    例子:
    dim A as collection
    set A=new collection
    等效于
    dim A as new collection

    展开全文
  • VB Dim的初识与相关用法

    千次阅读 2013-06-20 16:40:45
    [Dim的来由]在Basic语言中,...[Dim的用法]Dim就是定义变量,与关键字Private(私有的)相当,定义变量方法为:Dim 变量 As 变量类型。定义时指定数据类型是为了节省空间、合理利用资源。定义变量可以使用显式或隐...

    [Dim的来由]
    在Basic语言中,通过定义数组的大小,用DIM,英文全称Dimension,中文意思是尺寸的意思。在VB中则延伸DIM用来定义变量;Dim法语中Dimanche的简写,含义为星期日。


    [Dim的用法]
    Dim就是定义变量,与关键字Private(私有的)相当,定义变量方法为:Dim 变量 As 变量类型。定义时指定数据类型是为了节省空间、合理利用资源。

    定义变量可以使用显式或隐式两种方式定义:
    1、显式定义:Dim 变量名 As 类型
    2、隐式定义:使用类型说明符

    变量的定义例:
    Private gAppErrNumber As Long
    Private gAppErrString As String
    Dim endStatus As String

     


    VB Dim数组的定义与声明详解:
    函数原型:
    Dim 数组名([下标下界] To [下标上界]) [As 数据类型]

    例如(假设在当前模块中数组的缺省下界为0):
    1、Dim A(10) As Integer
    表示数组名为A,此数组下标下界为缺省值0,下标上界为10,有11个Integer类型的元素,从A(0)、A(1)到A(10)。

    2、Dim B(1 To 20) As Integer
    表示数组名为B,此数组下标下界为1,下标上界为20,有20个Integer类型的元素,从B(1)到B(20)。

    3、Dim DayArray(50)
    表示DayArray是一个有51个索引(从0到50)元素的Variant数组。

    4、Dim Matrix(3, 4) As Integer
    表示Matrix是一个二维Integer数组。

    5、Dim MyMatrix(1 To 5, 4 To 9, 3 To 5) As Double
    表示MyMatrix是一个显式指定了上下界的三维double数组。

    6、Dim BirthDay(1 To 10) As Date
    表示BirthDay是一个索引从1到10的Date型数组。

     

    展开全文
  • VB里的 dim是什么意思?

    千次阅读 2017-03-17 15:29:00
    Dim为Dimension的缩写,后面加上所需变量的名字As为变量指定类型程序运行时,Dim语句就根据变量类型为变量分配内存空间 转载于:https://www.cnblogs.com/shuibi/p/6566495.html...

    Dim为Dimension的缩写,后面加上所需变量的名字
    As为变量指定类型
    程序运行时,Dim语句就根据变量类型为变量分配内存空间

    转载于:https://www.cnblogs.com/shuibi/p/6566495.html

    展开全文
  • 【PC】自制QQ机器人(python+VB6)

    千次阅读 多人点赞 2019-08-28 17:21:43
    目前网上的那些QQ机器人都需要下载什么...VB6:1.定时获取QQ消息,也就是对方说了什么。2.定时发送来自python处理好的回答(txt文件格式)。3.对获取的QQ消息分析,既不能是对方上次发的消息(已经处理完并发送)也...
  • VBDim和Redim的区别

    千次阅读 2018-11-10 14:05:20
    dim:定义一个固定维数的数组,如dim arr(100)。 redim:重新定义动态数组的维数,必须先用dim定义一个动态数组: dim arr(),然后可重新定义:redim arr(2,100)、redim arr(1000)。 在redim使用过程中,如果要...
  • Len方法判断字符串变量的长度(VB6.0源代码编写)Dim a As String a = Text1.Text LSet a = "1234" Label1.Caption = "你的字符串变量长度是:" & Len(a) & "个字符
  • VB_Dim语句的功能及用法

    千次阅读 2013-02-20 14:47:29
     Dim [WithEvents] varname[([subscripts])] [As [New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .  Dim 语句的语法包含下面部分:   部分 描述 WithEvents 可选的...
  • VBdim与redim的区别?

    万次阅读 2018-11-02 08:23:22
    dim:定义一个固定维数的数组,如dim arr(100)。 redim:重新定义动态数组的维数,必须先用dim定义一个动态数组: dim arr(),然后可重新定义:redim arr(2,100)、redim arr(1000)。 在redim使用过程中,如果要...
  • 你没有启用ADODB的引用,或者加载ADODC控件, 在“工程|引用”中添加“Microsoft ActiveX Data Object [版本号,比如2.8等] Library”就可以了[用户定义类型未定义]
  • Dim fd As OpenFileDialog = New OpenFileDialog() fd.Filter = "图像文件(*.jpg;*.gif;*.png)|*.jpg;*.gif;*.png" If fd.ShowDialog() = Windows.Forms.DialogResult.OK Then Dim fn As Image = Image.From...
  • VB 用过程求组合数.rar

    2019-07-10 11:26:47
     Dim i As Integer '声明局部变量  p = 1 '赋初值  For i = 1 To m '求m 的阶乘  p = p * i '结果返给参数p  Next i  End Sub    Private Sub Command1_Click() '求组合数  Dim m As Integer, n As Integer...
  • VB 串口编程 开发心得

    千次阅读 2017-07-27 08:20:29
    接触vb的串口控件也有一段时间了 经常被它弄得晕头转向 最重要的是死机 死机 死机 其實關鍵在於 寫好接收函數 现将自己的经验写下来供大家参考 1,使用串口   (1)臺式機自帶串口  (2)USB----...
  • VB添加TTS语音合成

    千次阅读 2019-03-17 16:32:50
    2,在代码中添加Dim MyVoice As New SpeechLib.SpVoice 3,调用SpVoice输出语音合成MyVoice.Speak "我是中国人", SVSFlagsAsync 4,SpVoice成员函数说明: HRESULT SetRate( long RateAd...
  • VB6.0使用InPutBox显示密码... Dim lTemp As Long  Dim sTemp As String  lTemp = SetTimer(Me.hwnd, NV_INPUTBOX, 1, AddressOf TimerProc)  sTemp = InputBox("请输入密码", "密码输入框")  Err_Out: End Sub
  • Dim i As Long Dim x As Long Dim lLen As Long Dim lHDC As Long Dim hBrush As Long '定义各种变量 Static tR As RECT Dim iDir As Long Dim bNotFirstTime As Boolean Dim lTime As Long Dim lIter As Long Dim ...
  •  Dim Child_Hwnd As Long 'QQ发送消息窗口的次窗口句柄  Dim Afx_Hwnd As Long 'QQ填写发送内容的父窗口句柄  Dim Edit_Hwnd As Long '填写发送内容的窗口句柄  Dim Button_Hwnd As Long '发送按钮句柄
  • VB通过网卡MAC实现远程... Dim nbytes As Long  Dim ptrHosent As Long '主机地址结构  Dim ptrName As Long '名称地址指针  Dim ptrAddress As Long '地址地址指针  最终未测试成功,有条件的自己测试下。
  •  Dim FirstNum As Boolean 判断是否是数字开头  Dim PointFlag As Boolean 判断是否已有小数点  Dim RunSign As Integer 储存运算符号  Dim SignFlag As Boolean 判断是否已有运算符号  Dim equal As Double ...
  • VBA中关于dim的简单总结

    万次阅读 2017-08-31 16:25:21
    楼主是个初学者,在应用vba时遇到了dim方面的问题,查了很多资料后想把关于dim的这点儿知识简单整理出来 首先,从我遇到的问题作为切入点吧, (不得不承认我遇到的错误是很低级的) 具体的情境就不还原了,将问题...
  •  Dim x As Int32 '定义或设置点的x坐标  Dim y As Int32 '定义或设置点的y坐标  End Structure  Private Structure rect '定义矩形结构  Dim left As Int32 '定义或设置矩形最左边缘的X坐标  Dim right As Int...
  •  Dim FrmGraphics As Graphics = Me.CreateGraphics  '设置画面质量(消除锯齿)  FrmGraphics.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias  '创建Pen1对象,颜色为黄色,粗细为3像素  Dim Pen1 As New ...
  • VB采用换位密码加密方法测试代码,根据明文生成密钥、密文,对应英文字母表,逐个填写密钥字母的顺序,为生成密文输出作准备,按密钥字母的顺序,转置明文,生成密文,最后一行上的数据未满,用a,b,……填充。...
  • VB学习记录——数组

    万次阅读 多人点赞 2019-07-06 13:05:49
    其格式为:Dim 数组名字 (下界 To 上界) As 类型。 Dim MarkVB(1 To 30) As Integer '定义一个一维数组 上界30 下界是1 共30个元素。 也可以Dim MarkVB(29) As integer,此定义下表从0开始,元素也是30个。 加上O...
  • VB人脸识别技术

    热门讨论 2012-09-29 10:40:25
    Dim i, j, k As Integer Dim h(0 To 400, 0 To 400) As Integer '存储像素的灰度值 Dim r As Integer Dim c As Long Dim hd(0 To 300) As Integer Dim p(0 To 300) As Currency '灰度均值 Dim tt(0 To 300) ...
  •  Dim WarterHeight As Single '水高度  Dim DiBuH As Single '底部高度  Dim KGJiashui As Integer '进水开关  Dim KGChushui As Integer '出水开关  Dim shuiguanColor As Long '水管颜色  Dim ...
  • 扫雷QQ版VB源码.rar

    2019-07-10 12:49:25
    Dim bomb_number As Integer '地雷数  Dim flag(63) As Integer '地雷数组 flag=1为右地雷 flag=0为没有地雷  Dim flag_number(63) As Integer '为每个区域地雷个数'0-8个  Dim ss As Integer '游戏开始时间...
  • VB源代码解释器.rar

    2019-07-10 17:29:55
     Dim pData() As MyLineData '每行文本  Dim LineStr() As MyLineStr '连线字符  Dim pFun() As String '函数数组  Dim pExp() As String '解释数组  Dim pSpl() As String '查询函数分类  Dim ShowRow ...
  • 代码如下: Dim im as Image=Image.FromFile (“C:/picture.bmp”) ‘获得Image System.Windows.Forms.Clipboard.SetDataObject(im, True) ‘复制到剪贴板  Dim xlApp As Excel.Application = New Excel...
  • VB.NET下操作Access数据库 啥也不说,直接上代码 第一步:建立数据库以及数据表 ... Dim cat As Catalog = New Catalog() Dim s As String = "ProductData.mdb" If Not (My.Computer.FileSystem.Fi...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 43,743
精华内容 17,497
关键字:

asdimvb