⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 binaryadd.generated.vb

📁 大名鼎鼎的mono是.NET平台的跨平台(支持linux
💻 VB
📖 第 1 页 / 共 2 页
字号:
    '<Test()> Sub Add_Int32_UInt16()    '    Dim t1 As Int32 = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int32_UInt32()    '    Dim t1 As Int32 = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int32_UInt64()    '    Dim t1 As Int32 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_Int64()    '    Dim t1 As Int64 = Nothing, t2 As Int64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_Object()    '    Dim t1 As Int64 = Nothing, t2 As Object = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_Int16()    '    Dim t1 As Int64 = Nothing, t2 As Int16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_Single()    '    Dim t1 As Int64 = Nothing, t2 As Single = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_String()    '    Dim t1 As Int64 = Nothing, t2 As String = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_SByte()    '    Dim t1 As Int64 = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_UInt16()    '    Dim t1 As Int64 = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_UInt32()    '    Dim t1 As Int64 = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int64_UInt64()    '    Dim t1 As Int64 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_Object()    '    Dim t1 As Object = Nothing, t2 As Object = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_Int16()    '    Dim t1 As Object = Nothing, t2 As Int16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_Single()    '    Dim t1 As Object = Nothing, t2 As Single = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_String()    '    Dim t1 As Object = Nothing, t2 As String = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_SByte()    '    Dim t1 As Object = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_UInt16()    '    Dim t1 As Object = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_UInt32()    '    Dim t1 As Object = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Object_UInt64()    '    Dim t1 As Object = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_Int16()    '    Dim t1 As Int16 = Nothing, t2 As Int16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_Single()    '    Dim t1 As Int16 = Nothing, t2 As Single = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_String()    '    Dim t1 As Int16 = Nothing, t2 As String = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_SByte()    '    Dim t1 As Int16 = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_UInt16()    '    Dim t1 As Int16 = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_UInt32()    '    Dim t1 As Int16 = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Int16_UInt64()    '    Dim t1 As Int16 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_Single()    '    Dim t1 As Single = Nothing, t2 As Single = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_String()    '    Dim t1 As Single = Nothing, t2 As String = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_SByte()    '    Dim t1 As Single = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_UInt16()    '    Dim t1 As Single = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_UInt32()    '    Dim t1 As Single = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_Single_UInt64()    '    Dim t1 As Single = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_String_String()    '    Dim t1 As String = Nothing, t2 As String = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_String_SByte()    '    Dim t1 As String = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_String_UInt16()    '    Dim t1 As String = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_String_UInt32()    '    Dim t1 As String = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_String_UInt64()    '    Dim t1 As String = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_SByte_SByte()    '    Dim t1 As SByte = Nothing, t2 As SByte = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_SByte_UInt16()    '    Dim t1 As SByte = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_SByte_UInt32()    '    Dim t1 As SByte = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_SByte_UInt64()    '    Dim t1 As SByte = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt16_UInt16()    '    Dim t1 As UInt16 = Nothing, t2 As UInt16 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt16_UInt32()    '    Dim t1 As UInt16 = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt16_UInt64()    '    Dim t1 As UInt16 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt32_UInt32()    '    Dim t1 As UInt32 = Nothing, t2 As UInt32 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt32_UInt64()    '    Dim t1 As UInt32 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End Sub    '<Test()> Sub Add_UInt64_UInt64()    '    Dim t1 As UInt64 = Nothing, t2 As UInt64 = Nothing    '    Dim t As Object    '    Stop    '    t = t1 + t2    '    Stop    '    '       Assert.AreEqual(t, t1 + t2, "should be equal")    'End SubEnd Class

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -