clwn.net
当前位置:首页 >> vB第五版教程答案 >>

vB第五版教程答案

inputbox的返回值为string,即字符串类型

设计一个窗体,计算一二次方程a*x*x+b*x+c=0的根.

题目是不是s = 1/(1 * 2)+ 3/(2 *3)+ 5/(3 *4)++(2 * n - 1)/ ( n * (n + 1))Private Sub Command1_Click()Dim n!, s!, sum!sum = 0: n = 1Do s = (2 * n - 1) / (n * (n + 1)) sum = sum + s n = n + 1Loop Until s < 1Print n - 1; sumEnd Sub

推荐书“数据库”操作系统“的书喜欢看一些基本的计算机考试问题并不难,但涵盖范围广泛的

找答案,不如学习后,来提问题.

private sub command1_click() for i = 1 to 10 for j = 1 to 10 if i * j >= 10 and i * j < 100 then print i * j; end if next j next i end sub

Private Sub Command1_Click() Dim db As New ADODB.Connection, RS As New ADODB.Recordset Dim strSQL As String db.ConnectionString = "DRIVER=Microsoft Access Driver (*.mdb);dbQ=" & App.Path & "\*.mdb" '数据库在程序目录

有不会的题目求助我好了.

题目是不是s = 1/(1 * 2)+ 3/(2 *3)+ 5/(3 *4)++(2 * n - 1)/ ( n * (n + 1))Private Sub Command1_Click()Dim n!, s!, sum!sum = 0: n = 1Do s = (2 * n - 1) / (n * (n + 1)) sum = sum + s n = n + 1Loop Until s < 1Print n - 1; sumEnd Sub

bu

网站首页 | 网站地图
All rights reserved Powered by www.clwn.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com