1、只需要用文本框的文本属性等于变量即可.2、vb6示例:(在窗体上添加text1,command1) Private Sub Command1_Click() Dim n As Integer n = 100 Text1.Text = n End Sub

Private Sub Command2_Click() Text1.Text =＂共点击了＂& i & ＂次＂ End Sub

应该是winform.直接在B中声明public string 属性.调用时 B b = new B(); b.Value = ＂.＂; b.ShowDialog();

Private Sub Form_Click() Dim 已清分100 As Integer Dim 已清分50 As Integer Dim 未清分100 As Integer Dim 未清分50 As Integer If Combo1.Text = ＂100＂ Then 已清分100 = Val(Text3.Text) 未清分100 = Val(Text4.Text) Else 已清分50 = Val(Text3.Text) 未清分50 = Val(Text4.Text) End If Print 已清分100; 未清分100; 已清分50; 未清分50 End Sub

VB接受的时候,用String类型的变量接受,然后Dim s() as bytes=这个String接受的内容然后,解析这个s数组的内容

首先要将text1的multiline属性设为truedim i as integertext1=a(0)for i=1 to ubound(a)text1=text1 & vbcrlf & a(i)next i

你好!Private Sub cmd1_Click() msgbox ＂请输入数值＂end sub至于单击“确定”按钮后,该数值在文本框中显示.本来你填上了,就会显示打字不易,采纳哦!

楼上的回答没有进行行扫描. 稍微修改一下 open ＂data.txt＂ for input as #1 'data.txt为存储数据的文件 do until eof(1) = true '判断是否读到文件结尾 lineinput #1,tx '读入一行 array(a)=split(tx) '分割 for i=0 to ubound(a) b(j,i)=a(i) '赋值 next i j=j+1 loop close #1 '关闭文件'输出b(,)

dim i as intger dim str as string i=1000 a=＂文本＂ text1.text=str & cstr(i)'用cstr()转换成文件格式再显式

如果你是建立的窗体的话,可以用一个messagebox来显示 messagebox.show(n)如果是控制台程序,就可以Console.write(n)