想要实现的功能,sum1为当前测试人员得分的总和,有个查看成绩按钮,会显示当前的得分,点击后会运行如下代码:
Dim Sum1 As Double = Tables("题库").Compute("Sum(得分)")
+我想要的弹窗代码
例如:
弹窗内容为:综合成绩:75 分(75就是上述定义的变量sum1),查了狐表教程,msgbox里没有相关介绍。求助~
已解决,之前是得分列的数据类型不对,所以弹错,现在把代码发出来共享,,大家注意设置得分列的的数据类型需要改为双精度~
Dim Sum1 As Double = Tables("题库").Compute("Sum(得分)")
MessageBox.Show("综合得分" & sum1 , "提示", MessageBoxButtons.OK)
[此贴子已经被作者于2015/11/17 15:48:41编辑过]