正文
vb.net返回,vb 函数返回
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net 返回一个数组的函数
public function createstringarr() as string()
return new string(){"d1","d2","d3","d4"}
end function
相关问答
Q1: VB.net 方法返回值的作用是什么？如果没有人调用这个方法的话？
这两个函数都是错误的，首先C变量没有定义，其次作为Function函数没有Return返回结果。
所以两个函数运行起来不会返回任何结果！
像下面这个例子：返回值就是(obj Is Nothing)，在VB.Net中最好使用Return (obj Is Nothing)，而不是IsNothing=(obj Is Nothing)。
Public Function IsNothing(obj As Object) As Boolean
Return (obj Is Nothing)
End Function
Q2: vb.net怎么使用函数返回值。。。比如function a() As String 返回一个值，在function b()里怎么使用
1、我有一个function，如下：
function b()
'...
return "abc"
end function
2、调用时，这样子用：
Response.write(b());
3、运行结果:
abc
Q3: vb.net多线程如何返回参数，举个例子，谢谢
Public Class Form1
Public Class SquareClass '把多线程调用的函数封装到类中，通过类事件返回
Public Value As Double
Public Square As Double
Public Event ThreadComplete(ByVal Square As Double)
Public Sub CalcSquare()
Square = Value * Value
RaiseEvent ThreadComplete(Square)
End Sub
End Class
Dim WithEvents oSquare As SquareClass
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click '多线程返回值测试，当线程运行完成激发事件
oSquare = New SquareClass()
Dim t As New Threading.Thread(AddressOf oSquare.CalcSquare)
oSquare.Value = 30
t.Start()
End Sub
Sub SquareEventHandler(ByVal Square As Double) Handles oSquare.ThreadComplete '响应事件函数
MsgBox("The square is " Square)
End Sub
End Class
Q4: VB.net取得对话框返回值
'form1 窗体上添加一个button1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
Button1.DialogResult = Windows.Forms.DialogResult.OK
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Close()
End Sub
'以上是form1的代码
'然后就可以
dim a as new form1
dim b as dialogresult
b=a.showdialog()
Q5: 《VB.NET》过程。返回值问题。
你的 sub过程这个是子过程，无返回值的，这里Form1_Load中b仍然 b=""
如果你想b="注释",将你的sub过程改成自定义函数，用b来接收返回值就行了，代码如下
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim a As String = "rem"
Dim b As String = ""
b = sub过程(b, a)
Me.Text = b '为什么“b”不是等于 "注释"
End Sub
Private Function sub过程(ByVal 输出 As String, ByRef 输入 As String) As String
If 输入 = "rem" Then
输出 = "注释"
End If
Return 输出
End Function
