vb如何把计算结果数据记录到text框内

就是把图中计算后label41中的的结果通过点击记录按钮按顺序记录到上方的多个文本框内。文本框是按名称顺序排列的。点一下记录记录一个数据,点一下清除清除一个数据。我上学时学过vb但是都还给老师了。目前是做机械的,虽然这东西一个Excel就能解决了。但总感觉太低端了。特来求助。
我们公司有个测力矩的软件就是这种样式的。点击一下下一片测得数据就会被记录到上方的text中,但不知道是怎么编的- -

用控件数组 代码如图

追问

不行啊,一点就报错。text1(i)那里不对

追答

控件数组 你清楚么?

温馨提示:内容为网友见解,仅供参考
无其他回答

vb怎么把结果输出到文本框里?
参考输出方法如下:text1.text="想要的文本"text1.text = text1.text & out Visual Basic是一种由 Microsoft 公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。

怎么让vb程序显示计算后的数值
vb显示计算后的结果有两种方法 1、直接用输出控件 比如用text1输出。计算结果是s 你可以把s赋给text1.text 代码为 text1.text=s 这里的s可以字符型,也可以是数字型 他会自动转换成字符型,等效 text1.text=cstr(s)本例中 就用这种方法来显示,代码有错误 把(Text.1 text) = s 改成(Te...

vb代码怎么输出在text里面
VB可使用& 运算符将字符串串接的方式来实现,将VB代码执行的结果输出到文本框显示。& 运算符,用来强制两个表达式作字符串连接。Option Explicit Dim strSj As String Dim i As Long, j As Long Private Sub Command1_Click() For i = 1 To 1000 If i Mod 3 = 2 Or i M...

vb中如何使用语句将查询结果输出到窗体中?
现在已经用ADODC连接到数据库。那么。你只需要设置 一下TEXT的属性就可以了。在右边控件属性窗体设置 一下。设置Text的datasource属性为adodc然后设置datafield属性为相对就的字段就可以了。如果要下移一条就在代码下写 Adodc1.Recordset.MoveNext 添加:Adodc1.Recordset.AddNew Adodc1.Recordset("字段名1"...

VB6.0中如何让下面这段代码的结果显示在text窗口
用字符串连接起来就可以了,把TextBox控件的MultiLine属性设置为True 可以分行显示 dim str as string str="Private Sub 计算_Click()“ & vbcrlf str=str & "w1 = ComboBox1.Text" & vbcrlf str=str & "w2 = ComboBox2.Text" & vbcrlf str=str & "w3 = ComboBox3.Text" & vbcrlf...

vb 能不能写个语句把SQL里的数据输出到对应的text.text
这时数据库的内容都存在FILE集合里 比方说set rs=openrecordset("select* form student")rs.file(0)就是SQL语句查询结果的第一列 rs.files就是整个结果 使用text1.text=rs.file(0)就可以把文本框于查询结果帮定起来 如果要对数据库进行修这时用以下代码:db.Execute (<SQL语句--如"insert into ...

vb中如何将自己程序里的文字,输出到别的程序文本框中?像输入法一样的...
思路1:把你自己程序里面的文字存储到一个变量a里面 然后把变量a里面的内容写入到一个文本里面 另一个程序里面打开这个文本,把文本里面的东西添加到你的文本框里面 思路2 在原来程序的基础上添加窗体form2 把你自己程序里面的文字添加到text1里面 然后 form2.Text1.Text = Form1.Text1.Text ...

VB中如何让Excel中的数值赋值给text文本框
Dim myDatamyData=newsheet.Range("A1")这样吧单元格A1的值保存在变量myData中,你要再赋值到哪里都可以。

要用VB制作计算器,怎么用命令按钮做数字将数字输入到文本框要代码?
可以就是将文本框后面增加一个数字,就是在文本框内容最后增加命令按钮所显示的数字 比如 Private Sub Command3_Click()text1.Text = text1.Text & "3"End Sub 或通用的按钮组 Private Sub Command1_Click(Index As Integer)text1.Text = text1.Text & Index End Sub 都行 ...

请问vb中如何把在窗体中输出的文字输出到text1中
如果原来的输出语句是这样的:Print a Print b 那么改为输出到Text1则是这样:Text1.Text = Text1.Text & a & vbCrLf Text1.Text = Text1.Text & b & vbCrLf 注意Text1的MultiLine属性要设为True

相似回答